summaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorPhilip <philip@philip-linuxlaptop.(none)>2010-10-04 04:27:40 (GMT)
committer Philip <philip@philip-linuxlaptop.(none)>2010-10-04 04:29:37 (GMT)
commite4f9f77de906d65264c7d09635761dd05940e1aa (patch)
tree6506a2c66d8c923136caba7274145c20106b73f0 /src
parentebb784de700240d0f8c2f2c5ffe3d2ab783c6557 (diff)
downloadpowder-e4f9f77de906d65264c7d09635761dd05940e1aa.zip
powder-e4f9f77de906d65264c7d09635761dd05940e1aa.tar.gz
Updating
Diffstat (limited to 'src')
-rw-r--r--src/Resources/Font-Databin0 -> 4442 bytes
-rw-r--r--src/Resources/Font-Pointersbin0 -> 512 bytes
-rwxr-xr-xsrc/Resources/Icon-16.pngbin0 -> 3161 bytes
-rwxr-xr-xsrc/Resources/Icon-32.pngbin0 -> 3896 bytes
-rw-r--r--src/Resources/powder-res.rc2
-rwxr-xr-xsrc/Resources/powder.icnsbin0 -> 98761 bytes
-rwxr-xr-xsrc/Resources/powder.icobin0 -> 90174 bytes
-rw-r--r--src/air.c141
-rw-r--r--src/graphics.c2619
-rw-r--r--src/http.c1051
-rw-r--r--src/interface.c2961
-rwxr-xr-xsrc/main.c2096
-rw-r--r--src/md5.c231
-rw-r--r--src/misc.c283
-rw-r--r--src/powder.c3611
-rw-r--r--src/update.c201
16 files changed, 13196 insertions, 0 deletions
diff --git a/src/Resources/Font-Data b/src/Resources/Font-Data
new file mode 100644
index 0000000..a384152
--- /dev/null
+++ b/src/Resources/Font-Data
Binary files differ
diff --git a/src/Resources/Font-Pointers b/src/Resources/Font-Pointers
new file mode 100644
index 0000000..621258b
--- /dev/null
+++ b/src/Resources/Font-Pointers
Binary files differ
diff --git a/src/Resources/Icon-16.png b/src/Resources/Icon-16.png
new file mode 100755
index 0000000..5e1e1fb
--- /dev/null
+++ b/src/Resources/Icon-16.png
Binary files differ
diff --git a/src/Resources/Icon-32.png b/src/Resources/Icon-32.png
new file mode 100755
index 0000000..1f056bd
--- /dev/null
+++ b/src/Resources/Icon-32.png
Binary files differ
diff --git a/src/Resources/powder-res.rc b/src/Resources/powder-res.rc
new file mode 100644
index 0000000..569b629
--- /dev/null
+++ b/src/Resources/powder-res.rc
@@ -0,0 +1,2 @@
+#define IDI_ICON1 101
+IDI_ICON1 ICON DISCARDABLE "powder.ico"
diff --git a/src/Resources/powder.icns b/src/Resources/powder.icns
new file mode 100755
index 0000000..56df7eb
--- /dev/null
+++ b/src/Resources/powder.icns
Binary files differ
diff --git a/src/Resources/powder.ico b/src/Resources/powder.ico
new file mode 100755
index 0000000..cd3f6e0
--- /dev/null
+++ b/src/Resources/powder.ico
Binary files differ
diff --git a/src/air.c b/src/air.c
new file mode 100644
index 0000000..dd98a12
--- /dev/null
+++ b/src/air.c
@@ -0,0 +1,141 @@
+#include <math.h>
+#include <air.h>
+#include <powder.h>
+#include <defines.h>
+float kernel[9];
+
+float vx[YRES/CELL][XRES/CELL], ovx[YRES/CELL][XRES/CELL];
+float vy[YRES/CELL][XRES/CELL], ovy[YRES/CELL][XRES/CELL];
+float pv[YRES/CELL][XRES/CELL], opv[YRES/CELL][XRES/CELL];
+
+float cb_vx[YRES/CELL][XRES/CELL], cb_ovx[YRES/CELL][XRES/CELL];
+float cb_vy[YRES/CELL][XRES/CELL], cb_ovy[YRES/CELL][XRES/CELL];
+float cb_pv[YRES/CELL][XRES/CELL], cb_opv[YRES/CELL][XRES/CELL];
+
+float fvx[YRES/CELL][XRES/CELL], fvy[YRES/CELL][XRES/CELL];
+
+void make_kernel(void)
+{
+ int i, j;
+ float s = 0.0f;
+ for(j=-1; j<2; j++)
+ for(i=-1; i<2; i++)
+ {
+ kernel[(i+1)+3*(j+1)] = expf(-2.0f*(i*i+j*j));
+ s += kernel[(i+1)+3*(j+1)];
+ }
+ s = 1.0f / s;
+ for(j=-1; j<2; j++)
+ for(i=-1; i<2; i++)
+ kernel[(i+1)+3*(j+1)] *= s;
+}
+void update_air(void)
+{
+ int x, y, i, j;
+ float dp, dx, dy, f, tx, ty;
+
+ for(y=1; y<YRES/CELL; y++)
+ for(x=1; x<XRES/CELL; x++)
+ {
+ dp = 0.0f;
+ dp += vx[y][x-1] - vx[y][x];
+ dp += vy[y-1][x] - vy[y][x];
+ pv[y][x] *= PLOSS;
+ pv[y][x] += dp*TSTEPP;
+ }
+
+ for(y=0; y<YRES/CELL-1; y++)
+ for(x=0; x<XRES/CELL-1; x++)
+ {
+ dx = dy = 0.0f;
+ dx += pv[y][x] - pv[y][x+1];
+ dy += pv[y][x] - pv[y+1][x];
+ vx[y][x] *= VLOSS;
+ vy[y][x] *= VLOSS;
+ vx[y][x] += dx*TSTEPV;
+ vy[y][x] += dy*TSTEPV;
+ if(bmap[y][x]==1 || bmap[y][x+1]==1 ||
+ bmap[y][x]==8 || bmap[y][x+1]==8 ||
+ (bmap[y][x]==7 && !emap[y][x]) ||
+ (bmap[y][x+1]==7 && !emap[y][x+1]))
+ vx[y][x] = 0;
+ if(bmap[y][x]==1 || bmap[y+1][x]==1 ||
+ bmap[y][x]==8 || bmap[y+1][x]==8 ||
+ (bmap[y][x]==7 && !emap[y][x]) ||
+ (bmap[y+1][x]==7 && !emap[y+1][x]))
+ vy[y][x] = 0;
+ }
+
+ for(y=0; y<YRES/CELL; y++)
+ for(x=0; x<XRES/CELL; x++)
+ {
+ dx = 0.0f;
+ dy = 0.0f;
+ dp = 0.0f;
+ for(j=-1; j<2; j++)
+ for(i=-1; i<2; i++)
+ if(y+j>0 && y+j<YRES/CELL-1 &&
+ x+i>0 && x+i<XRES/CELL-1 &&
+ bmap[y+j][x+i]!=1 &&
+ bmap[y+j][x+i]!=8 &&
+ (bmap[y+j][x+i]!=7 || emap[y+j][x+i]))
+ {
+ f = kernel[i+1+(j+1)*3];
+ dx += vx[y+j][x+i]*f;
+ dy += vy[y+j][x+i]*f;
+ dp += pv[y+j][x+i]*f;
+ }
+ else
+ {
+ f = kernel[i+1+(j+1)*3];
+ dx += vx[y][x]*f;
+ dy += vy[y][x]*f;
+ dp += pv[y][x]*f;
+ }
+
+ tx = x - dx*0.7f;
+ ty = y - dy*0.7f;
+ i = (int)tx;
+ j = (int)ty;
+ tx -= i;
+ ty -= j;
+ if(i>=2 && i<XRES/CELL-3 &&
+ j>=2 && j<YRES/CELL-3)
+ {
+ dx *= 1.0f - VADV;
+ dy *= 1.0f - VADV;
+
+ dx += VADV*(1.0f-tx)*(1.0f-ty)*vx[j][i];
+ dy += VADV*(1.0f-tx)*(1.0f-ty)*vy[j][i];
+
+ dx += VADV*tx*(1.0f-ty)*vx[j][i+1];
+ dy += VADV*tx*(1.0f-ty)*vy[j][i+1];
+
+ dx += VADV*(1.0f-tx)*ty*vx[j+1][i];
+ dy += VADV*(1.0f-tx)*ty*vy[j+1][i];
+
+ dx += VADV*tx*ty*vx[j+1][i+1];
+ dy += VADV*tx*ty*vy[j+1][i+1];
+ }
+
+ if(bmap[y][x] == 4)
+ {
+ dx += fvx[y][x];
+ dy += fvy[y][x];
+ }
+
+ if(dp > 256.0f) dp = 256.0f;
+ if(dp < -256.0f) dp = -256.0f;
+ if(dx > 256.0f) dx = 256.0f;
+ if(dx < -256.0f) dx = -256.0f;
+ if(dy > 256.0f) dy = 256.0f;
+ if(dy < -256.0f) dy = -256.0f;
+
+ ovx[y][x] = dx;
+ ovy[y][x] = dy;
+ opv[y][x] = dp;
+ }
+ memcpy(vx, ovx, sizeof(vx));
+ memcpy(vy, ovy, sizeof(vy));
+ memcpy(pv, opv, sizeof(pv));
+}
diff --git a/src/graphics.c b/src/graphics.c
new file mode 100644
index 0000000..2c9a686
--- /dev/null
+++ b/src/graphics.c
@@ -0,0 +1,2619 @@
+#include <math.h>
+#include <SDL/SDL.h>
+#include <bzlib.h>
+
+#ifdef OpenGL
+#ifdef MACOSX
+#include <OpenGL/gl.h>
+#include <OpenGL/glu.h>
+#else
+#include <GL/gl.h>
+#include <GL/glu.h>
+#endif
+#endif
+
+#include <defines.h>
+#include <air.h>
+#include <powder.h>
+#include <graphics.h>
+#define INCLUDE_FONTDATA
+#include <font.h>
+#include <misc.h>
+
+
+unsigned cmode = 3;
+SDL_Surface *sdl_scrn;
+int sdl_scale = 1;
+
+unsigned char fire_r[YRES/CELL][XRES/CELL];
+unsigned char fire_g[YRES/CELL][XRES/CELL];
+unsigned char fire_b[YRES/CELL][XRES/CELL];
+
+unsigned int fire_alpha[CELL*3][CELL*3];
+pixel *fire_bg;
+
+pixel *rescale_img(pixel *src, int sw, int sh, int *qw, int *qh, int f)
+{
+ int i,j,x,y,w,h,r,g,b,c;
+ pixel p, *q;
+ w = (sw+f-1)/f;
+ h = (sh+f-1)/f;
+ q = malloc(w*h*PIXELSIZE);
+ for(y=0; y<h; y++)
+ for(x=0; x<w; x++)
+ {
+ r = g = b = c = 0;
+ for(j=0; j<f; j++)
+ for(i=0; i<f; i++)
+ if(x*f+i<sw && y*f+j<sh)
+ {
+ p = src[(y*f+j)*sw + (x*f+i)];
+ if(p)
+ {
+ r += PIXR(p);
+ g += PIXG(p);
+ b += PIXB(p);
+ c ++;
+ }
+ }
+ if(c>1)
+ {
+ r = (r+c/2)/c;
+ g = (g+c/2)/c;
+ b = (b+c/2)/c;
+ }
+ q[y*w+x] = PIXRGB(r, g, b);
+ }
+ *qw = w;
+ *qh = h;
+ return q;
+}
+
+void sdl_blit_1(int x, int y, int w, int h, pixel *src, int pitch)
+{
+ pixel *dst;
+ int j;
+ if(SDL_MUSTLOCK(sdl_scrn))
+ if(SDL_LockSurface(sdl_scrn)<0)
+ return;
+ dst=(pixel *)sdl_scrn->pixels+y*sdl_scrn->pitch/PIXELSIZE+x;
+ for(j=0; j<h; j++)
+ {
+ memcpy(dst, src, w*PIXELSIZE);
+ dst+=sdl_scrn->pitch/PIXELSIZE;
+ src+=pitch;
+ }
+ if(SDL_MUSTLOCK(sdl_scrn))
+ SDL_UnlockSurface(sdl_scrn);
+ SDL_UpdateRect(sdl_scrn,0,0,0,0);
+}
+
+void sdl_blit_2(int x, int y, int w, int h, pixel *src, int pitch)
+{
+ pixel *dst;
+ int j;
+ int i,k;
+ if(SDL_MUSTLOCK(sdl_scrn))
+ if(SDL_LockSurface(sdl_scrn)<0)
+ return;
+ dst=(pixel *)sdl_scrn->pixels+y*sdl_scrn->pitch/PIXELSIZE+x;
+ for(j=0; j<h; j++)
+ {
+ for(k=0; k<sdl_scale; k++)
+ {
+ for(i=0; i<w; i++)
+ {
+ dst[i*2]=src[i];
+ dst[i*2+1]=src[i];
+ }
+ dst+=sdl_scrn->pitch/PIXELSIZE;
+ }
+ src+=pitch;
+ }
+ if(SDL_MUSTLOCK(sdl_scrn))
+ SDL_UnlockSurface(sdl_scrn);
+ SDL_UpdateRect(sdl_scrn,0,0,0,0);
+}
+
+void sdl_blit(int x, int y, int w, int h, pixel *src, int pitch)
+{
+#ifdef OpenGL
+ RenderScene();
+#else
+ if(sdl_scale == 2)
+ sdl_blit_2(x, y, w, h, src, pitch);
+ else
+ sdl_blit_1(x, y, w, h, src, pitch);
+#endif
+}
+
+void drawblob(pixel *vid, int x, int y, unsigned char cr, unsigned char cg, unsigned char cb)
+{
+ blendpixel(vid, x+1, y, cr, cg, cb, 112);
+ blendpixel(vid, x-1, y, cr, cg, cb, 112);
+ blendpixel(vid, x, y+1, cr, cg, cb, 112);
+ blendpixel(vid, x, y-1, cr, cg, cb, 112);
+
+ blendpixel(vid, x+1, y-1, cr, cg, cb, 64);
+ blendpixel(vid, x-1, y-1, cr, cg, cb, 64);
+ blendpixel(vid, x+1, y+1, cr, cg, cb, 64);
+ blendpixel(vid, x-1, y+1, cr, cg, cb, 64);
+}
+
+void draw_tool(pixel *vid_buf, int b, int sl, int sr, unsigned pc, unsigned iswall)
+{
+ int x, y, i, j, c;
+ int bo = b;
+ if(iswall==1)
+ {
+ b = b-100;
+ x = (2+32*((b-22)/1));
+ y = YRES+2+40;
+ switch(b)
+ {
+ case WL_WALLELEC:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ else
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = PIXPACK(0x808080);
+ }
+ }
+ }
+ break;
+ case 23:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<6+j; i++)
+ {
+ if(!(i&j&1))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ for(; i<27; i++)
+ {
+ if(i&j&1)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 24:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 25:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = i==1||i==26||j==1||j==14 ? PIXPACK(0xA0A0A0) : PIXPACK(0x000000);
+ drawtext(vid_buf, x+4, y+3, "\x8D", 255, 255, 255, 255);
+ }
+ }
+ for(i=9; i<27; i++)
+ {
+ drawpixel(vid_buf, x+i, y+8+(int)(3.9f*cos(i*0.3f)), 255, 255, 255, 255);
+ }
+ break;
+ case 26:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = i==1||i==26||j==1||j==14 ? PIXPACK(0xA0A0A0) : PIXPACK(0x000000);
+ }
+ }
+ drawtext(vid_buf, x+9, y+3, "\xA1", 32, 64, 128, 255);
+ drawtext(vid_buf, x+9, y+3, "\xA0", 255, 255, 255, 255);
+ break;
+ case 27:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 28:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 29:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 30:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<13; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ for(j=1; j<15; j++)
+ {
+ for(i=14; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 32:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 33:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 34:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 36:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("AIR")/2, y+4, "AIR", c, c, c, 255);
+ break;
+ case 37:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("HEAT")/2, y+4, "HEAT", c, c, c, 255);
+ break;
+ case 38:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("COOL")/2, y+4, "COOL", c, c, c, 255);
+ break;
+ case 39:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("VAC")/2, y+4, "VAC", c, c, c, 255);
+ break;
+ default:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ if(b==30)
+ {
+ for(j=4; j<12; j++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+6)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+7)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+21)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+22)] = PIXPACK(0xFF0000);
+ }
+ }
+ }
+ else
+ {
+ x = 2+32*(b/2);
+ y = YRES+2+20*(b%2);
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ if(b==0)
+ {
+ for(j=4; j<12; j++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+6)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+7)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+21)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+22)] = PIXPACK(0xFF0000);
+ }
+ }
+ c = PIXB(ptypes[b].pcolors) + 3*PIXG(ptypes[b].pcolors) + 2*PIXR(ptypes[b].pcolors);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth((char *)ptypes[b].name)/2, y+4, (char *)ptypes[b].name, c, c, c, 255);
+ }
+ if(bo==sl || bo==sr)
+ {
+ c = 0;
+ if(bo==sl)
+ c |= PIXPACK(0xFF0000);
+ if(bo==sr)
+ c |= PIXPACK(0x0000FF);
+ for(i=0; i<30; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y-1)+(x+i-1)] = c;
+ vid_buf[(XRES+BARSIZE)*(y+16)+(x+i-1)] = c;
+ }
+ for(j=0; j<18; j++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j-1)+(x-1)] = c;
+ vid_buf[(XRES+BARSIZE)*(y+j-1)+(x+28)] = c;
+ }
+ }
+}
+
+int draw_tool_xy(pixel *vid_buf, int x, int y, int b, unsigned pc)
+{
+ int i, j, c;
+ if(b>=121)
+ {
+ b = b-100;
+ //x = (2+32*((b-22)/1));
+ //y = YRES+2+40;
+ switch(b)
+ {
+ case WL_WALLELEC:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ else
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = PIXPACK(0x808080);
+ }
+ }
+ }
+ break;
+ case 23:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<6+j; i++)
+ {
+ if(!(i&j&1))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ for(; i<27; i++)
+ {
+ if(i&j&1)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 24:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 25:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = i==1||i==26||j==1||j==14 ? PIXPACK(0xA0A0A0) : PIXPACK(0x000000);
+ drawtext(vid_buf, x+4, y+3, "\x8D", 255, 255, 255, 255);
+ }
+ }
+ for(i=9; i<27; i++)
+ {
+ drawpixel(vid_buf, x+i, y+8+(int)(3.9f*cos(i*0.3f)), 255, 255, 255, 255);
+ }
+ break;
+ case 26:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = i==1||i==26||j==1||j==14 ? PIXPACK(0xA0A0A0) : PIXPACK(0x000000);
+ }
+ }
+ drawtext(vid_buf, x+9, y+3, "\xA1", 32, 64, 128, 255);
+ drawtext(vid_buf, x+9, y+3, "\xA0", 255, 255, 255, 255);
+ break;
+ case 27:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 28:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 29:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 30:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<13; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ for(j=1; j<15; j++)
+ {
+ for(i=14; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 32:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 33:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ case 34:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ if(!(i%2) && !(j%2))
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ break;
+ case 36:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("AIR")/2, y+4, "AIR", c, c, c, 255);
+ break;
+ case 37:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("HEAT")/2, y+4, "HEAT", c, c, c, 255);
+ break;
+ case 38:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("COOL")/2, y+4, "COOL", c, c, c, 255);
+ break;
+ case 39:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ c = PIXR(pc) + 3*PIXG(pc) + 2*PIXB(pc);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth("VAC")/2, y+4, "VAC", c, c, c, 255);
+ break;
+ case 40:
+ for(j=1; j<15; j+=2)
+ {
+ for(i=1+(1&(j>>1)); i<27; i+=2)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ break;
+ default:
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+ }
+ if(b==30)
+ {
+ for(j=4; j<12; j++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+6)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+7)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+21)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+22)] = PIXPACK(0xFF0000);
+ }
+ }
+ }
+ else
+ {
+ //x = 2+32*(b/2);
+ //y = YRES+2+20*(b%2);
+#ifdef OpenGL
+ fillrect(vid_buf, x, y, 28, 16, PIXR(pc), PIXG(pc), PIXB(pc), 255);
+#else
+ for(j=1; j<15; j++)
+ {
+ for(i=1; i<27; i++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+i)] = pc;
+ }
+ }
+#endif
+ if(b==0)
+ {
+ for(j=4; j<12; j++)
+ {
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+6)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x+j+7)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+21)] = PIXPACK(0xFF0000);
+ vid_buf[(XRES+BARSIZE)*(y+j)+(x-j+22)] = PIXPACK(0xFF0000);
+ }
+ }
+ c = PIXB(ptypes[b].pcolors) + 3*PIXG(ptypes[b].pcolors) + 2*PIXR(ptypes[b].pcolors);
+ if(c<544)
+ {
+ c = 255;
+ }
+ else
+ {
+ c = 0;
+ }
+ drawtext(vid_buf, x+14-textwidth((char *)ptypes[b].name)/2, y+4, (char *)ptypes[b].name, c, c, c, 255);
+ }
+ return 26;
+}
+
+void draw_menu(pixel *vid_buf, int i, int hover)
+{
+ drawrect(vid_buf, XRES-2, (i*16)+YRES+MENUSIZE-16-(SC_TOTAL*16), 14, 14, 255, 255, 255, 255);
+ if(hover==i)
+ {
+ fillrect(vid_buf, XRES-2, (i*16)+YRES+MENUSIZE-16-(SC_TOTAL*16), 14, 14, 255, 255, 255, 255);
+ drawtext(vid_buf, XRES+1, (i*16)+YRES+MENUSIZE-14-(SC_TOTAL*16), msections[i].icon, 0, 0, 0, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES+1, (i*16)+YRES+MENUSIZE-14-(SC_TOTAL*16), msections[i].icon, 255, 255, 255, 255);
+ }
+}
+
+#ifdef WIN32
+_inline void drawpixel(pixel *vid, int x, int y, int r, int g, int b, int a)
+#else
+inline void drawpixel(pixel *vid, int x, int y, int r, int g, int b, int a)
+#endif
+{
+ pixel t;
+ if(x<0 || y<0 || x>=XRES+BARSIZE || y>=YRES+MENUSIZE)
+ return;
+ if(a!=255)
+ {
+ t = vid[y*(XRES+BARSIZE)+x];
+ r = (a*r + (255-a)*PIXR(t)) >> 8;
+ g = (a*g + (255-a)*PIXG(t)) >> 8;
+ b = (a*b + (255-a)*PIXB(t)) >> 8;
+ }
+ vid[y*(XRES+BARSIZE)+x] = PIXRGB(r,g,b);
+}
+
+#ifdef WIN32
+_inline int drawchar(pixel *vid, int x, int y, int c, int r, int g, int b, int a)
+#else
+inline int drawchar(pixel *vid, int x, int y, int c, int r, int g, int b, int a)
+#endif
+{
+ int i, j, w, bn = 0, ba = 0;
+ char *rp = font_data + font_ptrs[c];
+ w = *(rp++);
+ for(j=0; j<FONT_H; j++)
+ for(i=0; i<w; i++)
+ {
+ if(!bn)
+ {
+ ba = *(rp++);
+ bn = 8;
+ }
+ drawpixel(vid, x+i, y+j, r, g, b, ((ba&3)*a)/3);
+ ba >>= 2;
+ bn -= 2;
+ }
+ return x + w;
+}
+
+int drawtext(pixel *vid, int x, int y, const char *s, int r, int g, int b, int a)
+{
+#ifdef OpenGL
+#else
+ int sx = x;
+ for(; *s; s++)
+ {
+ if(*s == '\n')
+ {
+ x = sx;
+ y += FONT_H+2;
+ }
+ else if(*s == '\b')
+ {
+ switch(s[1])
+ {
+ case 'w':
+ r = g = b = 255;
+ break;
+ case 'g':
+ r = g = b = 192;
+ break;
+ case 'o':
+ r = 255;
+ g = 216;
+ b = 32;
+ break;
+ case 'r':
+ r = 255;
+ g = b = 0;
+ break;
+ case 'b':
+ r = g = 0;
+ b = 255;
+ break;
+ }
+ s++;
+ }
+ else
+ x = drawchar(vid, x, y, *(unsigned char *)s, r, g, b, a);
+ }
+#endif
+ return x;
+}
+
+void drawrect(pixel *vid, int x, int y, int w, int h, int r, int g, int b, int a)
+{
+#ifdef OpenGL
+ glBegin(GL_LINE_LOOP);
+ glColor4ub(r, g, b, a);
+ glVertex2i(x, y);
+ glVertex2i(x+w, y);
+ glVertex2i(x+w, y+h);
+ glVertex2i(x, y+h);
+ glEnd();
+#else
+ int i;
+ for(i=0; i<=w; i++)
+ {
+ drawpixel(vid, x+i, y, r, g, b, a);
+ drawpixel(vid, x+i, y+h, r, g, b, a);
+ }
+ for(i=1; i<h; i++)
+ {
+ drawpixel(vid, x, y+i, r, g, b, a);
+ drawpixel(vid, x+w, y+i, r, g, b, a);
+ }
+#endif
+}
+
+void fillrect(pixel *vid, int x, int y, int w, int h, int r, int g, int b, int a)
+{
+#ifdef OpenGL
+ glBegin(GL_QUADS);
+ glColor4ub(r, g, b, a);
+ glVertex2i(x, y);
+ glVertex2i(x+w, y);
+ glVertex2i(x+w, y+h);
+ glVertex2i(x, y+h);
+ glEnd();
+#else
+ int i,j;
+ for(j=1; j<h; j++)
+ for(i=1; i<w; i++)
+ drawpixel(vid, x+i, y+j, r, g, b, a);
+#endif // OpenGL
+}
+
+void clearrect(pixel *vid, int x, int y, int w, int h)
+{
+ int i;
+ for(i=1; i<h; i++)
+ memset(vid+(x+1+(XRES+BARSIZE)*(y+i)), 0, PIXELSIZE*(w-1));
+}
+void drawdots(pixel *vid, int x, int y, int h, int r, int g, int b, int a)
+{
+#ifdef OpenGL
+ int i;
+ glBegin(GL_QUADS);
+ glColor4ub(r, g, b, a);
+ for(i = 0; i <= h; i +=2)
+ glVertex2i(x, y+i);
+ glEnd();
+#else
+ int i;
+ for(i=0; i<=h; i+=2)
+ drawpixel(vid, x, y+i, r, g, b, a);
+#endif //OpenGL
+}
+
+int textwidth(char *s)
+{
+ int x = 0;
+ for(; *s; s++)
+ x += font_data[font_ptrs[(int)(*(unsigned char *)s)]];
+ return x-1;
+}
+
+int drawtextmax(pixel *vid, int x, int y, int w, char *s, int r, int g, int b, int a)
+{
+ int i;
+ w += x-5;
+ for(; *s; s++)
+ {
+ if(x+font_data[font_ptrs[(int)(*(unsigned char *)s)]]>=w && x+textwidth(s)>=w+5)
+ break;
+ x = drawchar(vid, x, y, *(unsigned char *)s, r, g, b, a);
+ }
+ if(*s)
+ for(i=0; i<3; i++)
+ x = drawchar(vid, x, y, '.', r, g, b, a);
+ return x;
+}
+
+int textnwidth(char *s, int n)
+{
+ int x = 0;
+ for(; *s; s++)
+ {
+ if(!n)
+ break;
+ x += font_data[font_ptrs[(int)(*(unsigned char *)s)]];
+ n--;
+ }
+ return x-1;
+}
+
+int textwidthx(char *s, int w)
+{
+ int x=0,n=0,cw;
+ for(; *s; s++)
+ {
+ cw = font_data[font_ptrs[(int)(*(unsigned char *)s)]];
+ if(x+(cw/2) >= w)
+ break;
+ x += cw;
+ n++;
+ }
+ return n;
+}
+
+#ifdef WIN32
+_inline void blendpixel(pixel *vid, int x, int y, int r, int g, int b, int a)
+#else
+inline void blendpixel(pixel *vid, int x, int y, int r, int g, int b, int a)
+#endif
+{
+#ifdef OpenGL
+ if(x<0 || y<0 || x>=XRES || r>=YRES)
+ return;
+ if(a!=255)
+ {
+ glBegin (GL_QUADS);
+ glColor4ub(r,g,b,a);
+ glVertex2i(x, y);
+ }
+ vid[y*(XRES+BARSIZE)+x] = PIXRGB(r,g,b);
+#else
+ pixel t;
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return;
+ if(a!=255)
+ {
+ t = vid[y*(XRES+BARSIZE)+x];
+ r = (a*r + (255-a)*PIXR(t)) >> 8;
+ g = (a*g + (255-a)*PIXG(t)) >> 8;
+ b = (a*b + (255-a)*PIXB(t)) >> 8;
+ }
+ vid[y*(XRES+BARSIZE)+x] = PIXRGB(r,g,b);
+#endif //OpenGL
+}
+
+void draw_icon(pixel *vid_buf, int x, int y, char ch, int flag)
+{
+ char t[2];
+ t[0] = ch;
+ t[1] = 0;
+ if(flag)
+ {
+ fillrect(vid_buf, x-1, y-1, 17, 17, 255, 255, 255, 255);
+ drawtext(vid_buf, x+3, y+2, t, 0, 0, 0, 255);
+ }
+ else
+ {
+ drawrect(vid_buf, x, y, 15, 15, 255, 255, 255, 255);
+ drawtext(vid_buf, x+3, y+2, t, 255, 255, 255, 255);
+ }
+}
+
+void draw_air(pixel *vid)
+{
+ int x, y, i, j;
+ pixel c;
+
+ if(cmode == 2)
+ return;
+
+ for(y=0; y<YRES/CELL; y++)
+ for(x=0; x<XRES/CELL; x++)
+ {
+ if(cmode)
+ {
+ if(pv[y][x] > 0.0f)
+ c = PIXRGB(clamp_flt(pv[y][x], 0.0f, 8.0f), 0, 0);
+ else
+ c = PIXRGB(0, 0, clamp_flt(-pv[y][x], 0.0f, 8.0f));
+ }
+ else
+ c = PIXRGB(clamp_flt(fabsf(vx[y][x]), 0.0f, 8.0f),
+ clamp_flt(pv[y][x], 0.0f, 8.0f),
+ clamp_flt(fabsf(vy[y][x]), 0.0f, 8.0f));
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ vid[(x*CELL+i) + (y*CELL+j)*(XRES+BARSIZE)] = c;
+ }
+}
+
+void draw_line(pixel *vid, int x1, int y1, int x2, int y2, int r, int g, int b, int a) //Draws a line
+{
+ int dx, dy, i, sx, sy, check, e, x, y;
+
+ dx = abs(x1-x2);
+ dy = abs(y1-y2);
+ sx = isign(x2-x1);
+ sy = isign(y2-y1);
+ x = x1;
+ y = y1;
+ check = 0;
+
+ if (dy>dx)
+ {
+ dx = dx+dy;
+ dy = dx-dy;
+ dx = dx-dy;
+ check = 1;
+ }
+
+ e = (dy<<2)-dx;
+ for (i=0; i<=dx; i++)
+ {
+ vid[x+y*a] =PIXRGB(r, g, b);
+ if (e>=0)
+ {
+ if (check==1)
+ x = x+sx;
+ else
+ y = y+sy;
+ e = e-(dx<<2);
+ }
+ if (check==1)
+ y = y+sy;
+ else
+ x = x+sx;
+ e = e+(dy<<2);
+ }
+}
+
+void addpixel(pixel *vid, int x, int y, int r, int g, int b, int a)
+{
+ pixel t;
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return;
+ t = vid[y*(XRES+BARSIZE)+x];
+ r = (a*r + 255*PIXR(t)) >> 8;
+ g = (a*g + 255*PIXG(t)) >> 8;
+ b = (a*b + 255*PIXB(t)) >> 8;
+ if(r>255)
+ r = 255;
+ if(g>255)
+ g = 255;
+ if(b>255)
+ b = 255;
+ vid[y*(XRES+BARSIZE)+x] = PIXRGB(r,g,b);
+}
+
+void xor_pixel(int x, int y, pixel *vid)
+{
+ int c;
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return;
+ c = vid[y*(XRES+BARSIZE)+x];
+ c = PIXB(c) + 3*PIXG(c) + 2*PIXR(c);
+ if(c<512)
+ vid[y*(XRES+BARSIZE)+x] = PIXPACK(0xC0C0C0);
+ else
+ vid[y*(XRES+BARSIZE)+x] = PIXPACK(0x404040);
+}
+
+void xor_line(int x1, int y1, int x2, int y2, pixel *vid)
+{
+ int cp=abs(y2-y1)>abs(x2-x1), x, y, dx, dy, sy;
+ float e, de;
+ if(cp)
+ {
+ y = x1;
+ x1 = y1;
+ y1 = y;
+ y = x2;
+ x2 = y2;
+ y2 = y;
+ }
+ if(x1 > x2)
+ {
+ y = x1;
+ x1 = x2;
+ x2 = y;
+ y = y1;
+ y1 = y2;
+ y2 = y;
+ }
+ dx = x2 - x1;
+ dy = abs(y2 - y1);
+ e = 0.0f;
+ if(dx)
+ de = dy/(float)dx;
+ else
+ de = 0.0f;
+ y = y1;
+ sy = (y1<y2) ? 1 : -1;
+ for(x=x1; x<=x2; x++)
+ {
+ if(cp)
+ xor_pixel(y, x, vid);
+ else
+ xor_pixel(x, y, vid);
+ e += de;
+ if(e >= 0.5f)
+ {
+ y += sy;
+ e -= 1.0f;
+ }
+ }
+}
+
+void xor_rect(pixel *vid, int x, int y, int w, int h)
+{
+ int i;
+ for(i=0; i<w; i+=2)
+ {
+ xor_pixel(x+i, y, vid);
+ xor_pixel(x+i, y+h-1, vid);
+ }
+ for(i=2; i<h; i+=2)
+ {
+ xor_pixel(x, y+i, vid);
+ xor_pixel(x+w-1, y+i, vid);
+ }
+}
+
+void draw_parts(pixel *vid)
+{
+ int i, x, y, t, nx, ny, r, s;
+ int cr, cg, cb;
+ float fr, fg, fb;
+ float pt = R_TEMP;
+ for(i = 0; i<NPART; i++) {
+#ifdef OpenGL
+ if(cmode == 6) //If fire mode
+ {
+
+ if(t==PT_MWAX)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,224,224,170,255);
+ else if (abs(y) != 0 && abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,224,224,170,20);
+ else
+ blendpixel(vid,x+nx,y+ny,224,224,170,40);
+ }
+ }
+
+ }
+
+ else if(t==PT_PLUT)
+ {
+ int tempx;
+ int tempy;
+ cr = 0x40;
+ cg = 0x70;
+ cb = 0x20;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ for(tempx = 2; tempx < 10; tempx++) {
+ for(tempy = 2; tempy < 10; tempy++) {
+ blendpixel(vid, nx+tempx, ny-tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx+tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny-tempy, cr, cg, cb, 5);
+ }
+ }
+ }
+ }
+ if(parts[i].type) {
+ //Do nothing
+ t = parts[i].type;
+ nx = (int)(parts[i].x+0.5f);
+ ny = (int)(parts[i].y+0.5f);
+ glBegin (GL_POINTS);
+ glColor3ub (PIXR(ptypes[t].pcolors), PIXG(ptypes[t].pcolors), PIXB(ptypes[t].pcolors));
+ glVertex2d (nx, ny);
+ glEnd ();
+ }
+#else
+ if(parts[i].type) {
+ t = parts[i].type;
+
+ nx = (int)(parts[i].x+0.5f);
+ ny = (int)(parts[i].y+0.5f);
+
+ if(cmode!=CM_HEAT)
+ {
+ if(t==PT_STKM) //Just draw head here
+ {
+ char buff[10]; //Buffer for HP
+
+ if(mousex>(nx-3) && mousex<(nx+3) && mousey<(ny+3) && mousey>(ny-3)) //If mous is in the head
+ {
+ sprintf(buff, "%3d", parts[i].life); //Show HP
+ drawtext(vid, mousex-8-2*(parts[i].life<100)-2*(parts[i].life<10), mousey-12, buff, 255, 255, 255, 255);
+ }
+
+ for(r=-2; r<=1; r++) //Here I use r variable not as I should, but I think you will excuse me :-p
+ {
+ s = XRES+BARSIZE;
+ vid[(ny-2)*s+nx+r] = ptypes[(int)player[2]].pcolors;
+ vid[(ny+2)*s+nx+r+1] = ptypes[(int)player[2]].pcolors;
+ vid[(ny+r+1)*s+nx-2] = ptypes[(int)player[2]].pcolors;
+ vid[(ny+r)*s+nx+2] = ptypes[(int)player[2]].pcolors;
+ }
+ draw_line(vid , nx, ny+3, player[3], player[4], 255, 255, 255, s);
+ draw_line(vid , player[3], player[4], player[7], player[8], 255, 255, 255, s);
+ draw_line(vid , nx, ny+3, player[11], player[12], 255, 255, 255, s);
+ draw_line(vid , player[11], player[12], player[15], player[16], 255, 255, 255, s);
+
+ isplayer = 1; //It's a secret. Tssss...
+ }
+ if(t==PT_MWAX&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,224,224,170,255);
+ else if (abs(y) != 0 && abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,224,224,170,20);
+ else
+ blendpixel(vid,x+nx,y+ny,224,224,170,40);
+ }
+ }
+
+ }
+ else if(t==PT_ACID)
+ {
+ if(parts[i].life>255) parts[i].life = 255;
+ if(parts[i].life<47) parts[i].life = 48;
+ s = (255/((parts[i].life-46)*28));
+ if(s==0) s = 1;
+ cr = PIXR(ptypes[t].pcolors)/s;
+ cg = PIXG(ptypes[t].pcolors)/s;
+ cb = PIXB(ptypes[t].pcolors)/s;
+ if(cmode==6) {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,cr,cg,cb,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,cr,cg,cb,40);
+ }
+ }
+ } else {
+ blendpixel(vid, nx, ny, cr, cg, cb, 255);
+ }
+
+ if(cmode==4)
+ {
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 223);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 223);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 223);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 223);
+
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 112);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 112);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 112);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 112);
+ }
+ }
+ else if(t==PT_OIL&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,64,64,16,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,64,64,16,40);
+ }
+ }
+ }
+ else if(t==PT_NEUT)
+ {
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ vid[ny*(XRES+BARSIZE)+nx] = ptypes[t].pcolors;
+ cg = 8;
+ cb = 12;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ else
+ {
+ cr = 0x20;
+ cg = 0xE0;
+ cb = 0xFF;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ } else if(t==PT_PLUT&&cmode == 6)
+ {
+ int tempx;
+ int tempy;
+ cr = 0x40;
+ cg = 0x70;
+ cb = 0x20;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ for(tempx = 2; tempx < 10; tempx++) {
+ for(tempy = 2; tempy < 10; tempy++) {
+ blendpixel(vid, nx+tempx, ny-tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx+tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny-tempy, cr, cg, cb, 5);
+ }
+ }
+ } else if(t==PT_URAN&&cmode == 6)
+ {
+ int tempx;
+ int tempy;
+ cr = 0x70;
+ cg = 0x70;
+ cb = 0x20;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ for(tempx = 2; tempx < 10; tempx++) {
+ for(tempy = 2; tempy < 10; tempy++) {
+ blendpixel(vid, nx+tempx, ny-tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx+tempx, ny+tempy, cr, cg, cb, 5);
+ blendpixel(vid, nx-tempx, ny-tempy, cr, cg, cb, 5);
+ }
+ }
+ } else if(t==PT_SLTW&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,64,80,240,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,64,80,240,50);
+ }
+ }
+ }
+ else if(t==PT_PHOT)
+ {
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cg = 0;
+ cb = 0;
+ cr = 0;
+ for(x=0; x<12; x++) {
+ cr += (parts[i].ctype >> (x+18)) & 1;
+ cb += (parts[i].ctype >> x) & 1;
+ }
+ for(x=0; x<14; x++)
+ cg += (parts[i].ctype >> (x+9)) & 1;
+ x = 624/(cr+cg+cb+1);
+ cr *= x;
+ cg *= x;
+ cb *= x;
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB(cr>255?255:cr,cg>255?255:cg,cb>255?255:cb);
+ cr >>= 4;
+ cg >>= 4;
+ cb >>= 4;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = 0xFF;
+ cg = 0xFF;
+ cb = 0xFF;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ }
+ else if(t==PT_SWCH && parts[i].life == 10)
+ {
+ x = nx;
+ y = ny;
+ blendpixel(vid,x,y,17,217,24,255);
+ }
+ else if(t==PT_LNTG&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,128,160,223,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,128,160,223,50);
+ }
+ }
+ }
+ else if(t==PT_SMKE)
+ {
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ x = nx/CELL;
+ y = ny/CELL;
+ cg = 10;
+ cb = 10;
+ cr = 10;
+ cg += fire_g[y][x];
+ if(cg > 50) cg = 50;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 50) cb = 50;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 50) cr = 50;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ for(x=-3; x<4; x++)
+ {
+ for(y=-3; y<4; y++)
+ {
+ if (abs(x)+abs(y) <2 && !(abs(x)==2||abs(y)==2))
+ blendpixel(vid,x+nx,y+ny,100,100,100,30);
+ if(abs(x)+abs(y) <=3 && abs(x)+abs(y))
+ blendpixel(vid,x+nx,y+ny,100,100,100,10);
+ if (abs(x)+abs(y) == 2)
+ blendpixel(vid,x+nx,y+ny,100,100,100,20);
+ }
+ }
+ }
+ }
+ else if(t==PT_WATR&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,32,48,208,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,32,48,208,50);
+ }
+ }
+
+ } else if(t==PT_DSTW&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,32,48,208,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,32,48,208,50);
+ }
+ }
+ }
+ else if(t==PT_NITR&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,32,224,16,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,32,224,16,50);
+ }
+ }
+
+ }
+ else if(t==PT_LRBD&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,170,170,170,100);
+ else if (abs(y) != 0 || abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,170,170,170,50);
+ }
+ }
+
+ }
+
+ else if(t==PT_NBLE&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,235,73,23,100);
+ else if (abs(y) != 0 && abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,235,73,23,30);
+ else
+ blendpixel(vid,x+nx,y+ny,235,73,23,50);
+ }
+ }
+
+ }
+ else if(t==PT_GAS&&cmode == 6)
+ {
+ for(x=-1; x<=1; x++)
+ {
+ for(y=-1; y<=1; y++)
+ {
+ if ((abs(x) == 0) && (abs(y) == 0))
+ blendpixel(vid,x+nx,y+ny,255,255,0,180);
+ else if (abs(y) != 0 && abs(x) != 0)
+ blendpixel(vid,x+nx,y+ny,255,255,0,50);
+ else
+ blendpixel(vid,x+nx,y+ny,255,255,0,80);
+ }
+ }
+
+ }
+ else if(t==PT_WTRV)
+ {
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ x = nx/CELL;
+ y = ny/CELL;
+ cg = PIXG(ptypes[t].pcolors)/3;
+ cb = PIXB(ptypes[t].pcolors)/3;
+ cr = PIXR(ptypes[t].pcolors)/3;
+ cg += fire_g[y][x];
+ if(cg > PIXG(ptypes[t].pcolors)/2) cg = PIXG(ptypes[t].pcolors)/2;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > PIXB(ptypes[t].pcolors)/2) cb = PIXB(ptypes[t].pcolors)/2;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > PIXR(ptypes[t].pcolors)/2) cr = PIXR(ptypes[t].pcolors)/2;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ for(x=-3; x<4; x++)
+ {
+ for(y=-3; y<4; y++)
+ {
+ if (abs(x)+abs(y) <2 && !(abs(x)==2||abs(y)==2))
+ blendpixel(vid,x+nx,y+ny, PIXR(ptypes[t].pcolors)/1.6, PIXG(ptypes[t].pcolors)/1.6, PIXB(ptypes[t].pcolors)/1.6, 30);
+ if(abs(x)+abs(y) <=3 && abs(x)+abs(y))
+ blendpixel(vid,x+nx,y+ny, PIXR(ptypes[t].pcolors)/1.6, PIXG(ptypes[t].pcolors)/1.6, PIXB(ptypes[t].pcolors)/1.6, 10);
+ if (abs(x)+abs(y) == 2)
+ blendpixel(vid,x+nx,y+ny, PIXR(ptypes[t].pcolors)/1.6, PIXG(ptypes[t].pcolors)/1.6, PIXB(ptypes[t].pcolors)/1.6, 20);
+ }
+ }
+ }
+ }
+ else if(t==PT_THDR)
+ {
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ vid[ny*(XRES+BARSIZE)+nx] = ptypes[t].pcolors;
+ cg = 16;
+ cb = 20;
+ cr = 12;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = 0xFF;
+ cg = 0xFF;
+ cb = 0xA0;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ }
+ else if(t==PT_GLOW)
+ {
+ fg = 0;
+ fb = 0;
+ fr = 0;
+ if(pv[ny/CELL][nx/CELL]>0) {
+ fg = 6 * pv[ny/CELL][nx/CELL];
+ fb = 4 * pv[ny/CELL][nx/CELL];
+ fr = 2 * pv[ny/CELL][nx/CELL];
+ }
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB((int)restrict_flt(0x44 + fr*8, 0, 255), (int)restrict_flt(0x88 + fg*8, 0, 255), (int)restrict_flt(0x44 + fb*8, 0, 255));
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ x = nx/CELL;
+ y = ny/CELL;
+ fg += fire_g[y][x];
+ if(fg > 255) fg = 255;
+ fire_g[y][x] = fg;
+ fb += fire_b[y][x];
+ if(fb > 255) fb = 255;
+ fire_b[y][x] = fb;
+ fr += fire_r[y][x];
+ if(fr > 255) fr = 255;
+ fire_r[y][x] = fr;
+ }
+ if(cmode == 4) {
+ uint8 R = (int)restrict_flt(0x44 + fr*8, 0, 255);
+ uint8 G = (int)restrict_flt(0x88 + fg*8, 0, 255);
+ uint8 B = (int)restrict_flt(0x44 + fb*8, 0, 255);
+
+ blendpixel(vid, nx+1, ny, R, G, B, 223);
+ blendpixel(vid, nx-1, ny, R, G, B, 223);
+ blendpixel(vid, nx, ny+1, R, G, B, 223);
+ blendpixel(vid, nx, ny-1, R, G, B, 223);
+
+ blendpixel(vid, nx+1, ny-1, R, G, B, 112);
+ blendpixel(vid, nx-1, ny-1, R, G, B, 112);
+ blendpixel(vid, nx+1, ny+1, R, G, B, 112);
+ blendpixel(vid, nx-1, ny+1, R, G, B, 112);
+ }
+ }
+ else if(t==PT_LCRY)
+ {
+ uint8 GR = 0x50+(parts[i].life*10);
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB(GR, GR, GR);
+ if(cmode == 4) {
+ blendpixel(vid, nx+1, ny, GR, GR, GR, 223);
+ blendpixel(vid, nx-1, ny, GR, GR, GR, 223);
+ blendpixel(vid, nx, ny+1, GR, GR, GR, 223);
+ blendpixel(vid, nx, ny-1, GR, GR, GR, 223);
+
+ blendpixel(vid, nx+1, ny-1, GR, GR, GR, 112);
+ blendpixel(vid, nx-1, ny-1, GR, GR, GR, 112);
+ blendpixel(vid, nx+1, ny+1, GR, GR, GR, 112);
+ blendpixel(vid, nx-1, ny+1, GR, GR, GR, 112);
+ }
+ }
+ else if(t==PT_PCLN)
+ {
+ uint8 GR = 0x3B+(parts[i].life*19);
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB(GR, GR, 10);
+ if(cmode == 4) {
+ blendpixel(vid, nx+1, ny, GR, GR, 10, 223);
+ blendpixel(vid, nx-1, ny, GR, GR, 10, 223);
+ blendpixel(vid, nx, ny+1, GR, GR, 10, 223);
+ blendpixel(vid, nx, ny-1, GR, GR, 10, 223);
+
+ blendpixel(vid, nx+1, ny-1, GR, GR, 10, 112);
+ blendpixel(vid, nx-1, ny-1, GR, GR, 10, 112);
+ blendpixel(vid, nx+1, ny+1, GR, GR, 10, 112);
+ blendpixel(vid, nx-1, ny+1, GR, GR, 10, 112);
+ }
+ }
+ else if(t==PT_HSWC)
+ {
+ uint8 GR = 0x3B+(parts[i].life*19);
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB(GR, 10, 10);
+ if(cmode == 4) {
+ blendpixel(vid, nx+1, ny, GR, 10, 10, 223);
+ blendpixel(vid, nx-1, ny, GR, 10, 10, 223);
+ blendpixel(vid, nx, ny+1, GR, 10, 10, 223);
+ blendpixel(vid, nx, ny-1, GR, 10, 10, 223);
+
+ blendpixel(vid, nx+1, ny-1, GR, 10, 10, 112);
+ blendpixel(vid, nx-1, ny-1, GR, 10, 10, 112);
+ blendpixel(vid, nx+1, ny+1, GR, 10, 10, 112);
+ blendpixel(vid, nx-1, ny+1, GR, 10, 10, 112);
+ }
+ }
+ else if(t==PT_PLSM)
+ {
+ float ttemp = (float)parts[i].life;
+ int caddress = restrict_flt(restrict_flt(ttemp, 0.0f, 200.0f)*3, 0.0f, (200.0f*3)-3);
+ uint8 R = plasma_data[caddress];
+ uint8 G = plasma_data[caddress+1];
+ uint8 B = plasma_data[caddress+2];
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr = R/8;
+ cg = G/8;
+ cb = B/8;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = R;
+ cg = G;
+ cb = B;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ } else if(t==PT_HFLM)
+ {
+ float ttemp = (float)parts[i].life;
+ int caddress = restrict_flt(restrict_flt(ttemp, 0.0f, 200.0f)*3, 0.0f, (200.0f*3)-3);
+ uint8 R = hflm_data[caddress];
+ uint8 G = hflm_data[caddress+1];
+ uint8 B = hflm_data[caddress+2];
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr = R/8;
+ cg = G/8;
+ cb = B/8;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = R;
+ cg = G;
+ cb = B;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ } else if(t==PT_FIRW&&parts[i].tmp>=3)
+ {
+ float ttemp = (float)parts[i].tmp-4;
+ int caddress = restrict_flt(restrict_flt(ttemp, 0.0f, 200.0f)*3, 0.0f, (200.0f*3)-3);
+ uint8 R = firw_data[caddress];
+ uint8 G = firw_data[caddress+1];
+ uint8 B = firw_data[caddress+2];
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr = R/2;
+ cg = G/2;
+ cb = B/2;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = R;
+ cg = G;
+ cb = B;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ }
+ else if(t==PT_FIRE && parts[i].life)
+ {
+ float ttemp = (float)parts[i].life;
+ int caddress = restrict_flt(restrict_flt(ttemp, 0.0f, 200.0f)*3, 0.0f, (200.0f*3)-3);
+ uint8 R = flm_data[caddress];
+ uint8 G = flm_data[caddress+1];
+ uint8 B = flm_data[caddress+2];
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr = R/8;
+ cg = G/8;
+ cb = B/8;
+ x = nx/CELL;
+ y = ny/CELL;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ }
+ else
+ {
+ cr = R;
+ cg = G;
+ cb = B;
+ blendpixel(vid, nx, ny, cr, cg, cb, 192);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }
+ // Older Code
+ /*if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr = parts[i].life / 4;
+ cg = parts[i].life / 16;
+ cb = parts[i].life / 32;
+ if(cr>255) cr = 255;
+ if(cg>192) cg = 212;
+ if(cb>128) cb = 192;
+ x = nx/CELL;
+ y = ny/CELL;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ else
+ {
+ cr = parts[i].life * 8;
+ cg = parts[i].life * 2;
+ cb = parts[i].life;
+ if(cr>255) cr = 255;
+ if(cg>192) cg = 212;
+ if(cb>128) cb = 192;
+ blendpixel(vid, nx, ny, cr, cg, cb, 255);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 96);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 96);
+ blendpixel(vid, nx+1, ny-1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx+1, ny+1, cr, cg, cb, 32);
+ blendpixel(vid, nx-1, ny-1, cr, cg, cb, 32);
+ }*/
+ }
+ else if(t==PT_LAVA && parts[i].life)
+ {
+ cr = parts[i].life * 2 + 0xE0;
+ cg = parts[i].life * 1 + 0x50;
+ cb = parts[i].life/2 + 0x10;
+ if(cr>255) cr = 255;
+ if(cg>192) cg = 192;
+ if(cb>128) cb = 128;
+ blendpixel(vid, nx, ny, cr, cg, cb, 255);
+ blendpixel(vid, nx+1, ny, cr, cg, cb, 64);
+ blendpixel(vid, nx-1, ny, cr, cg, cb, 64);
+ blendpixel(vid, nx, ny+1, cr, cg, cb, 64);
+ blendpixel(vid, nx, ny-1, cr, cg, cb, 64);
+ if(cmode == 3||cmode==4 || cmode==6)
+ {
+ cr /= 32;
+ cg /= 32;
+ cb /= 32;
+ x = nx/CELL;
+ y = ny/CELL;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ else if(t==PT_LAVA || t==PT_SPRK)
+ {
+ vid[ny*(XRES+BARSIZE)+nx] = ptypes[t].pcolors;
+ if(cmode == 3 || cmode==4 || cmode==6)
+ {
+ if(t == PT_LAVA)
+ {
+ cr = 3;
+ cg = i%2;
+ cb = 0;
+ }
+ else
+ {
+ cr = 8;
+ cg = 12;
+ cb = 16;
+ }
+ x = nx/CELL;
+ y = ny/CELL;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ else
+ vid[ny*(XRES+BARSIZE)+nx] = ptypes[t].pcolors;
+ }
+ else
+ {
+ float ttemp = parts[i].temp+(-MIN_TEMP);
+ int caddress = restrict_flt((int)( restrict_flt(ttemp, 0.0f, MAX_TEMP+(-MIN_TEMP)) / ((MAX_TEMP+(-MIN_TEMP))/1024) ) *3, 0.0f, (1024.0f*3)-3);
+ uint8 R = color_data[caddress];
+ uint8 G = color_data[caddress+1];
+ uint8 B = color_data[caddress+2];
+
+ if(t==PT_STKM) //Stick man should be visible in heat mode
+ {
+ char buff[10]; //Buffer for HP
+
+ if(mousex>(nx-3) && mousex<(nx+3) && mousey<(ny+3) && mousey>(ny-3)) //If mous is in the head
+ {
+ sprintf(buff, "%3d", parts[i].life); //Show HP
+ drawtext(vid, mousex-8-2*(parts[i].life<100)-2*(parts[i].life<10), mousey-12, buff, 255, 255, 255, 255);
+ }
+
+ for(r=-2; r<=1; r++)
+ {
+ s = XRES+BARSIZE;
+ vid[(ny-2)*s+nx+r] = PIXRGB (R, G, B);
+ vid[(ny+2)*s+nx+r+1] = PIXRGB (R, G, B);
+ vid[(ny+r+1)*s+nx-2] = PIXRGB (R, G, B);
+ vid[(ny+r)*s+nx+2] = PIXRGB (R, G, B);
+ }
+ draw_line(vid , nx, ny+3, player[3], player[4], R, G, B, s);
+ draw_line(vid , player[3], player[4], player[7], player[8], R, G, B, s);
+ draw_line(vid , nx, ny+3, player[11], player[12], R, G, B, s);
+ draw_line(vid , player[11], player[12], player[15], player[16], R, G, B, s);
+
+ isplayer = 1; //It's a secret. Tssss...
+ }
+ else
+ {
+ vid[ny*(XRES+BARSIZE)+nx] = PIXRGB(R, G, B);
+ //blendpixel(vid, nx+1, ny, R, G, B, 255);
+ }
+ }
+ if(cmode == 4&&t!=PT_FIRE&&t!=PT_PLSM&&t!=PT_HFLM&&t!=PT_NONE&&t!=PT_ACID&&t!=PT_LCRY&&t!=PT_GLOW&&t!=PT_SWCH&&t!=PT_SMKE&&t!=PT_WTRV&&!(t==PT_FIRW&&parts[i].tmp==3))
+ {
+ uint8 R = PIXR(ptypes[t].pcolors);
+ uint8 G = PIXG(ptypes[t].pcolors);
+ uint8 B = PIXB(ptypes[t].pcolors);
+
+ //if(vid[(ny-1)*YRES+(nx-1)]!=0){
+ // blendpixel(vid, nx, ny-1, R, G, B, 46);
+ //}
+
+ blendpixel(vid, nx+1, ny, R, G, B, 223);
+ blendpixel(vid, nx-1, ny, R, G, B, 223);
+ blendpixel(vid, nx, ny+1, R, G, B, 223);
+ blendpixel(vid, nx, ny-1, R, G, B, 223);
+
+ blendpixel(vid, nx+1, ny-1, R, G, B, 112);
+ blendpixel(vid, nx-1, ny-1, R, G, B, 112);
+ blendpixel(vid, nx+1, ny+1, R, G, B, 112);
+ blendpixel(vid, nx-1, ny+1, R, G, B, 112);
+ }
+ }
+#endif
+ }
+#ifdef OpenGL
+ glFlush ();
+#endif
+
+}
+
+void render_signs(pixel *vid_buf)
+{
+ int i, j, x, y, w, h, dx, dy;
+ char buff[30]; //Buffer
+ for(i=0; i<MAXSIGNS; i++)
+ if(signs[i].text[0])
+ {
+ get_sign_pos(i, &x, &y, &w, &h);
+ clearrect(vid_buf, x, y, w, h);
+ drawrect(vid_buf, x, y, w, h, 192, 192, 192, 255);
+
+ //Displaying special information
+ if(strcmp(signs[i].text, "{p}")==0)
+ {
+ sprintf(buff, "Pressure: %3.2f", pv[signs[i].y/CELL][signs[i].x/CELL]); //...pressure
+ drawtext(vid_buf, x+3, y+3, buff, 255, 255, 255, 255);
+ }
+
+ if(strcmp(signs[i].text, "{t}")==0)
+ {
+ if((pmap[signs[i].y][signs[i].x]>>8)>0 && (pmap[signs[i].y][signs[i].x]>>8)<NPART)
+ sprintf(buff, "Temp: %4.2f", parts[pmap[signs[i].y][signs[i].x]>>8].temp-273.15); //...tempirature
+ else
+ sprintf(buff, "Temp: 0.00"); //...tempirature
+ drawtext(vid_buf, x+3, y+3, buff, 255, 255, 255, 255);
+ }
+
+ //Usual text
+ if(strcmp(signs[i].text, "{p}") && strcmp(signs[i].text, "{t}"))
+ drawtext(vid_buf, x+3, y+3, signs[i].text, 255, 255, 255, 255);
+ x = signs[i].x;
+ y = signs[i].y;
+ dx = 1 - signs[i].ju;
+ dy = (signs[i].y > 18) ? -1 : 1;
+ for(j=0; j<4; j++)
+ {
+ drawpixel(vid_buf, x, y, 192, 192, 192, 255);
+ x+=dx;
+ y+=dy;
+ }
+ }
+}
+
+void render_fire(pixel *dst)
+{
+ int i,j,x,y,r,g,b;
+ for(j=0; j<YRES/CELL; j++)
+ for(i=0; i<XRES/CELL; i++)
+ {
+ r = fire_r[j][i];
+ g = fire_g[j][i];
+ b = fire_b[j][i];
+ if(r || g || b)
+ for(y=-CELL+1; y<2*CELL; y++)
+ for(x=-CELL+1; x<2*CELL; x++)
+ addpixel(dst, i*CELL+x, j*CELL+y, r, g, b, fire_alpha[y+CELL][x+CELL]);
+ for(y=-1; y<2; y++)
+ for(x=-1; x<2; x++)
+ if(i+x>=0 && j+y>=0 && i+x<XRES/CELL && j+y<YRES/CELL && (x || y))
+ {
+ r += fire_r[j+y][i+x] / 8;
+ g += fire_g[j+y][i+x] / 8;
+ b += fire_b[j+y][i+x] / 8;
+ }
+ r /= 2;
+ g /= 2;
+ b /= 2;
+ fire_r[j][i] = r>4 ? r-4 : 0;
+ fire_g[j][i] = g>4 ? g-4 : 0;
+ fire_b[j][i] = b>4 ? b-4 : 0;
+ }
+}
+
+void prepare_alpha(void)
+{
+ int x,y,i,j;
+ float temp[CELL*3][CELL*3];
+ memset(temp, 0, sizeof(temp));
+ for(x=0; x<CELL; x++)
+ for(y=0; y<CELL; y++)
+ for(i=-CELL; i<CELL; i++)
+ for(j=-CELL; j<CELL; j++)
+ temp[y+CELL+j][x+CELL+i] += expf(-0.1f*(i*i+j*j));
+ for(x=0; x<CELL*3; x++)
+ for(y=0; y<CELL*3; y++)
+ fire_alpha[y][x] = (int)(255.0f*temp[y][x]/(CELL*CELL));
+}
+
+pixel *render_packed_rgb(void *image, int width, int height, int cmp_size)
+{
+ unsigned char *tmp;
+ pixel *res;
+ int i;
+
+ tmp = malloc(width*height*3);
+ if(!tmp)
+ return NULL;
+ res = malloc(width*height*PIXELSIZE);
+ if(!res)
+ {
+ free(tmp);
+ return NULL;
+ }
+
+ i = width*height*3;
+ if(BZ2_bzBuffToBuffDecompress((char *)tmp, (unsigned *)&i, (char *)image, cmp_size, 0, 0))
+ {
+ free(res);
+ free(tmp);
+ return NULL;
+ }
+
+ for(i=0; i<width*height; i++)
+ res[i] = PIXRGB(tmp[3*i], tmp[3*i+1], tmp[3*i+2]);
+
+ free(tmp);
+ return res;
+}
+
+void draw_image(pixel *vid, pixel *img, int x, int y, int w, int h, int a)
+{
+ int i, j, r, g, b;
+ for(j=0; j<h; j++)
+ for(i=0; i<w; i++)
+ {
+ r = PIXR(*img);
+ g = PIXG(*img);
+ b = PIXB(*img);
+ drawpixel(vid, x+i, y+j, r, g, b, a);
+ img++;
+ }
+}
+
+void dim_copy(pixel *dst, pixel *src)
+{
+ int i,r,g,b;
+ for(i=0; i<XRES*YRES; i++)
+ {
+ r = PIXR(src[i]);
+ g = PIXG(src[i]);
+ b = PIXB(src[i]);
+ if(r>0)
+ r--;
+ if(g>0)
+ g--;
+ if(b>0)
+ b--;
+ dst[i] = PIXRGB(r,g,b);
+ }
+}
+
+void render_zoom(pixel *img)
+{
+ int x, y, i, j;
+ pixel pix;
+ drawrect(img, zoom_wx-2, zoom_wy-2, ZSIZE*ZFACTOR+2, ZSIZE*ZFACTOR+2, 192, 192, 192, 255);
+ drawrect(img, zoom_wx-1, zoom_wy-1, ZSIZE*ZFACTOR, ZSIZE*ZFACTOR, 0, 0, 0, 255);
+ clearrect(img, zoom_wx, zoom_wy, ZSIZE*ZFACTOR, ZSIZE*ZFACTOR);
+ for(j=0; j<ZSIZE; j++)
+ for(i=0; i<ZSIZE; i++)
+ {
+ pix = img[(j+zoom_y)*(XRES+BARSIZE)+(i+zoom_x)];
+ for(y=0; y<ZFACTOR-1; y++)
+ for(x=0; x<ZFACTOR-1; x++)
+ img[(j*ZFACTOR+y+zoom_wy)*(XRES+BARSIZE)+(i*ZFACTOR+x+zoom_wx)] = pix;
+ }
+ if(zoom_en)
+ {
+ for(j=-1; j<=ZSIZE; j++)
+ {
+ xor_pixel(zoom_x+j, zoom_y-1, img);
+ xor_pixel(zoom_x+j, zoom_y+ZSIZE, img);
+ }
+ for(j=0; j<ZSIZE; j++)
+ {
+ xor_pixel(zoom_x-1, zoom_y+j, img);
+ xor_pixel(zoom_x+ZSIZE, zoom_y+j, img);
+ }
+ }
+}
+
+pixel *prerender_save(void *save, int size, int *width, int *height)
+{
+ unsigned char *d,*c=save;
+ int i,j,k,x,y,rx,ry,p=0;
+ int bw,bh,w,h,new_format = 0;
+ pixel *fb;
+
+ if(size<16)
+ return NULL;
+ if(!(c[2]==0x43 && c[1]==0x75 && c[0]==0x66) && !(c[2]==0x76 && c[1]==0x53 && c[0]==0x50))
+ return NULL;
+ if(c[2]==0x43 && c[1]==0x75 && c[0]==0x66) {
+ new_format = 1;
+ }
+ if(c[4]>SAVE_VERSION)
+ return NULL;
+
+ bw = c[6];
+ bh = c[7];
+ w = bw*CELL;
+ h = bh*CELL;
+
+ if(c[5]!=CELL)
+ return NULL;
+
+ i = (unsigned)c[8];
+ i |= ((unsigned)c[9])<<8;
+ i |= ((unsigned)c[10])<<16;
+ i |= ((unsigned)c[11])<<24;
+ d = malloc(i);
+ if(!d)
+ return NULL;
+ fb = calloc(w*h, PIXELSIZE);
+ if(!fb)
+ {
+ free(d);
+ return NULL;
+ }
+
+ if(BZ2_bzBuffToBuffDecompress((char *)d, (unsigned *)&i, (char *)(c+12), size-12, 0, 0))
+ goto corrupt;
+ size = i;
+
+ if(size < bw*bh)
+ goto corrupt;
+
+ k = 0;
+ for(y=0; y<bh; y++)
+ for(x=0; x<bw; x++)
+ {
+ rx = x*CELL;
+ ry = y*CELL;
+ switch(d[p])
+ {
+ case 1:
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0x808080);
+ break;
+ case 2:
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0x808080);
+ break;
+ case 3:
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!(j%2) && !(i%2))
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0xC0C0C0);
+ break;
+ case 4:
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0x8080FF);
+ k++;
+ break;
+ case 6:
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0xFF8080);
+ break;
+ case 7:
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!(i&j&1))
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0x808080);
+ break;
+ case 8:
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!(j%2) && !(i%2))
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0xC0C0C0);
+ else
+ fb[(ry+j)*w+(rx+i)] = PIXPACK(0x808080);
+ break;
+ }
+ p++;
+ }
+ p += 2*k;
+ if(p>=size)
+ goto corrupt;
+
+ for(y=0; y<h; y++)
+ for(x=0; x<w; x++)
+ {
+ if(p >= size)
+ goto corrupt;
+ j=d[p++];
+ if(j<PT_NUM && j>0)
+ {
+ if(j==PT_STKM) //Stickman should be drawed another way
+ {
+ //Stickman drawing
+ for(k=-2; k<=1; k++)
+ {
+ fb[(y-2)*w+x+k] = PIXRGB(255, 224, 178);
+ fb[(y+2)*w+x+k+1] = PIXRGB(255, 224, 178);
+ fb[(y+k+1)*w+x-2] = PIXRGB(255, 224, 178);
+ fb[(y+k)*w+x+2] = PIXRGB(255, 224, 178);
+ }
+ draw_line(fb , x, y+3, x-1, y+6, 255, 255, 255, w);
+ draw_line(fb , x-1, y+6, x-3, y+12, 255, 255, 255, w);
+ draw_line(fb , x, y+3, x+1, y+6, 255, 255, 255, w);
+ draw_line(fb , x+1, y+6, x+3, y+12, 255, 255, 255, w);
+ }
+ else
+ fb[y*w+x] = ptypes[j].pcolors;
+ }
+ }
+
+ free(d);
+ *width = w;
+ *height = h;
+ return fb;
+
+corrupt:
+ free(d);
+ free(fb);
+ return NULL;
+}
+
+int render_thumb(void *thumb, int size, int bzip2, pixel *vid_buf, int px, int py, int scl)
+{
+ unsigned char *d,*c=thumb;
+ int i,j,x,y,a,t,r,g,b,sx,sy;
+
+ if(bzip2)
+ {
+ if(size<16)
+ return 1;
+ if(c[3]!=0x74 || c[2]!=0x49 || c[1]!=0x68 || c[0]!=0x53)
+ return 1;
+ if(c[4]>PT_NUM)
+ return 2;
+ if(c[5]!=CELL || c[6]!=XRES/CELL || c[7]!=YRES/CELL)
+ return 3;
+ i = XRES*YRES;
+ d = malloc(i);
+ if(!d)
+ return 1;
+
+ if(BZ2_bzBuffToBuffDecompress((char *)d, (unsigned *)&i, (char *)(c+8), size-8, 0, 0))
+ return 1;
+ size = i;
+ }
+ else
+ d = c;
+
+ if(size < XRES*YRES)
+ {
+ if(bzip2)
+ free(d);
+ return 1;
+ }
+
+ sy = 0;
+ for(y=0; y+scl<=YRES; y+=scl)
+ {
+ sx = 0;
+ for(x=0; x+scl<=XRES; x+=scl)
+ {
+ a = 0;
+ r = g = b = 0;
+ for(j=0; j<scl; j++)
+ for(i=0; i<scl; i++)
+ {
+ t = d[(y+j)*XRES+(x+i)];
+ if(t==0xFF)
+ {
+ r += 256;
+ g += 256;
+ b += 256;
+ a += 2;
+ }
+ else if(t)
+ {
+ if(t>=PT_NUM)
+ goto corrupt;
+ r += PIXR(ptypes[t].pcolors);
+ g += PIXG(ptypes[t].pcolors);
+ b += PIXB(ptypes[t].pcolors);
+ a ++;
+ }
+ }
+ if(a)
+ {
+ a = 256/a;
+ r = (r*a)>>8;
+ g = (g*a)>>8;
+ b = (b*a)>>8;
+ }
+
+ drawpixel(vid_buf, px+sx, py+sy, r, g, b, 255);
+ sx++;
+ }
+ sy++;
+ }
+
+ if(bzip2)
+ free(d);
+ return 0;
+
+corrupt:
+ if(bzip2)
+ free(d);
+ return 1;
+}
+
+void render_cursor(pixel *vid, int x, int y, int t, int r)
+{
+ int i,j,c;
+ if(t<PT_NUM||t==SPC_AIR||t==SPC_HEAT||t==SPC_COOL||t==SPC_VACUUM)
+ {
+ if(r<=0)
+ xor_pixel(x, y, vid);
+ else
+ for(j=0; j<=r; j++)
+ for(i=0; i<=r; i++)
+ if(i*i+j*j<=r*r && ((i+1)*(i+1)+j*j>r*r || i*i+(j+1)*(j+1)>r*r))
+ {
+ xor_pixel(x+i, y+j, vid);
+ if(j) xor_pixel(x+i, y-j, vid);
+ if(i) xor_pixel(x-i, y+j, vid);
+ if(i&&j) xor_pixel(x-i, y-j, vid);
+ }
+ }
+ else
+ {
+ int tc;
+ c = (r/CELL) * CELL;
+ x = (x/CELL) * CELL;
+ y = (y/CELL) * CELL;
+
+ tc = !((c%(CELL*2))==0);
+
+ x -= c/2;
+ y -= c/2;
+
+ x += tc*(CELL/2);
+ y += tc*(CELL/2);
+
+ for(i=0; i<CELL+c; i++)
+ {
+ xor_pixel(x+i, y, vid);
+ xor_pixel(x+i, y+CELL+c-1, vid);
+ }
+ for(i=1; i<CELL+c-1; i++)
+ {
+ xor_pixel(x, y+i, vid);
+ xor_pixel(x+CELL+c-1, y+i, vid);
+ }
+ }
+}
+
+void sdl_open(void)
+{
+ if(SDL_Init(SDL_INIT_VIDEO)<0)
+ {
+ fprintf(stderr, "Initializing SDL: %s\n", SDL_GetError());
+ exit(1);
+ }
+ atexit(SDL_Quit);
+#ifdef OpenGL
+ sdl_scrn=SDL_SetVideoMode(XRES*sdl_scale + BARSIZE*sdl_scale,YRES*sdl_scale + MENUSIZE*sdl_scale,32,SDL_OPENGL);
+ SDL_GL_SetAttribute (SDL_GL_DOUBLEBUFFER, 1);
+ Enable2D ();
+ // glBegin(GL_TRIANGLES);
+ // glColor3ub (255, 0, 0);
+ // glVertex2d (0, 0);
+ // glColor3ub (0, 255, 0);
+ // glVertex2d (640,0);
+ // glColor3ub (0, 0, 255);
+ // glVertex2d (50, 50);
+ //glEnd ();
+ //glFlush ();
+#else
+#ifdef PIX16
+ sdl_scrn=SDL_SetVideoMode(XRES*sdl_scale + BARSIZE*sdl_scale,YRES*sdl_scale + MENUSIZE*sdl_scale,16,SDL_SWSURFACE);
+#else
+ sdl_scrn=SDL_SetVideoMode(XRES*sdl_scale + BARSIZE*sdl_scale,YRES*sdl_scale + MENUSIZE*sdl_scale,32,SDL_SWSURFACE);
+#endif
+#endif
+ if(!sdl_scrn)
+ {
+ fprintf(stderr, "Creating window: %s\n", SDL_GetError());
+ exit(1);
+ }
+ SDL_WM_SetCaption("The Powder Toy", "Powder Toy");
+ sdl_seticon();
+ SDL_EnableUNICODE(1);
+ //SDL_EnableKeyRepeat(SDL_DEFAULT_REPEAT_DELAY, SDL_DEFAULT_REPEAT_INTERVAL);
+}
+
+#ifdef OpenGL
+void Enable2D ()
+{
+ int ViewPort[4]; //Holds screen info
+
+ glGetIntegerv (GL_VIEWPORT, ViewPort);
+
+ glMatrixMode (GL_PROJECTION);
+ glPushMatrix ();
+ glLoadIdentity ();
+
+ glOrtho (0, ViewPort[2], ViewPort[3], 0, -1, 1);
+ glMatrixMode (GL_MODELVIEW);
+ glPushMatrix ();
+ glLoadIdentity ();
+
+ glEnable (GL_BLEND);
+ glBlendFunc (GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);
+
+ glHint( GL_LINE_SMOOTH_HINT, GL_NICEST);
+ glHint( GL_POINT_SMOOTH_HINT, GL_NICEST);
+}
+void RenderScene ()
+{
+ SDL_GL_SwapBuffers ();
+}
+void ClearScreen()
+{
+ glClear(GL_COLOR_BUFFER_BIT);
+}
+#endif
diff --git a/src/http.c b/src/http.c
new file mode 100644
index 0000000..cc056c7
--- /dev/null
+++ b/src/http.c
@@ -0,0 +1,1051 @@
+/**
+ * Powder Toy - HTTP Library
+ *
+ * Copyright (c) 2008 - 2010 Stanislaw Skowronek.
+ * Copyright (c) 2010 Simon Robertshaw
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
+ */
+
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#ifndef MACOSX
+#include <malloc.h>
+#endif
+#include <time.h>
+#ifdef WIN32
+#define _WIN32_WINNT 0x0501
+//#include <iphlpapi.h>
+#include <winsock2.h>
+#include <ws2tcpip.h>
+#else
+#include <sys/types.h>
+#include <unistd.h>
+#include <errno.h>
+#include <fcntl.h>
+#include <signal.h>
+#include <sys/socket.h>
+#include <netdb.h>
+#endif
+
+#include <defines.h>
+#include <http.h>
+#include <md5.h>
+
+#ifdef WIN32
+#define PERROR SOCKET_ERROR
+#define PERRNO WSAGetLastError()
+#define PEAGAIN WSAEWOULDBLOCK
+#define PEINTR WSAEINTR
+#define PEINPROGRESS WSAEINPROGRESS
+#define PEALREADY WSAEALREADY
+#define PCLOSE closesocket
+#else
+#define PERROR -1
+#define PERRNO errno
+#define PEAGAIN EAGAIN
+#define PEINTR EINTR
+#define PEINPROGRESS EINPROGRESS
+#define PEALREADY EALREADY
+#define PCLOSE close
+#endif
+
+static int http_up = 0;
+static long http_timeout = 15;
+static int http_use_proxy = 0;
+static struct sockaddr_in http_proxy;
+
+static char *mystrdup(char *s)
+{
+ char *x;
+ if(s)
+ {
+ x = malloc(strlen(s)+1);
+ strcpy(x, s);
+ return x;
+ }
+ return s;
+}
+
+static int splituri(char *uri, char **host, char **path)
+{
+ char *p=uri,*q,*x,*y;
+ if(!strncmp(p, "http://", 7))
+ p += 7;
+ q = strchr(p, '/');
+ if(!q)
+ q = p + strlen(p);
+ x = malloc(q-p+1);
+ if(*q)
+ y = mystrdup(q);
+ else
+ y = mystrdup("/");
+ strncpy(x, p, q-p);
+ x[q-p] = 0;
+ if(q==p || x[q-p-1]==':')
+ {
+ free(x);
+ free(y);
+ return 1;
+ }
+ *host = x;
+ *path = y;
+ return 0;
+}
+
+static char *getserv(char *host)
+{
+ char *q, *x = mystrdup(host);
+ q = strchr(x, ':');
+ if(q)
+ *q = 0;
+ return x;
+}
+
+static char *getport(char *host)
+{
+ char *p, *q;
+ q = strchr(host, ':');
+ if(q)
+ p = mystrdup(q+1);
+ else
+ p = mystrdup("80");
+ return p;
+}
+
+static int resolve(char *dns, char *srv, struct sockaddr_in *addr)
+{
+ struct addrinfo hnt, *res = 0;
+ if(http_use_proxy)
+ {
+ memcpy(addr, &http_proxy, sizeof(struct sockaddr_in));
+ return 0;
+ }
+ memset(&hnt, 0, sizeof(hnt));
+ hnt.ai_family = AF_INET;
+ hnt.ai_socktype = SOCK_STREAM;
+ if(getaddrinfo(dns, srv, &hnt, &res))
+ return 1;
+ if(res)
+ {
+ if(res->ai_family != AF_INET)
+ {
+ freeaddrinfo(res);
+ return 1;
+ }
+ memcpy(addr, res->ai_addr, res->ai_addrlen);
+ freeaddrinfo(res);
+ return 0;
+ }
+ return 1;
+}
+
+void http_init(char *proxy)
+{
+ char *host, *port;
+#ifdef WIN32
+ WSADATA wsadata;
+ if(!WSAStartup(MAKEWORD(2,2), &wsadata))
+ http_up = 1;
+#else
+ signal(SIGPIPE, SIG_IGN);
+ http_up = 1;
+#endif
+ if(proxy)
+ {
+ host = getserv(proxy);
+ port = getport(proxy);
+ if(resolve(host, port, &http_proxy))
+ http_up = 0;
+ else
+ http_use_proxy = 1;
+ free(host);
+ free(port);
+ }
+}
+
+void http_done(void)
+{
+#ifdef WIN32
+ WSACleanup();
+#endif
+ http_up = 0;
+}
+
+#define CHUNK 4096
+
+#define HTS_STRT 0
+#define HTS_RSLV 1
+#define HTS_CONN 2
+#define HTS_IDLE 3
+#define HTS_XMIT 4
+#define HTS_RECV 5
+#define HTS_DONE 6
+struct http_ctx
+{
+ int state;
+ time_t last;
+ int keep;
+ int ret;
+ char *host, *path;
+ char *thdr;
+ int thlen;
+ char *txd;
+ int txdl;
+ struct sockaddr_in addr;
+ char *tbuf;
+ int tlen, tptr;
+ char *hbuf;
+ int hlen, hptr;
+ char *rbuf;
+ int rlen, rptr;
+ int chunked, chunkhdr, rxtogo, contlen, cclose;
+ int fd;
+ char *fdhost;
+};
+void *http_async_req_start(void *ctx, char *uri, char *data, int dlen, int keep)
+{
+ struct http_ctx *cx = ctx;
+ if(!ctx)
+ {
+ ctx = calloc(1, sizeof(struct http_ctx));
+ cx = ctx;
+ cx->fd = PERROR;
+ }
+
+ if(!cx->hbuf)
+ {
+ cx->hbuf = malloc(256);
+ cx->hlen = 256;
+ }
+
+ if(!http_up)
+ {
+ cx->ret = 604;
+ cx->state = HTS_DONE;
+ return ctx;
+ }
+
+ if(cx->state!=HTS_STRT && cx->state!=HTS_IDLE)
+ {
+ fprintf(stderr, "HTTP: unclean request restart state.\n");
+ exit(1);
+ }
+
+ cx->keep = keep;
+ cx->ret = 600;
+ if(splituri(uri, &cx->host, &cx->path))
+ {
+ cx->ret = 601;
+ cx->state = HTS_DONE;
+ return ctx;
+ }
+ if(http_use_proxy)
+ {
+ free(cx->path);
+ cx->path = mystrdup(uri);
+ }
+ if(cx->fdhost && strcmp(cx->host, cx->fdhost))
+ {
+ free(cx->fdhost);
+ cx->fdhost = NULL;
+ PCLOSE(cx->fd);
+ cx->fd = PERROR;
+ cx->state = HTS_STRT;
+ }
+ if(data)
+ {
+ if(!dlen)
+ dlen = strlen(data);
+ cx->txd = malloc(dlen);
+ memcpy(cx->txd, data, dlen);
+ cx->txdl = dlen;
+ }
+ else
+ cx->txdl = 0;
+
+ cx->contlen = 0;
+ cx->chunked = 0;
+ cx->chunkhdr = 0;
+ cx->rxtogo = 0;
+ cx->cclose = 0;
+
+ cx->tptr = 0;
+ cx->tlen = 0;
+
+ cx->last = time(NULL);
+
+ return ctx;
+}
+
+void http_async_add_header(void *ctx, char *name, char *data)
+{
+ struct http_ctx *cx = ctx;
+ cx->thdr = realloc(cx->thdr, cx->thlen + strlen(name) + strlen(data) + 4);
+ cx->thlen += sprintf(cx->thdr+cx->thlen, "%s: %s\n", name, data);
+}
+
+static void process_header(struct http_ctx *cx, char *str)
+{
+ char *p;
+ if(cx->chunkhdr)
+ {
+ p = strchr(str, ';');
+ if(p)
+ *p = 0;
+ cx->rxtogo = strtoul(str, NULL, 16);
+ cx->chunkhdr = 0;
+ if(!cx->rxtogo)
+ cx->chunked = 0;
+ }
+ if(!str[0])
+ {
+ cx->rxtogo = cx->contlen;
+ cx->chunkhdr = cx->chunked;
+ if(!cx->contlen && !cx->chunked && cx->ret!=100)
+ cx->state = HTS_DONE;
+ return;
+ }
+ if(!strncmp(str, "HTTP/", 5))
+ {
+ p = strchr(str, ' ');
+ if(!p)
+ {
+ cx->ret = 603;
+ cx->state = HTS_DONE;
+ return;
+ }
+ p++;
+ cx->ret = atoi(p);
+ return;
+ }
+ if(!strncmp(str, "Content-Length: ", 16))
+ {
+ cx->contlen = atoi(str+16);
+ return;
+ }
+ if(!strcmp(str, "Transfer-Encoding: chunked"))
+ {
+ cx->chunked = 1;
+ return;
+ }
+ if(!strcmp(str, "Connection: close"))
+ {
+ cx->cclose = 1;
+ return;
+ }
+}
+
+static void process_byte(struct http_ctx *cx, char ch)
+{
+ if(cx->rxtogo)
+ {
+ cx->rxtogo--;
+
+ if(!cx->rbuf)
+ {
+ cx->rbuf = malloc(256);
+ cx->rlen = 256;
+ }
+ if(cx->rptr >= cx->rlen-1)
+ {
+ cx->rlen *= 2;
+ cx->rbuf = realloc(cx->rbuf, cx->rlen);
+ }
+ cx->rbuf[cx->rptr++] = ch;
+
+ if(!cx->rxtogo && !cx->chunked)
+ cx->state = HTS_DONE;
+ }
+ else
+ {
+ if(ch == '\n')
+ {
+ cx->hbuf[cx->hptr] = 0;
+ process_header(cx, cx->hbuf);
+ cx->hptr = 0;
+ }
+ else if(ch != '\r')
+ {
+ if(cx->hptr >= cx->hlen-1)
+ {
+ cx->hlen *= 2;
+ cx->hbuf = realloc(cx->hbuf, cx->hlen);
+ }
+ cx->hbuf[cx->hptr++] = ch;
+ }
+ }
+}
+
+int http_async_req_status(void *ctx)
+{
+ struct http_ctx *cx = ctx;
+ char *dns,*srv,buf[CHUNK];
+ int tmp, i;
+ time_t now = time(NULL);
+#ifdef WIN32
+ unsigned long tmp2;
+#endif
+
+ switch(cx->state)
+ {
+ case HTS_STRT:
+ dns = getserv(cx->host);
+ srv = getport(cx->host);
+ if(resolve(dns, srv, &cx->addr))
+ {
+ free(dns);
+ free(srv);
+ cx->state = HTS_DONE;
+ cx->ret = 602;
+ return 1;
+ }
+ free(dns);
+ free(srv);
+ cx->state = HTS_RSLV;
+ return 0;
+ case HTS_RSLV:
+ cx->state = HTS_CONN;
+ cx->last = now;
+ return 0;
+ case HTS_CONN:
+ if(cx->fd == PERROR)
+ {
+ cx->fd = socket(AF_INET, SOCK_STREAM, 0);
+ if(cx->fd == PERROR)
+ goto fail;
+ cx->fdhost = mystrdup(cx->host);
+#ifdef WIN32
+ tmp2 = 1;
+ if(ioctlsocket(cx->fd, FIONBIO, &tmp2) == SOCKET_ERROR)
+ goto fail;
+#else
+ tmp = fcntl(cx->fd, F_GETFL);
+ if(tmp < 0)
+ goto fail;
+ if(fcntl(cx->fd, F_SETFL, tmp|O_NONBLOCK) < 0)
+ goto fail;
+#endif
+ }
+ if(!connect(cx->fd, (struct sockaddr *)&cx->addr, sizeof(cx->addr)))
+ cx->state = HTS_IDLE;
+#ifdef WIN32
+ else if(PERRNO==WSAEISCONN)
+ cx->state = HTS_IDLE;
+#endif
+#ifdef MACOSX
+ else if(PERRNO==EISCONN)
+ cx->state = HTS_IDLE;
+#endif
+ else if(PERRNO!=PEINPROGRESS && PERRNO!=PEALREADY
+#ifdef WIN32
+ && PERRNO!=PEAGAIN && PERRNO!=WSAEINVAL
+#endif
+ )
+ goto fail;
+ if(now-cx->last>http_timeout)
+ goto timeout;
+ return 0;
+ case HTS_IDLE:
+ if(cx->txdl)
+ {
+ // generate POST
+ cx->tbuf = malloc(strlen(cx->host) + strlen(cx->path) + 121 + cx->txdl + cx->thlen);
+ cx->tptr = 0;
+ cx->tlen = 0;
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "POST %s HTTP/1.1\n", cx->path);
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "Host: %s\n", cx->host);
+ if(!cx->keep)
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "Connection: close\n");
+ if(cx->thdr)
+ {
+ memcpy(cx->tbuf+cx->tlen, cx->thdr, cx->thlen);
+ cx->tlen += cx->thlen;
+ free(cx->thdr);
+ cx->thdr = NULL;
+ cx->thlen = 0;
+ }
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "Content-Length: %d\n", cx->txdl);
+#ifdef BETA
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "X-Powder-Version: %s%dB%d\n", IDENT_VERSION, SAVE_VERSION, MINOR_VERSION);
+#else
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "X-Powder-Version: %s%dS%d\n", IDENT_VERSION, SAVE_VERSION, MINOR_VERSION);
+#endif
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "\n");
+ memcpy(cx->tbuf+cx->tlen, cx->txd, cx->txdl);
+ cx->tlen += cx->txdl;
+ free(cx->txd);
+ cx->txd = NULL;
+ cx->txdl = 0;
+ }
+ else
+ {
+ // generate GET
+ cx->tbuf = malloc(strlen(cx->host) + strlen(cx->path) + 89 + cx->thlen);
+ cx->tptr = 0;
+ cx->tlen = 0;
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "GET %s HTTP/1.1\n", cx->path);
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "Host: %s\n", cx->host);
+ if(cx->thdr)
+ {
+ memcpy(cx->tbuf+cx->tlen, cx->thdr, cx->thlen);
+ cx->tlen += cx->thlen;
+ free(cx->thdr);
+ cx->thdr = NULL;
+ cx->thlen = 0;
+ }
+ if(!cx->keep)
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "Connection: close\n");
+#ifdef BETA
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "X-Powder-Version: %s%dB%d\n", IDENT_VERSION, SAVE_VERSION, MINOR_VERSION);
+#else
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "X-Powder-Version: %s%dS%d\n", IDENT_VERSION, SAVE_VERSION, MINOR_VERSION);
+#endif
+ cx->tlen += sprintf(cx->tbuf+cx->tlen, "\n");
+ }
+ cx->state = HTS_XMIT;
+ cx->last = now;
+ return 0;
+ case HTS_XMIT:
+ tmp = send(cx->fd, cx->tbuf+cx->tptr, cx->tlen-cx->tptr, 0);
+ if(tmp==PERROR && PERRNO!=PEAGAIN && PERRNO!=PEINTR)
+ goto fail;
+ if(tmp!=PERROR)
+ {
+ cx->tptr += tmp;
+ if(cx->tptr == cx->tlen)
+ {
+ cx->tptr = 0;
+ cx->tlen = 0;
+ if(cx->tbuf)
+ free(cx->tbuf);
+ cx->state = HTS_RECV;
+ }
+ cx->last = now;
+ }
+ if(now-cx->last>http_timeout)
+ goto timeout;
+ return 0;
+ case HTS_RECV:
+ tmp = recv(cx->fd, buf, CHUNK, 0);
+ if(tmp==PERROR && PERRNO!=PEAGAIN && PERRNO!=PEINTR)
+ goto fail;
+ if(tmp!=PERROR)
+ {
+ for(i=0; i<tmp; i++)
+ {
+ process_byte(cx, buf[i]);
+ if(cx->state == HTS_DONE)
+ return 1;
+ }
+ cx->last = now;
+ }
+ if(now-cx->last>http_timeout)
+ goto timeout;
+ return 0;
+ case HTS_DONE:
+ return 1;
+ }
+ return 0;
+
+fail:
+ cx->ret = 600;
+ cx->state = HTS_DONE;
+ return 1;
+
+timeout:
+ cx->ret = 605;
+ cx->state = HTS_DONE;
+ return 1;
+}
+
+char *http_async_req_stop(void *ctx, int *ret, int *len)
+{
+ struct http_ctx *cx = ctx;
+ char *rxd;
+
+ if(cx->state != HTS_DONE)
+ while(!http_async_req_status(ctx)) ;
+
+ if(cx->host)
+ {
+ free(cx->host);
+ cx->host = NULL;
+ }
+ if(cx->path)
+ {
+ free(cx->path);
+ cx->path = NULL;
+ }
+ if(cx->txd)
+ {
+ free(cx->txd);
+ cx->txd = NULL;
+ cx->txdl = 0;
+ }
+ if(cx->hbuf)
+ {
+ free(cx->hbuf);
+ cx->hbuf = NULL;
+ }
+ if(cx->thdr)
+ {
+ free(cx->thdr);
+ cx->thdr = NULL;
+ cx->thlen = 0;
+ }
+
+ if(ret)
+ *ret = cx->ret;
+ if(len)
+ *len = cx->rptr;
+ if(cx->rbuf)
+ cx->rbuf[cx->rptr] = 0;
+ rxd = cx->rbuf;
+ cx->rbuf = NULL;
+ cx->rlen = 0;
+ cx->rptr = 0;
+ cx->contlen = 0;
+
+ if(!cx->keep)
+ http_async_req_close(ctx);
+ else if(cx->cclose)
+ {
+ PCLOSE(cx->fd);
+ cx->fd = PERROR;
+ if(cx->fdhost)
+ {
+ free(cx->fdhost);
+ cx->fdhost = NULL;
+ }
+ cx->state = HTS_STRT;
+ }
+ else
+ cx->state = HTS_IDLE;
+
+ return rxd;
+}
+
+void http_async_get_length(void *ctx, int *total, int *done)
+{
+ struct http_ctx *cx = ctx;
+ if(done)
+ *done = cx->rptr;
+ if(total)
+ *total = cx->contlen;
+}
+
+void http_async_req_close(void *ctx)
+{
+ struct http_ctx *cx = ctx;
+ void *tmp;
+ if(cx->host)
+ {
+ cx->keep = 1;
+ tmp = http_async_req_stop(ctx, NULL, NULL);
+ if(tmp)
+ free(tmp);
+ }
+ if(cx->fdhost)
+ free(cx->fdhost);
+ PCLOSE(cx->fd);
+ free(ctx);
+}
+
+char *http_simple_get(char *uri, int *ret, int *len)
+{
+ void *ctx = http_async_req_start(NULL, uri, NULL, 0, 0);
+ if(!ctx)
+ {
+ if(ret)
+ *ret = 600;
+ if(len)
+ *len = 0;
+ return NULL;
+ }
+ return http_async_req_stop(ctx, ret, len);
+}
+static char hex[] = "0123456789abcdef";
+void http_auth_headers(void *ctx, char *user, char *pass)
+{
+ char *tmp;
+ int i;
+ unsigned char hash[16];
+ unsigned int m;
+ struct md5_context md5;
+
+ if(user)
+ {
+ http_async_add_header(ctx, "X-Auth-User", user);
+ if(pass)
+ {
+ md5_init(&md5);
+ md5_update(&md5, (unsigned char *)user, strlen(user));
+ md5_update(&md5, (unsigned char *)"-", 1);
+ m = 0;
+
+ md5_update(&md5, (unsigned char *)pass, strlen(pass));
+ md5_final(hash, &md5);
+ tmp = malloc(33);
+ for(i=0; i<16; i++)
+ {
+ tmp[i*2] = hex[hash[i]>>4];
+ tmp[i*2+1] = hex[hash[i]&15];
+ }
+ tmp[32] = 0;
+ http_async_add_header(ctx, "X-Auth-Hash", tmp);
+ free(tmp);
+ }
+ }
+}
+char *http_auth_get(char *uri, char *user, char *pass, int *ret, int *len)
+{
+ void *ctx = http_async_req_start(NULL, uri, NULL, 0, 0);
+
+ if(!ctx)
+ {
+ if(ret)
+ *ret = 600;
+ if(len)
+ *len = 0;
+ return NULL;
+ }
+ return http_async_req_stop(ctx, ret, len);
+}
+
+char *http_simple_post(char *uri, char *data, int dlen, int *ret, int *len)
+{
+ void *ctx = http_async_req_start(NULL, uri, data, dlen, 0);
+ if(!ctx)
+ {
+ if(ret)
+ *ret = 600;
+ if(len)
+ *len = 0;
+ return NULL;
+ }
+ return http_async_req_stop(ctx, ret, len);
+}
+
+char *http_ret_text(int ret)
+{
+ switch(ret)
+ {
+ case 100:
+ return "Continue";
+ case 101:
+ return "Switching Protocols";
+ case 102:
+ return "Processing";
+
+ case 200:
+ return "OK";
+ case 201:
+ return "Created";
+ case 202:
+ return "Accepted";
+ case 203:
+ return "Non-Authoritative Information";
+ case 204:
+ return "No Content";
+ case 205:
+ return "Reset Content";
+ case 206:
+ return "Partial Content";
+ case 207:
+ return "Multi-Status";
+
+ case 300:
+ return "Multiple Choices";
+ case 301:
+ return "Moved Permanently";
+ case 302:
+ return "Found";
+ case 303:
+ return "See Other";
+ case 304:
+ return "Not Modified";
+ case 305:
+ return "Use Proxy";
+ case 306:
+ return "Switch Proxy";
+ case 307:
+ return "Temporary Redirect";
+
+ case 400:
+ return "Bad Request";
+ case 401:
+ return "Unauthorized";
+ case 402:
+ return "Payment Required";
+ case 403:
+ return "Forbidden";
+ case 404:
+ return "Not Found";
+ case 405:
+ return "Method Not Allowed";
+ case 406:
+ return "Not Acceptable";
+ case 407:
+ return "Proxy Authentication Required";
+ case 408:
+ return "Request Timeout";
+ case 409:
+ return "Conflict";
+ case 410:
+ return "Gone";
+ case 411:
+ return "Length Required";
+ case 412:
+ return "Precondition Failed";
+ case 413:
+ return "Request Entity Too Large";
+ case 414:
+ return "Request URI Too Long";
+ case 415:
+ return "Unsupported Media Type";
+ case 416:
+ return "Requested Range Not Satisfiable";
+ case 417:
+ return "Expectation Failed";
+ case 422:
+ return "Unprocessable Entity";
+ case 423:
+ return "Locked";
+ case 424:
+ return "Failed Dependency";
+ case 425:
+ return "Unordered Collection";
+ case 426:
+ return "Upgrade Required";
+
+ case 500:
+ return "Internal Server Error";
+ case 501:
+ return "Not Implemented";
+ case 502:
+ return "Bad Gateway";
+ case 503:
+ return "Service Unavailable";
+ case 504:
+ return "Gateway Timeout";
+ case 505:
+ return "HTTP Version Not Supported";
+ case 506:
+ return "Variant Also Negotiates";
+ case 507:
+ return "Insufficient Storage";
+ case 509:
+ return "Bandwidth Limit Exceeded";
+ case 510:
+ return "Not Extended";
+
+ case 600:
+ return "Internal Client Error";
+ case 601:
+ return "Unsupported Protocol";
+ case 602:
+ return "Server Not Found";
+ case 603:
+ return "Malformed Response";
+ case 604:
+ return "Network Not Available";
+ case 605:
+ return "Request Timed Out";
+ default:
+ return "Unknown Status Code";
+ }
+}
+char *http_multipart_post(char *uri, char **names, char **parts, int *plens, char *user, char *pass, int *ret, int *len)
+{
+ void *ctx;
+ char *data = NULL, *tmp, *p;
+ int dlen = 0, i, j;
+ unsigned char hash[16];
+ unsigned char boundary[32], ch;
+ int blen = 0;
+ unsigned int map[62], m;
+ struct md5_context md5;
+ //struct md5_context md52;
+ int own_plen = 0;
+
+ if(names)
+ {
+ if(!plens)
+ {
+ own_plen = 1;
+ for(i=0; names[i]; i++) ;
+ plens = calloc(i, sizeof(int));
+ for(i=0; names[i]; i++)
+ plens[i] = strlen(parts[i]);
+ }
+
+retry:
+ if(blen >= 31)
+ goto fail;
+ memset(map, 0, 62*sizeof(int));
+ for(i=0; names[i]; i++)
+ {
+ for(j=0; j<plens[i]-blen; j++)
+ if(!blen || !memcmp(parts[i]+j, boundary, blen))
+ {
+ ch = parts[i][j+blen];
+ if(ch>='0' && ch<='9')
+ map[ch-'0']++;
+ else if(ch>='A' && ch<='Z')
+ map[ch-'A'+10]++;
+ else if(ch>='a' && ch<='z')
+ map[ch-'a'+36]++;
+ }
+ }
+ m = ~0;
+ j = 61;
+ for(i=0; i<62; i++)
+ if(map[i]<m)
+ {
+ m = map[i];
+ j = i;
+ }
+ if(j<10)
+ boundary[blen] = '0'+j;
+ else if(j<36)
+ boundary[blen] = 'A'+(j-10);
+ else
+ boundary[blen] = 'a'+(j-36);
+ blen++;
+ if(map[j])
+ goto retry;
+ boundary[blen] = 0;
+
+ for(i=0; names[i]; i++)
+ dlen += blen+strlen(names[i])+plens[i]+128;
+ dlen += blen+8;
+ data = malloc(dlen);
+ dlen = 0;
+ for(i=0; names[i]; i++)
+ {
+ dlen += sprintf(data+dlen, "--%s\r\n", boundary);
+ dlen += sprintf(data+dlen, "Content-transfer-encoding: binary\r\n");
+ if(strchr(names[i], ':'))
+ {
+ tmp = mystrdup(names[i]);
+ p = strchr(tmp, ':');
+ *p = 0;
+ dlen += sprintf(data+dlen, "content-disposition: form-data; name=\"%s\"; ", tmp);
+ free(tmp);
+ p = strchr(names[i], ':');
+ dlen += sprintf(data+dlen, "filename=\"%s\"\r\n\r\n", p+1);
+ }
+ else
+ dlen += sprintf(data+dlen, "content-disposition: form-data; name=\"%s\"\r\n\r\n", names[i]);
+ memcpy(data+dlen, parts[i], plens[i]);
+ dlen += plens[i];
+ dlen += sprintf(data+dlen, "\r\n");
+ }
+ dlen += sprintf(data+dlen, "--%s--\r\n", boundary);
+ }
+
+ ctx = http_async_req_start(NULL, uri, data, dlen, 0);
+ if(!ctx)
+ goto fail;
+
+ if(user)
+ {
+ http_async_add_header(ctx, "X-Auth-User", user);
+ if(pass)
+ {
+ md5_init(&md5);
+ md5_update(&md5, (unsigned char *)user, strlen(user));
+ md5_update(&md5, (unsigned char *)"-", 1);
+ m = 0;
+ if(names)
+ {
+ for(i=0; names[i]; i++)
+ {
+ //md5_update(&md5, (unsigned char *)parts[i], plens[i]); //WHY?
+ //md5_update(&md5, (unsigned char *)"-", 1);
+ p = strchr(names[i], ':');
+ if(p)
+ m += (p - names[i]) + 1;
+ else
+ m += strlen(names[i])+1;
+ }
+
+ tmp = malloc(m);
+ m = 0;
+ for(i=0; names[i]; i++)
+ {
+ p = strchr(names[i], ':');
+ if(m)
+ {
+ tmp[m] = ' ';
+ m ++;
+ }
+ if(p)
+ {
+ memcpy(tmp+m, names[i], p-names[i]);
+ m += p - names[i];
+ }
+ else
+ {
+ strcpy(tmp+m, names[i]);
+ m += strlen(names[i]);
+ }
+ }
+ tmp[m] = 0;
+ http_async_add_header(ctx, "X-Auth-Objects", tmp);
+ free(tmp);
+ }
+
+ md5_update(&md5, (unsigned char *)pass, strlen(pass));
+ md5_final(hash, &md5);
+ tmp = malloc(33);
+ for(i=0; i<16; i++)
+ {
+ tmp[i*2] = hex[hash[i]>>4];
+ tmp[i*2+1] = hex[hash[i]&15];
+ }
+ tmp[32] = 0;
+ http_async_add_header(ctx, "X-Auth-Hash", tmp);
+ free(tmp);
+ }
+ }
+
+ if(data)
+ {
+ tmp = malloc(32+strlen((char *)boundary));
+ sprintf(tmp, "multipart/form-data, boundary=%s", boundary);
+ http_async_add_header(ctx, "Content-type", tmp);
+ free(tmp);
+ free(data);
+ }
+
+ if(own_plen)
+ free(plens);
+ return http_async_req_stop(ctx, ret, len);
+
+fail:
+ if(data)
+ free(data);
+ if(own_plen)
+ free(plens);
+ if(ret)
+ *ret = 600;
+ if(len)
+ *len = 0;
+ return NULL;
+}
diff --git a/src/interface.c b/src/interface.c
new file mode 100644
index 0000000..bdec111
--- /dev/null
+++ b/src/interface.c
@@ -0,0 +1,2961 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <bzlib.h>
+#include <math.h>
+#include <time.h>
+#include <http.h>
+#include <md5.h>
+#include <font.h>
+#include <defines.h>
+#include <powder.h>
+#include <interface.h>
+#include <misc.h>
+
+SDLMod sdl_mod;
+int sdl_key, sdl_wheel, sdl_caps=0, sdl_ascii, sdl_zoom_trig=0;
+
+char *shift_0="`1234567890-=[]\\;',./";
+char *shift_1="~!@#$%^&*()_+{}|:\"<>?";
+
+int svf_login = 0;
+int svf_admin = 0;
+int svf_mod = 0;
+char svf_user[64] = "";
+char svf_pass[64] = "";
+
+int svf_open = 0;
+int svf_own = 0;
+int svf_myvote = 0;
+int svf_publish = 0;
+char svf_id[16] = "";
+char svf_name[64] = "";
+char svf_tags[256] = "";
+void *svf_last = NULL;
+int svf_lsize;
+
+char *search_ids[GRID_X*GRID_Y];
+char *search_dates[GRID_X*GRID_Y];
+int search_votes[GRID_X*GRID_Y];
+int search_publish[GRID_X*GRID_Y];
+int search_scoredown[GRID_X*GRID_Y];
+int search_scoreup[GRID_X*GRID_Y];
+char *search_names[GRID_X*GRID_Y];
+char *search_owners[GRID_X*GRID_Y];
+void *search_thumbs[GRID_X*GRID_Y];
+int search_thsizes[GRID_X*GRID_Y];
+
+int search_own = 0;
+int search_date = 0;
+int search_page = 0;
+char search_expr[256] = "";
+
+char *tag_names[TAG_MAX];
+int tag_votes[TAG_MAX];
+
+int Z_keysym = 'z';
+
+int zoom_en = 0;
+int zoom_x=(XRES-ZSIZE_D)/2, zoom_y=(YRES-ZSIZE_D)/2;
+int zoom_wx=0, zoom_wy=0;
+unsigned char ZFACTOR = 256/ZSIZE_D;
+unsigned char ZSIZE = ZSIZE_D;
+
+void menu_count(void)
+{
+ int i=0;
+ msections[SC_WALL].itemcount = UI_WALLCOUNT-4;
+ msections[SC_SPECIAL].itemcount = 4;
+ for(i=0; i<PT_NUM; i++)
+ {
+ msections[ptypes[i].menusection].itemcount+=ptypes[i].menu;
+ }
+
+}
+
+void get_sign_pos(int i, int *x0, int *y0, int *w, int *h)
+{
+ //Changing width if sign have special content
+ if(strcmp(signs[i].text, "{p}")==0)
+ *w = textwidth("Pressure: -000.00");
+
+ if(strcmp(signs[i].text, "{t}")==0)
+ *w = textwidth("Temp: 0000.00");
+
+ //Ususal width
+ if(strcmp(signs[i].text, "{p}") && strcmp(signs[i].text, "{t}"))
+ *w = textwidth(signs[i].text) + 5;
+ *h = 14;
+ *x0 = (signs[i].ju == 2) ? signs[i].x - *w :
+ (signs[i].ju == 1) ? signs[i].x - *w/2 : signs[i].x;
+ *y0 = (signs[i].y > 18) ? signs[i].y - 18 : signs[i].y + 4;
+}
+
+void add_sign_ui(pixel *vid_buf, int mx, int my)
+{
+ int i, w, h, x, y, nm=0, ju;
+ int x0=(XRES-192)/2,y0=(YRES-80)/2,b=1,bq;
+ ui_edit ed;
+
+ // check if it is an existing sign
+ for(i=0; i<MAXSIGNS; i++)
+ if(signs[i].text[0])
+ {
+ get_sign_pos(i, &x, &y, &w, &h);
+ if(mx>=x && mx<=x+w && my>=y && my<=y+h)
+ break;
+ }
+ // else look for empty spot
+ if(i >= MAXSIGNS)
+ {
+ nm = 1;
+ for(i=0; i<MAXSIGNS; i++)
+ if(!signs[i].text[0])
+ break;
+ }
+ if(i >= MAXSIGNS)
+ return;
+
+ if(nm)
+ {
+ signs[i].x = mx;
+ signs[i].y = my;
+ signs[i].ju = 1;
+ }
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ ed.x = x0+25;
+ ed.y = y0+25;
+ ed.w = 158;
+ ed.nx = 1;
+ ed.def = "[message]";
+ ed.focus = 1;
+ ed.hide = 0;
+ ed.cursor = strlen(signs[i].text);
+ strcpy(ed.str, signs[i].text);
+ ju = signs[i].ju;
+
+ fillrect(vid_buf, -1, -1, XRES, YRES+MENUSIZE, 0, 0, 0, 192);
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ drawrect(vid_buf, x0, y0, 192, 80, 192, 192, 192, 255);
+ clearrect(vid_buf, x0, y0, 192, 80);
+ drawtext(vid_buf, x0+8, y0+8, nm ? "New sign:" : "Edit sign:", 255, 255, 255, 255);
+ drawtext(vid_buf, x0+12, y0+23, "\xA1", 32, 64, 128, 255);
+ drawtext(vid_buf, x0+12, y0+23, "\xA0", 255, 255, 255, 255);
+ drawrect(vid_buf, x0+8, y0+20, 176, 16, 192, 192, 192, 255);
+ ui_edit_draw(vid_buf, &ed);
+ drawtext(vid_buf, x0+8, y0+46, "Justify:", 255, 255, 255, 255);
+ draw_icon(vid_buf, x0+50, y0+42, 0x9D, ju == 0);
+ draw_icon(vid_buf, x0+68, y0+42, 0x9E, ju == 1);
+ draw_icon(vid_buf, x0+86, y0+42, 0x9F, ju == 2);
+
+ if(!nm)
+ {
+ drawtext(vid_buf, x0+138, y0+45, "\x86", 160, 48, 32, 255);
+ drawtext(vid_buf, x0+138, y0+45, "\x85", 255, 255, 255, 255);
+ drawtext(vid_buf, x0+152, y0+46, "Delete", 255, 255, 255, 255);
+ drawrect(vid_buf, x0+134, y0+42, 50, 15, 255, 255, 255, 255);
+ }
+
+ drawtext(vid_buf, x0+5, y0+69, "OK", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+64, 192, 16, 192, 192, 192, 255);
+
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ ui_edit_process(mx, my, b, &ed);
+
+ if(b && !bq && mx>=x0+50 && mx<=x0+67 && my>=y0+42 && my<=y0+59)
+ ju = 0;
+ if(b && !bq && mx>=x0+68 && mx<=x0+85 && my>=y0+42 && my<=y0+59)
+ ju = 1;
+ if(b && !bq && mx>=x0+86 && mx<=x0+103 && my>=y0+42 && my<=y0+59)
+ ju = 2;
+
+ if(b && !bq && mx>=x0+9 && mx<x0+23 && my>=y0+22 && my<y0+36)
+ break;
+ if(b && !bq && mx>=x0 && mx<x0+192 && my>=y0+64 && my<=y0+80)
+ break;
+
+ if(!nm && b && !bq && mx>=x0+134 && my>=y0+42 && mx<=x0+184 && my<=y0+59)
+ {
+ signs[i].text[0] = 0;
+ return;
+ }
+
+ if(sdl_key==SDLK_RETURN)
+ break;
+ if(sdl_key==SDLK_ESCAPE)
+ {
+ if(!ed.focus)
+ return;
+ ed.focus = 0;
+ }
+ }
+
+ strcpy(signs[i].text, ed.str);
+ signs[i].ju = ju;
+}
+
+void ui_edit_draw(pixel *vid_buf, ui_edit *ed)
+{
+ int cx, i;
+ char echo[256], *str;
+
+ if(ed->hide)
+ {
+ for(i=0; ed->str[i]; i++)
+ echo[i] = 0x8D;
+ echo[i] = 0;
+ str = echo;
+ }
+ else
+ str = ed->str;
+
+ if(ed->str[0])
+ {
+ drawtext(vid_buf, ed->x, ed->y, str, 255, 255, 255, 255);
+ drawtext(vid_buf, ed->x+ed->w-11, ed->y-1, "\xAA", 128, 128, 128, 255);
+ }
+ else if(!ed->focus)
+ drawtext(vid_buf, ed->x, ed->y, ed->def, 128, 128, 128, 255);
+ if(ed->focus)
+ {
+ cx = textnwidth(str, ed->cursor);
+ for(i=-3; i<9; i++)
+ drawpixel(vid_buf, ed->x+cx, ed->y+i, 255, 255, 255, 255);
+ }
+}
+
+void ui_edit_process(int mx, int my, int mb, ui_edit *ed)
+{
+ char ch, ts[2], echo[256], *str;
+ int l, i;
+#ifdef RAWINPUT
+ char *p;
+#endif
+
+ if(mb)
+ {
+ if(ed->hide)
+ {
+ for(i=0; ed->str[i]; i++)
+ echo[i] = 0x8D;
+ echo[i] = 0;
+ str = echo;
+ }
+ else
+ str = ed->str;
+
+ if(mx>=ed->x+ed->w-11 && mx<ed->x+ed->w && my>=ed->y-5 && my<ed->y+11)
+ {
+ ed->focus = 1;
+ ed->cursor = 0;
+ ed->str[0] = 0;
+ }
+ else if(mx>=ed->x-ed->nx && mx<ed->x+ed->w && my>=ed->y-5 && my<ed->y+11)
+ {
+ ed->focus = 1;
+ ed->cursor = textwidthx(str, mx-ed->x);
+ }
+ else
+ ed->focus = 0;
+ }
+ if(ed->focus && sdl_key)
+ {
+ if(ed->hide)
+ {
+ for(i=0; ed->str[i]; i++)
+ echo[i] = 0x8D;
+ echo[i] = 0;
+ str = echo;
+ }
+ else
+ str = ed->str;
+
+ l = strlen(ed->str);
+ switch(sdl_key)
+ {
+ case SDLK_HOME:
+ ed->cursor = 0;
+ break;
+ case SDLK_END:
+ ed->cursor = l;
+ break;
+ case SDLK_LEFT:
+ if(ed->cursor > 0)
+ ed->cursor --;
+ break;
+ case SDLK_RIGHT:
+ if(ed->cursor < l)
+ ed->cursor ++;
+ break;
+ case SDLK_DELETE:
+ if(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL))
+ ed->str[ed->cursor] = 0;
+ else if(ed->cursor < l)
+ memmove(ed->str+ed->cursor, ed->str+ed->cursor+1, l-ed->cursor);
+ break;
+ case SDLK_BACKSPACE:
+ if(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL))
+ {
+ if(ed->cursor > 0)
+ memmove(ed->str, ed->str+ed->cursor, l-ed->cursor+1);
+ ed->cursor = 0;
+ }
+ else if(ed->cursor > 0)
+ {
+ ed->cursor--;
+ memmove(ed->str+ed->cursor, ed->str+ed->cursor+1, l-ed->cursor);
+ }
+ break;
+ default:
+#ifdef RAWINPUT
+ if(sdl_key>=SDLK_SPACE && sdl_key<=SDLK_z && l<255)
+ {
+ ch = sdl_key;
+ if((sdl_mod & (KMOD_LSHIFT|KMOD_RSHIFT|KMOD_CAPS)))
+ {
+ if(ch>='a' && ch<='z')
+ ch &= ~0x20;
+ p = strchr(shift_0, ch);
+ if(p)
+ ch = shift_1[p-shift_0];
+ }
+ ts[0]=ed->hide?0x8D:ch;
+ ts[1]=0;
+ if(textwidth(str)+textwidth(ts) > ed->w-14)
+ break;
+ memmove(ed->str+ed->cursor+1, ed->str+ed->cursor, l+1-ed->cursor);
+ ed->str[ed->cursor] = ch;
+ ed->cursor++;
+ }
+#else
+ if(sdl_ascii>=' ' && sdl_ascii<127)
+ {
+ ch = sdl_ascii;
+ ts[0]=ed->hide?0x8D:ch;
+ ts[1]=0;
+ if(textwidth(str)+textwidth(ts) > ed->w-14)
+ break;
+ memmove(ed->str+ed->cursor+1, ed->str+ed->cursor, l+1-ed->cursor);
+ ed->str[ed->cursor] = ch;
+ ed->cursor++;
+ }
+#endif
+ break;
+ }
+ }
+}
+
+void ui_checkbox_draw(pixel *vid_buf, ui_checkbox *ed)
+{
+ int w = 12;
+ if(ed->checked)
+ {
+ drawtext(vid_buf, ed->x+2, ed->y+2, "\xCF", 128, 128, 128, 255);
+ }
+ if(ed->focus)
+ {
+ drawrect(vid_buf, ed->x, ed->y, w, w, 255, 255, 255, 255);
+ }
+ else
+ {
+ drawrect(vid_buf, ed->x, ed->y, w, w, 128, 128, 128, 255);
+ }
+}
+
+void ui_checkbox_process(int mx, int my, int mb, int mbq, ui_checkbox *ed)
+{
+ int w = 12;
+
+ if(mb && !mbq)
+ {
+ if(mx>=ed->x && mx<=ed->x+w && my>=ed->y && my<=ed->y+w)
+ {
+ ed->checked = (ed->checked)?0:1;
+ }
+ }
+ else
+ {
+ if(mx>=ed->x && mx<=ed->x+w && my>=ed->y && my<=ed->y+w)
+ {
+ ed->focus = 1;
+ }
+ else
+ {
+ ed->focus = 0;
+ }
+ }
+}
+
+void draw_svf_ui(pixel *vid_buf)
+{
+ int c;
+
+ drawtext(vid_buf, 4, YRES+(MENUSIZE-14), "\x81", 255, 255, 255, 255);
+ drawrect(vid_buf, 1, YRES+(MENUSIZE-16), 16, 14, 255, 255, 255, 255);
+
+ c = svf_open ? 255 : 128;
+ drawtext(vid_buf, 23, YRES+(MENUSIZE-14), "\x91", c, c, c, 255);
+ drawrect(vid_buf, 19, YRES+(MENUSIZE-16), 16, 14, c, c, c, 255);
+
+ c = svf_login ? 255 : 128;
+ drawtext(vid_buf, 40, YRES+(MENUSIZE-14), "\x82", c, c, c, 255);
+ if(svf_open)
+ drawtext(vid_buf, 58, YRES+(MENUSIZE-12), svf_name, c, c, c, 255);
+ else
+ drawtext(vid_buf, 58, YRES+(MENUSIZE-12), "[untitled simulation]", c, c, c, 255);
+ drawrect(vid_buf, 37, YRES+(MENUSIZE-16), 150, 14, c, c, c, 255);
+ if(svf_open && svf_own)
+ drawdots(vid_buf, 55, YRES+(MENUSIZE-15), 12, c, c, c, 255);
+
+ c = (svf_login && svf_open) ? 255 : 128;
+
+ drawrect(vid_buf, 189, YRES+(MENUSIZE-16), 14, 14, c, c, c, 255);
+ drawrect(vid_buf, 203, YRES+(MENUSIZE-16), 14, 14, c, c, c, 255);
+
+ if(svf_myvote==1 && (svf_login && svf_open))
+ {
+ fillrect(vid_buf, 189, YRES+(MENUSIZE-16), 14, 14, 0, 108, 10, 255);
+ }
+ else if(svf_myvote==-1 && (svf_login && svf_open))
+ {
+ fillrect(vid_buf, 203, YRES+(MENUSIZE-16), 14, 14, 108, 10, 0, 255);
+ }
+
+ drawtext(vid_buf, 192, YRES+(MENUSIZE-12), "\xCB", 0, 187, 18, c);
+ drawtext(vid_buf, 205, YRES+(MENUSIZE-14), "\xCA", 187, 40, 0, c);
+
+ drawtext(vid_buf, 222, YRES+(MENUSIZE-15), "\x83", c, c, c, 255);
+ if(svf_tags[0])
+ drawtextmax(vid_buf, 240, YRES+(MENUSIZE-12), 154, svf_tags, c, c, c, 255);
+ else
+ drawtext(vid_buf, 240, YRES+(MENUSIZE-12), "[no tags set]", c, c, c, 255);
+
+ drawrect(vid_buf, 219, YRES+(MENUSIZE-16), XRES+BARSIZE-380, 14, c, c, c, 255);
+
+ drawtext(vid_buf, XRES-139+BARSIZE/*371*/, YRES+(MENUSIZE-14), "\x92", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-143+BARSIZE/*367*/, YRES+(MENUSIZE-16), 16, 14, 255, 255, 255, 255);
+
+ drawtext(vid_buf, XRES-122+BARSIZE/*388*/, YRES+(MENUSIZE-13), "\x84", 255, 255, 255, 255);
+ if(svf_login)
+ drawtext(vid_buf, XRES-104+BARSIZE/*406*/, YRES+(MENUSIZE-12), svf_user, 255, 255, 255, 255);
+ else
+ drawtext(vid_buf, XRES-104+BARSIZE/*406*/, YRES+(MENUSIZE-12), "[sign in]", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-125+BARSIZE/*385*/, YRES+(MENUSIZE-16), 91, 14, 255, 255, 255, 255);
+
+ if(sys_pause)
+ {
+ fillrect(vid_buf, XRES-17+BARSIZE/*493*/, YRES+(MENUSIZE-17), 16, 16, 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-14+BARSIZE/*496*/, YRES+(MENUSIZE-14), "\x90", 0, 0, 0, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES-14+BARSIZE/*496*/, YRES+(MENUSIZE-14), "\x90", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-16+BARSIZE/*494*/, YRES+(MENUSIZE-16), 14, 14, 255, 255, 255, 255);
+ }
+
+ if(!legacy_enable)
+ {
+ fillrect(vid_buf, XRES-160+BARSIZE/*493*/, YRES+(MENUSIZE-17), 16, 16, 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-154+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBE", 255, 0, 0, 255);
+ drawtext(vid_buf, XRES-154+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBD", 0, 0, 0, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES-154+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBD", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-159+BARSIZE/*494*/, YRES+(MENUSIZE-16), 14, 14, 255, 255, 255, 255);
+ }
+
+ switch(cmode)
+ {
+ case 0:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\x98", 128, 160, 255, 255);
+ break;
+ case 1:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\x99", 255, 212, 32, 255);
+ break;
+ case 2:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\x9A", 212, 212, 212, 255);
+ break;
+ case 3:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\x9B", 255, 0, 0, 255);
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\x9C", 255, 255, 64, 255);
+ break;
+ case 4:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBF", 55, 255, 55, 255);
+ break;
+ case 5:
+ drawtext(vid_buf, XRES-27+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBE", 255, 0, 0, 255);
+ drawtext(vid_buf, XRES-27+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xBD", 255, 255, 255, 255);
+ break;
+ case 6:
+ drawtext(vid_buf, XRES-29+BARSIZE/*481*/, YRES+(MENUSIZE-13), "\xC4", 100, 150, 255, 255);
+ break;
+ }
+ drawrect(vid_buf, XRES-32+BARSIZE/*478*/, YRES+(MENUSIZE-16), 14, 14, 255, 255, 255, 255);
+
+ if(svf_admin)
+ {
+ drawtext(vid_buf, XRES-45+BARSIZE/*463*/, YRES+(MENUSIZE-14), "\xC9", 232, 127, 35, 255);
+ drawtext(vid_buf, XRES-45+BARSIZE/*463*/, YRES+(MENUSIZE-14), "\xC7", 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-45+BARSIZE/*463*/, YRES+(MENUSIZE-14), "\xC8", 255, 255, 255, 255);
+ }
+ else if(svf_mod)
+ {
+ drawtext(vid_buf, XRES-45+BARSIZE/*463*/, YRES+(MENUSIZE-14), "\xC9", 35, 127, 232, 255);
+ drawtext(vid_buf, XRES-45+BARSIZE/*463*/, YRES+(MENUSIZE-14), "\xC7", 255, 255, 255, 255);
+ }//else if(amd)
+ // drawtext(vid_buf, XRES-45/*465*/, YRES+(MENUSIZE-15), "\x97", 0, 230, 153, 255); Why is this here?
+}
+
+void error_ui(pixel *vid_buf, int err, char *txt)
+{
+ int x0=(XRES-240)/2,y0=(YRES-MENUSIZE)/2,b=1,bq,mx,my;
+ char *msg;
+
+ msg = malloc(strlen(txt)+16);
+ if(err)
+ sprintf(msg, "%03d %s", err, txt);
+ else
+ sprintf(msg, "%s", txt);
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ clearrect(vid_buf, x0-2, y0-2, 244, 64);
+ drawrect(vid_buf, x0, y0, 240, 60, 192, 192, 192, 255);
+ if(err)
+ drawtext(vid_buf, x0+8, y0+8, "HTTP error:", 255, 64, 32, 255);
+ else
+ drawtext(vid_buf, x0+8, y0+8, "Error:", 255, 64, 32, 255);
+ drawtext(vid_buf, x0+8, y0+26, msg, 255, 255, 255, 255);
+ drawtext(vid_buf, x0+5, y0+49, "Dismiss", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+44, 240, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ if(b && !bq && mx>=x0 && mx<x0+240 && my>=y0+44 && my<=y0+60)
+ break;
+
+ if(sdl_key==SDLK_RETURN)
+ break;
+ if(sdl_key==SDLK_ESCAPE)
+ break;
+ }
+
+ free(msg);
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+}
+
+void info_ui(pixel *vid_buf, char *top, char *txt)
+{
+ int x0=(XRES-240)/2,y0=(YRES-MENUSIZE)/2,b=1,bq,mx,my;
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ clearrect(vid_buf, x0-2, y0-2, 244, 64);
+ drawrect(vid_buf, x0, y0, 240, 60, 192, 192, 192, 255);
+ drawtext(vid_buf, x0+8, y0+8, top, 160, 160, 255, 255);
+ drawtext(vid_buf, x0+8, y0+26, txt, 255, 255, 255, 255);
+ drawtext(vid_buf, x0+5, y0+49, "OK", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+44, 240, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ if(b && !bq && mx>=x0 && mx<x0+240 && my>=y0+44 && my<=y0+60)
+ break;
+
+ if(sdl_key==SDLK_RETURN)
+ break;
+ if(sdl_key==SDLK_ESCAPE)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+}
+
+void info_box(pixel *vid_buf, char *msg)
+{
+ int w = textwidth(msg)+16;
+ int x0=(XRES-w)/2,y0=(YRES-24)/2;
+
+ clearrect(vid_buf, x0-2, y0-2, w+4, 28);
+ drawrect(vid_buf, x0, y0, w, 24, 192, 192, 192, 255);
+ drawtext(vid_buf, x0+8, y0+8, msg, 192, 192, 240, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+}
+
+int confirm_ui(pixel *vid_buf, char *top, char *msg, char *btn)
+{
+ int x0=(XRES-240)/2,y0=(YRES-MENUSIZE)/2,b=1,bq,mx,my;
+ int ret = 0;
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ clearrect(vid_buf, x0-2, y0-2, 244, 64);
+ drawrect(vid_buf, x0, y0, 240, 60, 192, 192, 192, 255);
+ drawtext(vid_buf, x0+8, y0+8, top, 255, 216, 32, 255);
+ drawtext(vid_buf, x0+8, y0+26, msg, 255, 255, 255, 255);
+ drawtext(vid_buf, x0+5, y0+49, "Cancel", 255, 255, 255, 255);
+ drawtext(vid_buf, x0+165, y0+49, btn, 255, 216, 32, 255);
+ drawrect(vid_buf, x0, y0+44, 160, 16, 192, 192, 192, 255);
+ drawrect(vid_buf, x0+160, y0+44, 80, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ if(b && !bq && mx>=x0+160 && mx<x0+240 && my>=y0+44 && my<=y0+60)
+ {
+ ret = 1;
+ break;
+ }
+ if(b && !bq && mx>=x0 && mx<x0+160 && my>=y0+44 && my<=y0+60)
+ break;
+
+ if(sdl_key==SDLK_RETURN)
+ {
+ ret = 1;
+ break;
+ }
+ if(sdl_key==SDLK_ESCAPE)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ return ret;
+}
+
+void login_ui(pixel *vid_buf)
+{
+ int x0=(XRES-192)/2,y0=(YRES-80)/2,b=1,bq,mx,my,err;
+ ui_edit ed1,ed2;
+ char *res;
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ ed1.x = x0+25;
+ ed1.y = y0+25;
+ ed1.w = 158;
+ ed1.nx = 1;
+ ed1.def = "[user name]";
+ ed1.focus = 1;
+ ed1.hide = 0;
+ ed1.cursor = strlen(svf_user);
+ strcpy(ed1.str, svf_user);
+ ed2.x = x0+25;
+ ed2.y = y0+45;
+ ed2.w = 158;
+ ed2.nx = 1;
+ ed2.def = "[password]";
+ ed2.focus = 0;
+ ed2.hide = 1;
+ ed2.cursor = 0;
+ strcpy(ed2.str, "");
+
+ fillrect(vid_buf, -1, -1, XRES, YRES+MENUSIZE, 0, 0, 0, 192);
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ drawrect(vid_buf, x0, y0, 192, 80, 192, 192, 192, 255);
+ clearrect(vid_buf, x0, y0, 192, 80);
+ drawtext(vid_buf, x0+8, y0+8, "Server login:", 255, 255, 255, 255);
+ drawtext(vid_buf, x0+12, y0+23, "\x8B", 32, 64, 128, 255);
+ drawtext(vid_buf, x0+12, y0+23, "\x8A", 255, 255, 255, 255);
+ drawrect(vid_buf, x0+8, y0+20, 176, 16, 192, 192, 192, 255);
+ drawtext(vid_buf, x0+11, y0+44, "\x8C", 160, 144, 32, 255);
+ drawtext(vid_buf, x0+11, y0+44, "\x84", 255, 255, 255, 255);
+ drawrect(vid_buf, x0+8, y0+40, 176, 16, 192, 192, 192, 255);
+ ui_edit_draw(vid_buf, &ed1);
+ ui_edit_draw(vid_buf, &ed2);
+ drawtext(vid_buf, x0+5, y0+69, "Sign in", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+64, 192, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ ui_edit_process(mx, my, b, &ed1);
+ ui_edit_process(mx, my, b, &ed2);
+
+ if(b && !bq && mx>=x0+9 && mx<x0+23 && my>=y0+22 && my<y0+36)
+ break;
+ if(b && !bq && mx>=x0+9 && mx<x0+23 && my>=y0+42 && my<y0+46)
+ break;
+ if(b && !bq && mx>=x0 && mx<x0+192 && my>=y0+64 && my<=y0+80)
+ break;
+
+ if(sdl_key==SDLK_RETURN || sdl_key==SDLK_TAB)
+ {
+ if(!ed1.focus)
+ break;
+ ed1.focus = 0;
+ ed2.focus = 1;
+ }
+ if(sdl_key==SDLK_ESCAPE)
+ {
+ if(!ed1.focus && !ed2.focus)
+ return;
+ ed1.focus = 0;
+ ed2.focus = 0;
+ }
+ }
+
+ strcpy(svf_user, ed1.str);
+ md5_ascii(svf_pass, (unsigned char *)ed2.str, 0);
+
+ res = http_multipart_post(
+ "http://" SERVER "/Login.api",
+ NULL, NULL, NULL,
+ svf_user, svf_pass,
+ &err, NULL);
+ if(err != 200)
+ {
+ error_ui(vid_buf, err, http_ret_text(err));
+ if(res)
+ free(res);
+ goto fail;
+ }
+ if(res && !strncmp(res, "OK", 2))
+ {
+ if(!strcmp(res, "OK ADMIN"))
+ {
+ svf_admin = 1;
+ svf_mod = 0;
+ }
+ else if(!strcmp(res, "OK MOD"))
+ {
+ svf_admin = 0;
+ svf_mod = 1;
+ }
+ else
+ {
+ svf_admin = 0;
+ svf_mod = 0;
+ }
+ free(res);
+ svf_login = 1;
+ return;
+ }
+ if(!res)
+ res = mystrdup("Unspecified Error");
+ error_ui(vid_buf, 0, res);
+ free(res);
+
+fail:
+ strcpy(svf_user, "");
+ strcpy(svf_pass, "");
+ svf_login = 0;
+ svf_own = 0;
+ svf_admin = 0;
+ svf_mod = 0;
+}
+
+int stamp_ui(pixel *vid_buf)
+{
+ int b=1,bq,mx,my,d=-1,i,j,k,x,gx,gy,y,w,h,r=-1,stamp_page=0,per_page=STAMP_X*STAMP_Y,page_count;
+ char page_info[64];
+ page_count = ceil((float)stamp_count/(float)per_page);
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ clearrect(vid_buf, -1, -1, XRES+1, YRES+MENUSIZE+1);
+ k = stamp_page*per_page;//0;
+ r = -1;
+ d = -1;
+ for(j=0; j<GRID_Y; j++)
+ for(i=0; i<GRID_X; i++)
+ {
+ if(stamps[k].name[0] && stamps[k].thumb)
+ {
+ gx = ((XRES/GRID_X)*i) + (XRES/GRID_X-XRES/GRID_S)/2;
+ gy = ((((YRES-MENUSIZE+20)+15)/GRID_Y)*j) + ((YRES-MENUSIZE+20)/GRID_Y-(YRES-MENUSIZE+20)/GRID_S+10)/2 + 18;
+ x = (XRES*i)/GRID_X + XRES/(GRID_X*2);
+ y = (YRES*j)/GRID_Y + YRES/(GRID_Y*2);
+ gy -= 20;
+ w = stamps[k].thumb_w;
+ h = stamps[k].thumb_h;
+ x -= w/2;
+ y -= h/2;
+ draw_image(vid_buf, stamps[k].thumb, gx+(((XRES/GRID_S)/2)-(w/2)), gy+(((YRES/GRID_S)/2)-(h/2)), w, h, 255);
+ xor_rect(vid_buf, gx+(((XRES/GRID_S)/2)-(w/2)), gy+(((YRES/GRID_S)/2)-(h/2)), w, h);
+ if(mx>=gx+XRES/GRID_S-4 && mx<(gx+XRES/GRID_S)+6 && my>=gy-6 && my<gy+4)
+ {
+ d = k;
+ drawrect(vid_buf, gx-2, gy-2, XRES/GRID_S+3, YRES/GRID_S+3, 128, 128, 128, 255);
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x86", 255, 48, 32, 255);
+ }
+ else
+ {
+ if(mx>=gx && mx<gx+(XRES/GRID_S) && my>=gy && my<gy+(YRES/GRID_S))
+ {
+ r = k;
+ drawrect(vid_buf, gx-2, gy-2, XRES/GRID_S+3, YRES/GRID_S+3, 128, 128, 210, 255);
+ }
+ else
+ {
+ drawrect(vid_buf, gx-2, gy-2, XRES/GRID_S+3, YRES/GRID_S+3, 128, 128, 128, 255);
+ }
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x86", 150, 48, 32, 255);
+ }
+ drawtext(vid_buf, gx+XRES/(GRID_S*2)-textwidth(stamps[k].name)/2, gy+YRES/GRID_S+7, stamps[k].name, 192, 192, 192, 255);
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x85", 255, 255, 255, 255);
+ }
+ k++;
+ }
+
+ sprintf(page_info, "Page %d of %d", stamp_page+1, page_count);
+
+ drawtext(vid_buf, (XRES/2)-(textwidth(page_info)/2), YRES+MENUSIZE-14, page_info, 255, 255, 255, 255);
+
+ if(stamp_page)
+ {
+ drawtext(vid_buf, 4, YRES+MENUSIZE-14, "\x96", 255, 255, 255, 255);
+ drawrect(vid_buf, 1, YRES+MENUSIZE-18, 16, 16, 255, 255, 255, 255);
+ }
+ if(stamp_page<page_count-1)
+ {
+ drawtext(vid_buf, XRES-15, YRES+MENUSIZE-14, "\x95", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-18, YRES+MENUSIZE-18, 16, 16, 255, 255, 255, 255);
+ }
+
+ if(b==1&&d!=-1)
+ {
+ if(confirm_ui(vid_buf, "Do you want to delete?", stamps[d].name, "Delete"))
+ {
+ del_stamp(d);
+ }
+ }
+
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ if(b==1&&r!=-1)
+ break;
+ if(b==4&&r!=-1)
+ {
+ r = -1;
+ break;
+ }
+
+ if((b && !bq && mx>=1 && mx<=17 && my>=YRES+MENUSIZE-18 && my<YRES+MENUSIZE-2) || sdl_wheel>0)
+ {
+ if(stamp_page)
+ {
+ stamp_page --;
+ }
+ sdl_wheel = 0;
+ }
+ if((b && !bq && mx>=XRES-18 && mx<=XRES-1 && my>=YRES+MENUSIZE-18 && my<YRES+MENUSIZE-2) || sdl_wheel<0)
+ {
+ if(stamp_page<page_count-1)
+ {
+ stamp_page ++;
+ }
+ sdl_wheel = 0;
+ }
+
+ if(sdl_key==SDLK_RETURN)
+ break;
+ if(sdl_key==SDLK_ESCAPE)
+ {
+ r = -1;
+ break;
+ }
+ }
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ return r;
+}
+
+void tag_list_ui(pixel *vid_buf)
+{
+ int y,d,x0=(XRES-192)/2,y0=(YRES-256)/2,b=1,bq,mx,my,vp,vn;
+ char *p,*q,s;
+ char *tag=NULL, *op=NULL;
+ ui_edit ed;
+ struct strlist *vote=NULL,*down=NULL;
+
+ ed.x = x0+25;
+ ed.y = y0+221;
+ ed.w = 158;
+ ed.nx = 1;
+ ed.def = "[new tag]";
+ ed.focus = 0;
+ ed.hide = 0;
+ ed.cursor = 0;
+ strcpy(ed.str, "");
+
+ fillrect(vid_buf, -1, -1, XRES, YRES+MENUSIZE, 0, 0, 0, 192);
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ op = tag = NULL;
+
+ drawrect(vid_buf, x0, y0, 192, 256, 192, 192, 192, 255);
+ clearrect(vid_buf, x0, y0, 192, 256);
+ drawtext(vid_buf, x0+8, y0+8, "Current tags:", 255, 255, 255, 255);
+ p = svf_tags;
+ s = svf_tags[0] ? ' ' : 0;
+ y = 36 + y0;
+ while(s)
+ {
+ q = strchr(p, ' ');
+ if(!q)
+ q = p+strlen(p);
+ s = *q;
+ *q = 0;
+ if(svf_own || svf_admin || svf_mod)
+ {
+ drawtext(vid_buf, x0+20, y-1, "\x86", 160, 48, 32, 255);
+ drawtext(vid_buf, x0+20, y-1, "\x85", 255, 255, 255, 255);
+ d = 14;
+ if(b && !bq && mx>=x0+18 && mx<x0+32 && my>=y-2 && my<y+12)
+ {
+ op = "delete";
+ tag = mystrdup(p);
+ }
+ }
+ else
+ d = 0;
+ vp = strlist_find(&vote, p);
+ vn = strlist_find(&down, p);
+ if((!vp && !vn && !svf_own) || svf_admin || svf_mod)
+ {
+ drawtext(vid_buf, x0+d+20, y-1, "\x88", 32, 144, 32, 255);
+ drawtext(vid_buf, x0+d+20, y-1, "\x87", 255, 255, 255, 255);
+ if(b && !bq && mx>=x0+d+18 && mx<x0+d+32 && my>=y-2 && my<y+12)
+ {
+ op = "vote";
+ tag = mystrdup(p);
+ strlist_add(&vote, p);
+ }
+ drawtext(vid_buf, x0+d+34, y-1, "\x88", 144, 48, 32, 255);
+ drawtext(vid_buf, x0+d+34, y-1, "\xA2", 255, 255, 255, 255);
+ if(b && !bq && mx>=x0+d+32 && mx<x0+d+46 && my>=y-2 && my<y+12)
+ {
+ op = "down";
+ tag = mystrdup(p);
+ strlist_add(&down, p);
+ }
+ }
+ if(vp)
+ drawtext(vid_buf, x0+d+48+textwidth(p), y, " - voted!", 48, 192, 48, 255);
+ if(vn)
+ drawtext(vid_buf, x0+d+48+textwidth(p), y, " - voted.", 192, 64, 32, 255);
+ drawtext(vid_buf, x0+d+48, y, p, 192, 192, 192, 255);
+ *q = s;
+ p = q+1;
+ y += 16;
+ }
+ drawtext(vid_buf, x0+11, y0+219, "\x86", 32, 144, 32, 255);
+ drawtext(vid_buf, x0+11, y0+219, "\x89", 255, 255, 255, 255);
+ drawrect(vid_buf, x0+8, y0+216, 176, 16, 192, 192, 192, 255);
+ ui_edit_draw(vid_buf, &ed);
+ drawtext(vid_buf, x0+5, y0+245, "Close", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+240, 192, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ ui_edit_process(mx, my, b, &ed);
+
+ if(b && mx>=x0 && mx<=x0+192 && my>=y0+240 && my<y0+256)
+ break;
+
+ if(op)
+ {
+ d = execute_tagop(vid_buf, op, tag);
+ free(tag);
+ op = tag = NULL;
+ if(d)
+ goto finish;
+ }
+
+ if(b && !bq && mx>=x0+9 && mx<x0+23 && my>=y0+218 && my<y0+232)
+ {
+ d = execute_tagop(vid_buf, "add", ed.str);
+ strcpy(ed.str, "");
+ ed.cursor = 0;
+ if(d)
+ goto finish;
+ }
+
+ if(sdl_key==SDLK_RETURN)
+ {
+ if(!ed.focus)
+ break;
+ d = execute_tagop(vid_buf, "add", ed.str);
+ strcpy(ed.str, "");
+ ed.cursor = 0;
+ if(d)
+ goto finish;
+ }
+ if(sdl_key==SDLK_ESCAPE)
+ {
+ if(!ed.focus)
+ break;
+ strcpy(ed.str, "");
+ ed.cursor = 0;
+ ed.focus = 0;
+ }
+ }
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+ sdl_key = 0;
+
+finish:
+ strlist_free(&vote);
+}
+
+int save_name_ui(pixel *vid_buf)
+{
+ int x0=(XRES-192)/2,y0=(YRES-68-YRES/4)/2,b=1,bq,mx,my,ths,nd=0;
+ void *th;
+ ui_edit ed;
+ ui_checkbox cb;
+
+ th = build_thumb(&ths, 0);
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ ed.x = x0+25;
+ ed.y = y0+25;
+ ed.w = 158;
+ ed.nx = 1;
+ ed.def = "[simulation name]";
+ ed.focus = 1;
+ ed.hide = 0;
+ ed.cursor = strlen(svf_name);
+ strcpy(ed.str, svf_name);
+
+ cb.x = x0+10;
+ cb.y = y0+53+YRES/4;
+ cb.focus = 0;
+ cb.checked = svf_publish;
+
+ fillrect(vid_buf, -1, -1, XRES+BARSIZE, YRES+MENUSIZE, 0, 0, 0, 192);
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ drawrect(vid_buf, x0, y0, 192, 90+YRES/4, 192, 192, 192, 255);
+ clearrect(vid_buf, x0, y0, 192, 90+YRES/4);
+ drawtext(vid_buf, x0+8, y0+8, "New simulation name:", 255, 255, 255, 255);
+ drawtext(vid_buf, x0+10, y0+23, "\x82", 192, 192, 192, 255);
+ drawrect(vid_buf, x0+8, y0+20, 176, 16, 192, 192, 192, 255);
+
+ ui_edit_draw(vid_buf, &ed);
+
+ drawrect(vid_buf, x0+(192-XRES/4)/2-2, y0+42, XRES/4+3, YRES/4+3, 128, 128, 128, 255);
+ render_thumb(th, ths, 0, vid_buf, x0+(192-XRES/4)/2, y0+44, 4);
+
+ ui_checkbox_draw(vid_buf, &cb);
+ drawtext(vid_buf, x0+34, y0+50+YRES/4, "Publish? (Do not publish others'\nworks without permission)", 192, 192, 192, 255);
+
+ drawtext(vid_buf, x0+5, y0+79+YRES/4, "Save simulation", 255, 255, 255, 255);
+ drawrect(vid_buf, x0, y0+74+YRES/4, 192, 16, 192, 192, 192, 255);
+
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ ui_edit_process(mx, my, b, &ed);
+ ui_checkbox_process(mx, my, b, bq, &cb);
+
+ if(b && !bq && ((mx>=x0+9 && mx<x0+23 && my>=y0+22 && my<y0+36) ||
+ (mx>=x0 && mx<x0+192 && my>=y0+74+YRES/4 && my<y0+90+YRES/4)))
+ {
+ free(th);
+ if(!ed.str[0])
+ return 0;
+ nd = strcmp(svf_name, ed.str) || !svf_own;
+ strncpy(svf_name, ed.str, 63);
+ svf_name[63] = 0;
+ if(nd)
+ {
+ strcpy(svf_id, "");
+ strcpy(svf_tags, "");
+ }
+ svf_open = 1;
+ svf_own = 1;
+ svf_publish = cb.checked;
+ return nd+1;
+ }
+
+ if(sdl_key==SDLK_RETURN)
+ {
+ free(th);
+ if(!ed.str[0])
+ return 0;
+ nd = strcmp(svf_name, ed.str) || !svf_own;
+ strncpy(svf_name, ed.str, 63);
+ svf_name[63] = 0;
+ if(nd)
+ {
+ strcpy(svf_id, "");
+ strcpy(svf_tags, "");
+ }
+ svf_open = 1;
+ svf_own = 1;
+ svf_publish = cb.checked;
+ return nd+1;
+ }
+ if(sdl_key==SDLK_ESCAPE)
+ {
+ if(!ed.focus)
+ break;
+ ed.focus = 0;
+ }
+ }
+ free(th);
+ return 0;
+}
+
+void menu_ui(pixel *vid_buf, int i, int *sl, int *sr)
+{
+ int b=1,bq,mx,my,h,x,y,n=0,height,width,sy,rows=0;
+ pixel *old_vid=(pixel *)calloc((XRES+BARSIZE)*(YRES+MENUSIZE), PIXELSIZE);
+ fillrect(vid_buf, -1, -1, XRES+1, YRES+MENUSIZE, 0, 0, 0, 192);
+ memcpy(old_vid, vid_buf, ((XRES+BARSIZE)*(YRES+MENUSIZE))*PIXELSIZE);
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+ while(!sdl_poll())
+ {
+ bq = b;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+ rows = ceil((float)msections[i].itemcount/16.0f);
+ height = (ceil((float)msections[i].itemcount/16.0f)*18);
+ width = restrict_flt(msections[i].itemcount*31, 0, 16*31);
+ //clearrect(vid_buf, -1, -1, XRES+1, YRES+MENUSIZE+1);
+ h = -1;
+ x = XRES-BARSIZE-26;
+ y = (((YRES/SC_TOTAL)*i)+((YRES/SC_TOTAL)/2))-(height/2)+(FONT_H/2)+1;
+ sy = y;
+ //clearrect(vid_buf, (XRES-BARSIZE-width)+1, y-4, width+4, height+4+rows);
+ fillrect(vid_buf, (XRES-BARSIZE-width)-7, y-10, width+16, height+16+rows, 0, 0, 0, 100);
+ drawrect(vid_buf, (XRES-BARSIZE-width)-7, y-10, width+16, height+16+rows, 255, 255, 255, 255);
+ fillrect(vid_buf, (XRES-BARSIZE)+11, (((YRES/SC_TOTAL)*i)+((YRES/SC_TOTAL)/2))-2, 15, FONT_H+3, 0, 0, 0, 100);
+ drawrect(vid_buf, (XRES-BARSIZE)+10, (((YRES/SC_TOTAL)*i)+((YRES/SC_TOTAL)/2))-2, 16, FONT_H+3, 255, 255, 255, 255);
+ drawrect(vid_buf, (XRES-BARSIZE)+9, (((YRES/SC_TOTAL)*i)+((YRES/SC_TOTAL)/2))-1, 1, FONT_H+1, 0, 0, 0, 255);
+ if(i==SC_WALL)
+ {
+ for(n = 122; n<122+UI_WALLCOUNT; n++)
+ {
+ if(n!=SPC_AIR&&n!=SPC_HEAT&&n!=SPC_COOL&&n!=SPC_VACUUM)
+ {
+ if(x-26<=60)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, mwalls[n-122].colour)+5;
+ if(mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+ else if(i==SC_SPECIAL)
+ {
+ for(n = 122; n<122+UI_WALLCOUNT; n++)
+ {
+ if(n==SPC_AIR||n==SPC_HEAT||n==SPC_COOL||n==SPC_VACUUM)
+ {
+ if(x-26<=60)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, mwalls[n-122].colour)+5;
+ if(mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ for(n = 0; n<PT_NUM; n++)
+ {
+ if(ptypes[n].menusection==i&&ptypes[n].menu==1)
+ {
+ if(x-26<=60)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, ptypes[n].pcolors)+5;
+ if(mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+ else
+ {
+ for(n = 0; n<PT_NUM; n++)
+ {
+ if(ptypes[n].menusection==i&&ptypes[n].menu==1)
+ {
+ if(x-26<=60)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, ptypes[n].pcolors)+5;
+ if(mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+
+ if(h==-1)
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)msections[i].name)-BARSIZE, sy+height+10, (char *)msections[i].name, 255, 255, 255, 255);
+ }
+ else if(i==SC_WALL||(i==SC_SPECIAL&&h>=122))
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)mwalls[h-122].descs)-BARSIZE, sy+height+10, (char *)mwalls[h-122].descs, 255, 255, 255, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)ptypes[h].descs)-BARSIZE, sy+height+10, (char *)ptypes[h].descs, 255, 255, 255, 255);
+ }
+
+
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+ memcpy(vid_buf, old_vid, ((XRES+BARSIZE)*(YRES+MENUSIZE))*PIXELSIZE);
+ if(!(mx>=(XRES-BARSIZE-width)-7 && my>=sy-10 && my<sy+height+9))
+ {
+ break;
+ }
+
+ if(b==1&&h!=-1)
+ {
+ *sl = h;
+ break;
+ }
+ if(b==4&&h!=-1)
+ {
+ *sr = h;
+ break;
+ }
+ //if(b==4&&h!=-1) {
+ // h = -1;
+ // break;
+ //}
+
+ if(sdl_key==SDLK_RETURN)
+ break;
+ if(sdl_key==SDLK_ESCAPE)
+ break;
+ }
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+ //drawtext(vid_buf, XRES+2, (12*i)+2, msections[i].icon, 255, 255, 255, 255);
+}
+
+void menu_ui_v3(pixel *vid_buf, int i, int *sl, int *sr, int b, int bq, int mx, int my)
+{
+ int h,x,y,n=0,height,width,sy,rows=0;
+ mx /= sdl_scale;
+ my /= sdl_scale;
+ rows = ceil((float)msections[i].itemcount/16.0f);
+ height = (ceil((float)msections[i].itemcount/16.0f)*18);
+ width = restrict_flt(msections[i].itemcount*31, 0, 16*31);
+ h = -1;
+ x = XRES-BARSIZE-26;
+ y = YRES+1;
+ sy = y;
+ if(i==SC_WALL)
+ {
+ for(n = 122; n<122+UI_WALLCOUNT; n++)
+ {
+ if(n!=SPC_AIR&&n!=SPC_HEAT&&n!=SPC_COOL&&n!=SPC_VACUUM)
+ {
+ if(x-26<=20)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, mwalls[n-122].colour)+5;
+ if(!bq && mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+ else if(i==SC_SPECIAL)
+ {
+ for(n = 122; n<122+UI_WALLCOUNT; n++)
+ {
+ if(n==SPC_AIR||n==SPC_HEAT||n==SPC_COOL||n==SPC_VACUUM)
+ {
+ if(x-26<=20)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, mwalls[n-122].colour)+5;
+ if(!bq && mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ for(n = 0; n<PT_NUM; n++)
+ {
+ if(ptypes[n].menusection==i&&ptypes[n].menu==1)
+ {
+ if(x-26<=20)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, ptypes[n].pcolors)+5;
+ if(!bq && mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+ else
+ {
+ for(n = 0; n<PT_NUM; n++)
+ {
+ if(ptypes[n].menusection==i&&ptypes[n].menu==1)
+ {
+ if(x-26<=20)
+ {
+ x = XRES-BARSIZE-26;
+ y += 19;
+ }
+ x -= draw_tool_xy(vid_buf, x, y, n, ptypes[n].pcolors)+5;
+ if(!bq && mx>=x+32 && mx<x+58 && my>=y && my< y+15)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ h = n;
+ }
+ else if(n==*sl)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 255, 0, 0, 255);
+ }
+ else if(n==*sr)
+ {
+ drawrect(vid_buf, x+30, y-1, 29, 17, 0, 0, 255, 255);
+ }
+ }
+ }
+ }
+
+ if(h==-1)
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)msections[i].name)-BARSIZE, sy-10, (char *)msections[i].name, 255, 255, 255, 255);
+ }
+ else if(i==SC_WALL||(i==SC_SPECIAL&&h>=122))
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)mwalls[h-122].descs)-BARSIZE, sy-10, (char *)mwalls[h-122].descs, 255, 255, 255, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES-textwidth((char *)ptypes[h].descs)-BARSIZE, sy-10, (char *)ptypes[h].descs, 255, 255, 255, 255);
+ }
+
+ if(b==1&&h!=-1)
+ {
+ *sl = h;
+ }
+ if(b==4&&h!=-1)
+ {
+ *sr = h;
+ }
+}
+
+int sdl_poll(void)
+{
+ SDL_Event event;
+ sdl_key=sdl_wheel=sdl_ascii=0;
+ while(SDL_PollEvent(&event))
+ {
+ switch (event.type)
+ {
+ case SDL_KEYDOWN:
+ sdl_key=event.key.keysym.sym;
+ sdl_ascii=event.key.keysym.unicode;
+ if(event.key.keysym.sym == SDLK_CAPSLOCK)
+ sdl_caps = 1;
+ if(event.key.keysym.unicode=='z' || event.key.keysym.unicode=='Z')
+ {
+ sdl_zoom_trig = 1;
+ Z_keysym = event.key.keysym.sym;
+ }
+ if( event.key.keysym.sym == SDLK_PLUS)
+ {
+ sdl_wheel++;
+ }
+ if( event.key.keysym.sym == SDLK_MINUS)
+ {
+ sdl_wheel--;
+ }
+ // 4
+ //1 8 2
+ if(event.key.keysym.sym == SDLK_RIGHT)
+ {
+ player[0] = (int)(player[0])|0x02; //Go right command
+ }
+ if(event.key.keysym.sym == SDLK_LEFT)
+ {
+ player[0] = (int)(player[0])|0x01; //Go left command
+ }
+ if(event.key.keysym.sym == SDLK_DOWN && ((int)(player[0])&0x08)!=0x08)
+ {
+ player[0] = (int)(player[0])|0x08; //Go left command
+ }
+ if(event.key.keysym.sym == SDLK_UP && ((int)(player[0])&0x04)!=0x04)
+ {
+ player[0] = (int)(player[0])|0x04; //Jump command
+ }
+ break;
+
+ case SDL_KEYUP:
+ if(event.key.keysym.sym == SDLK_CAPSLOCK)
+ sdl_caps = 0;
+ if(event.key.keysym.sym == Z_keysym)
+ sdl_zoom_trig = 0;
+ if(event.key.keysym.sym == SDLK_RIGHT || event.key.keysym.sym == SDLK_LEFT)
+ {
+ player[1] = player[0]; //Saving last movement
+ player[0] = (int)(player[0])&12; //Stop command
+ }
+ if(event.key.keysym.sym == SDLK_UP)
+ {
+ player[0] = (int)(player[0])&11;
+ }
+ if(event.key.keysym.sym == SDLK_DOWN)
+ {
+ player[0] = (int)(player[0])&7;
+ }
+ break;
+ case SDL_MOUSEBUTTONDOWN:
+ if(event.button.button == SDL_BUTTON_WHEELUP)
+ sdl_wheel++;
+ if(event.button.button == SDL_BUTTON_WHEELDOWN)
+ sdl_wheel--;
+ break;
+ case SDL_QUIT:
+ return 1;
+ }
+ }
+ sdl_mod = SDL_GetModState();
+ return 0;
+}
+
+void set_cmode(int cm)
+{
+ cmode = cm;
+ itc = 51;
+ if(cmode==4)
+ {
+ memset(fire_r, 0, sizeof(fire_r));
+ memset(fire_g, 0, sizeof(fire_g));
+ memset(fire_b, 0, sizeof(fire_b));
+ strcpy(itc_msg, "Blob Display");
+ }
+ else if(cmode==5)
+ {
+ strcpy(itc_msg, "Heat Display");
+ }
+ else if(cmode==6)
+ {
+ memset(fire_r, 0, sizeof(fire_r));
+ memset(fire_g, 0, sizeof(fire_g));
+ memset(fire_b, 0, sizeof(fire_b));
+ strcpy(itc_msg, "Fancy Display");
+ }
+ else if(cmode==3)
+ {
+ memset(fire_r, 0, sizeof(fire_r));
+ memset(fire_g, 0, sizeof(fire_g));
+ memset(fire_b, 0, sizeof(fire_b));
+ strcpy(itc_msg, "Fire Display");
+ }
+ else if(cmode==2)
+ {
+ memset(fire_bg, 0, XRES*YRES*PIXELSIZE);
+ strcpy(itc_msg, "Persistent Display");
+ }
+ else if(cmode==1)
+ strcpy(itc_msg, "Pressure Display");
+ else
+ strcpy(itc_msg, "Velocity Display");
+}
+
+char *download_ui(pixel *vid_buf, char *uri, int *len)
+{
+ int dstate = 0;
+ void *http = http_async_req_start(NULL, uri, NULL, 0, 0);
+ int x0=(XRES-240)/2,y0=(YRES-MENUSIZE)/2;
+ int done, total, i, ret, zlen, ulen;
+ char str[16], *tmp, *res;
+
+ while(!http_async_req_status(http))
+ {
+ sdl_poll();
+
+ http_async_get_length(http, &total, &done);
+
+ clearrect(vid_buf, x0-2, y0-2, 244, 64);
+ drawrect(vid_buf, x0, y0, 240, 60, 192, 192, 192, 255);
+ drawtext(vid_buf, x0+8, y0+8, "Please wait", 255, 216, 32, 255);
+ drawtext(vid_buf, x0+8, y0+26, "Downloading update...", 255, 255, 255, 255);
+
+ if(total)
+ {
+ i = (236*done)/total;
+ fillrect(vid_buf, x0+1, y0+45, i+1, 14, 255, 216, 32, 255);
+ i = (100*done)/total;
+ sprintf(str, "%d%%", i);
+ if(i<50)
+ drawtext(vid_buf, x0+120-textwidth(str)/2, y0+48, str, 192, 192, 192, 255);
+ else
+ drawtext(vid_buf, x0+120-textwidth(str)/2, y0+48, str, 0, 0, 0, 255);
+ }
+ else
+ drawtext(vid_buf, x0+120-textwidth("Waiting...")/2, y0+48, "Waiting...", 255, 216, 32, 255);
+
+ drawrect(vid_buf, x0, y0+44, 240, 16, 192, 192, 192, 255);
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+ }
+
+ tmp = http_async_req_stop(http, &ret, &zlen);
+ if(ret!=200)
+ {
+ error_ui(vid_buf, ret, http_ret_text(ret));
+ if(tmp)
+ free(tmp);
+ return NULL;
+ }
+ if(!tmp)
+ {
+ error_ui(vid_buf, 0, "Server did not return data");
+ return NULL;
+ }
+
+ if(zlen<16)
+ {
+ printf("ZLen is not 16!\n");
+ goto corrupt;
+ }
+ if(tmp[0]!=0x42 || tmp[1]!=0x75 || tmp[2]!=0x54 || tmp[3]!=0x54)
+ {
+ printf("Tmperr %d, %d, %d, %d\n", tmp[0], tmp[1], tmp[2], tmp[3]);
+ goto corrupt;
+ }
+
+ ulen = (unsigned char)tmp[4];
+ ulen |= ((unsigned char)tmp[5])<<8;
+ ulen |= ((unsigned char)tmp[6])<<16;
+ ulen |= ((unsigned char)tmp[7])<<24;
+
+ res = (char *)malloc(ulen);
+ if(!res)
+ {
+ printf("No res!\n");
+ goto corrupt;
+ }
+ dstate = BZ2_bzBuffToBuffDecompress((char *)res, (unsigned *)&ulen, (char *)(tmp+8), zlen-8, 0, 0);
+ if(dstate)
+ {
+ printf("Decompression failure: %d!\n", dstate);
+ free(res);
+ goto corrupt;
+ }
+
+ free(tmp);
+ if(len)
+ *len = ulen;
+ return res;
+
+corrupt:
+ error_ui(vid_buf, 0, "Downloaded update is corrupted");
+ free(tmp);
+ return NULL;
+}
+
+int search_ui(pixel *vid_buf)
+{
+ int uih=0,nyu,nyd,b=1,bq,mx=0,my=0,mxq=0,myq=0,mmt=0,gi,gj,gx,gy,pos,i,mp,dp,dap,own,last_own=search_own,page_count=0,last_page=0,last_date=0,j,w,h,st=0,lv;
+ int is_p1=0, exp_res=GRID_X*GRID_Y, tp, view_own=0;
+ int thumb_drawn[GRID_X*GRID_Y];
+ pixel *v_buf = (pixel *)malloc(((YRES+MENUSIZE)*(XRES+BARSIZE))*PIXELSIZE);
+ float ry;
+ time_t http_last_use=HTTP_TIMEOUT;
+ ui_edit ed;
+
+
+ void *http = NULL;
+ int active = 0;
+ char *last = NULL;
+ int search = 0;
+ int lasttime = TIMEOUT;
+ char *uri;
+ int status;
+ char *results;
+ char *tmp, ts[64];
+
+ void *img_http[IMGCONNS];
+ char *img_id[IMGCONNS];
+ void *thumb, *data;
+ int thlen, dlen;
+
+ memset(v_buf, 0, ((YRES+MENUSIZE)*(XRES+BARSIZE))*PIXELSIZE);
+
+ memset(img_http, 0, sizeof(img_http));
+ memset(img_id, 0, sizeof(img_id));
+
+ memset(search_ids, 0, sizeof(search_ids));
+ memset(search_dates, 0, sizeof(search_dates));
+ memset(search_names, 0, sizeof(search_names));
+ memset(search_scoreup, 0, sizeof(search_scoreup));
+ memset(search_scoredown, 0, sizeof(search_scoredown));
+ memset(search_publish, 0, sizeof(search_publish));
+ memset(search_owners, 0, sizeof(search_owners));
+ memset(search_thumbs, 0, sizeof(search_thumbs));
+ memset(search_thsizes, 0, sizeof(search_thsizes));
+
+ memset(thumb_drawn, 0, sizeof(thumb_drawn));
+
+ do_open = 0;
+
+ while(!sdl_poll())
+ {
+ b = SDL_GetMouseState(&mx, &my);
+ if(!b)
+ break;
+ }
+
+ ed.x = 65;
+ ed.y = 13;
+ ed.w = XRES-200;
+ ed.nx = 1;
+ ed.def = "[search terms]";
+ ed.focus = 1;
+ ed.hide = 0;
+ ed.cursor = strlen(search_expr);
+ strcpy(ed.str, search_expr);
+
+ sdl_wheel = 0;
+
+ while(!sdl_poll())
+ {
+ uih = 0;
+ bq = b;
+ mxq = mx;
+ myq = my;
+ b = SDL_GetMouseState(&mx, &my);
+ mx /= sdl_scale;
+ my /= sdl_scale;
+
+ if(mx!=mxq || my!=myq || sdl_wheel || b)
+ mmt = 0;
+ else if(mmt<TIMEOUT)
+ mmt++;
+
+ clearrect(vid_buf, -1, -1, (XRES+BARSIZE)+1, YRES+MENUSIZE+1);
+
+ memcpy(vid_buf, v_buf, ((YRES+MENUSIZE)*(XRES+BARSIZE))*PIXELSIZE);
+
+ drawtext(vid_buf, 11, 13, "Search:", 192, 192, 192, 255);
+ if(!last || (!active && strcmp(last, ed.str)))
+ drawtext(vid_buf, 51, 11, "\x8E", 192, 160, 32, 255);
+ else
+ drawtext(vid_buf, 51, 11, "\x8E", 32, 64, 160, 255);
+ drawtext(vid_buf, 51, 11, "\x8F", 255, 255, 255, 255);
+ drawrect(vid_buf, 48, 8, XRES-182, 16, 192, 192, 192, 255);
+
+ if(!svf_login)
+ {
+ search_own = 0;
+ drawrect(vid_buf, XRES-64, 8, 56, 16, 96, 96, 96, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x94", 96, 80, 16, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x93", 128, 128, 128, 255);
+ drawtext(vid_buf, XRES-46, 13, "My Own", 128, 128, 128, 255);
+ }
+ else if(search_own)
+ {
+ fillrect(vid_buf, XRES-65, 7, 58, 18, 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x94", 192, 160, 64, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x93", 32, 32, 32, 255);
+ drawtext(vid_buf, XRES-46, 13, "My Own", 0, 0, 0, 255);
+ }
+ else
+ {
+ drawrect(vid_buf, XRES-64, 8, 56, 16, 192, 192, 192, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x94", 192, 160, 32, 255);
+ drawtext(vid_buf, XRES-61, 11, "\x93", 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-46, 13, "My Own", 255, 255, 255, 255);
+ }
+
+ if(search_date)
+ {
+ fillrect(vid_buf, XRES-130, 7, 62, 18, 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-126, 11, "\xA6", 32, 32, 32, 255);
+ drawtext(vid_buf, XRES-111, 13, "By date", 0, 0, 0, 255);
+ }
+ else
+ {
+ drawrect(vid_buf, XRES-129, 8, 60, 16, 192, 192, 192, 255);
+ drawtext(vid_buf, XRES-126, 11, "\xA9", 144, 48, 32, 255);
+ drawtext(vid_buf, XRES-126, 11, "\xA8", 32, 144, 32, 255);
+ drawtext(vid_buf, XRES-126, 11, "\xA7", 255, 255, 255, 255);
+ drawtext(vid_buf, XRES-111, 13, "By votes", 255, 255, 255, 255);
+ }
+
+ if(search_page)
+ {
+ drawtext(vid_buf, 4, YRES+MENUSIZE-16, "\x96", 255, 255, 255, 255);
+ drawrect(vid_buf, 1, YRES+MENUSIZE-20, 16, 16, 255, 255, 255, 255);
+ }
+ if(page_count > 9)
+ {
+ drawtext(vid_buf, XRES-15, YRES+MENUSIZE-16, "\x95", 255, 255, 255, 255);
+ drawrect(vid_buf, XRES-18, YRES+MENUSIZE-20, 16, 16, 255, 255, 255, 255);
+ }
+
+ ui_edit_draw(vid_buf, &ed);
+
+ if((b && !bq && mx>=1 && mx<=17 && my>=YRES+MENUSIZE-20 && my<YRES+MENUSIZE-4) || sdl_wheel>0)
+ {
+ if(search_page)
+ {
+ search_page --;
+ lasttime = TIMEOUT;
+ }
+ sdl_wheel = 0;
+ uih = 1;
+ }
+ if((b && !bq && mx>=XRES-18 && mx<=XRES-1 && my>=YRES+MENUSIZE-20 && my<YRES+MENUSIZE-4) || sdl_wheel<0)
+ {
+ if(page_count>exp_res)
+ {
+ lasttime = TIMEOUT;
+ search_page ++;
+ page_count = exp_res;
+ }
+ sdl_wheel = 0;
+ uih = 1;
+ }
+
+ tp = -1;
+ if(is_p1)
+ {
+ drawtext(vid_buf, (XRES-textwidth("Popular tags:"))/2, 31, "Popular tags:", 255, 192, 64, 255);
+ for(gj=0; gj<((GRID_Y-GRID_P)*YRES)/(GRID_Y*14); gj++)
+ for(gi=0; gi<GRID_X; gi++)
+ {
+ pos = gi+GRID_X*gj;
+ if(pos>TAG_MAX || !tag_names[pos])
+ break;
+ if(tag_votes[0])
+ i = 127+(128*tag_votes[pos])/tag_votes[0];
+ else
+ i = 192;
+ w = textwidth(tag_names[pos]);
+ if(w>XRES/GRID_X-5)
+ w = XRES/GRID_X-5;
+ gx = (XRES/GRID_X)*gi;
+ gy = gj*14 + 46;
+ if(mx>=gx && mx<gx+(XRES/GRID_X) && my>=gy && my<gy+14)
+ {
+ j = (i*5)/6;
+ tp = pos;
+ }
+ else
+ j = i;
+ drawtextmax(vid_buf, gx+(XRES/GRID_X-w)/2, gy, XRES/GRID_X-5, tag_names[pos], j, j, i, 255);
+ }
+ }
+
+ mp = dp = -1;
+ dap = -1;
+ st = 0;
+ for(gj=0; gj<GRID_Y; gj++)
+ for(gi=0; gi<GRID_X; gi++)
+ {
+ if(is_p1)
+ {
+ pos = gi+GRID_X*(gj-GRID_Y+GRID_P);
+ if(pos<0)
+ break;
+ }
+ else
+ pos = gi+GRID_X*gj;
+ if(!search_ids[pos])
+ break;
+ gx = ((XRES/GRID_X)*gi) + (XRES/GRID_X-XRES/GRID_S)/2;
+ gy = ((((YRES-(MENUSIZE-20))+15)/GRID_Y)*gj) + ((YRES-(MENUSIZE-20))/GRID_Y-(YRES-(MENUSIZE-20))/GRID_S+10)/2 + 18;
+ if(textwidth(search_names[pos]) > XRES/GRID_X-10)
+ {
+ tmp = malloc(strlen(search_names[pos])+4);
+ strcpy(tmp, search_names[pos]);
+ j = textwidthx(tmp, XRES/GRID_X-15);
+ strcpy(tmp+j, "...");
+ drawtext(vid_buf, gx+XRES/(GRID_S*2)-textwidth(tmp)/2, gy+YRES/GRID_S+7, tmp, 192, 192, 192, 255);
+ free(tmp);
+ }
+ else
+ drawtext(vid_buf, gx+XRES/(GRID_S*2)-textwidth(search_names[pos])/2, gy+YRES/GRID_S+7, search_names[pos], 192, 192, 192, 255);
+ j = textwidth(search_owners[pos]);
+ if(mx>=gx+XRES/(GRID_S*2)-j/2 && mx<=gx+XRES/(GRID_S*2)+j/2 &&
+ my>=gy+YRES/GRID_S+18 && my<=gy+YRES/GRID_S+31)
+ {
+ st = 1;
+ drawtext(vid_buf, gx+XRES/(GRID_S*2)-j/2, gy+YRES/GRID_S+20, search_owners[pos], 128, 128, 160, 255);
+ }
+ else
+ drawtext(vid_buf, gx+XRES/(GRID_S*2)-j/2, gy+YRES/GRID_S+20, search_owners[pos], 128, 128, 128, 255);
+ if(search_thumbs[pos]&&thumb_drawn[pos]==0)
+ {
+ render_thumb(search_thumbs[pos], search_thsizes[pos], 1, v_buf, gx, gy, GRID_S);
+ thumb_drawn[pos] = 1;
+ }
+ own = svf_login && (!strcmp(svf_user, search_owners[pos]) || svf_admin || svf_mod);
+ if(mx>=gx-2 && mx<=gx+XRES/GRID_S+3 && my>=gy-2 && my<=gy+YRES/GRID_S+30)
+ mp = pos;
+ if(own)
+ {
+ if(mx>=gx+XRES/GRID_S-4 && mx<=gx+XRES/GRID_S+6 && my>=gy-6 && my<=gy+4)
+ {
+ mp = -1;
+ dp = pos;
+ }
+ if(!search_dates[pos] && mx>=gx-6 && mx<=gx+4 && my>=gy+YRES/GRID_S-4 && my<=gy+YRES/GRID_S+6)
+ {
+ mp = -1;
+ dap = pos;
+ }
+ }
+ drawrect(vid_buf, gx-2+(XRES/GRID_S)+5, gy-2, 6, YRES/GRID_S+3, 128, 128, 128, 255);
+ fillrect(vid_buf, gx-2+(XRES/GRID_S)+5, gy-2, 6, 1+(YRES/GRID_S+3)/2, 0, 107, 10, 255);
+ fillrect(vid_buf, gx-2+(XRES/GRID_S)+5, gy-2+((YRES/GRID_S+3)/2), 6, 1+(YRES/GRID_S+3)/2, 107, 10, 0, 255);
+
+ if(mp==pos && !st)
+ drawrect(vid_buf, gx-2, gy-2, XRES/GRID_S+3, YRES/GRID_S+3, 160, 160, 192, 255);
+ else
+ drawrect(vid_buf, gx-2, gy-2, XRES/GRID_S+3, YRES/GRID_S+3, 128, 128, 128, 255);
+ if(own)
+ {
+ if(dp == pos)
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x86", 255, 48, 32, 255);
+ else
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x86", 160, 48, 32, 255);
+ drawtext(vid_buf, gx+XRES/GRID_S-4, gy-6, "\x85", 255, 255, 255, 255);
+ }
+ if(!search_publish[pos])
+ {
+ drawtext(vid_buf, gx-6, gy-6, "\xCD", 255, 255, 255, 255);
+ drawtext(vid_buf, gx-6, gy-6, "\xCE", 212, 151, 81, 255);
+ }
+ if(!search_dates[pos] && own)
+ {
+ fillrect(vid_buf, gx-5, gy+YRES/GRID_S-3, 7, 8, 255, 255, 255, 255);
+ if(dap == pos) {
+ drawtext(vid_buf, gx-6, gy+YRES/GRID_S-4, "\xA6", 200, 100, 80, 255);
+ } else {
+ drawtext(vid_buf, gx-6, gy+YRES/GRID_S-4, "\xA6", 160, 70, 50, 255);
+ }
+ //drawtext(vid_buf, gx-6, gy-6, "\xCE", 212, 151, 81, 255);
+ }
+ if(view_own || svf_admin || svf_mod)
+ {
+ sprintf(ts+1, "%d", search_votes[pos]);
+ ts[0] = 0xBB;
+ for(j=1; ts[j]; j++)
+ ts[j] = 0xBC;
+ ts[j-1] = 0xB9;
+ ts[j] = 0xBA;
+ ts[j+1] = 0;
+ w = gx+XRES/GRID_S-2-textwidth(ts);
+ h = gy+YRES/GRID_S-11;
+ drawtext(vid_buf, w, h, ts, 16, 72, 16, 255);
+ for(j=0; ts[j]; j++)
+ ts[j] -= 14;
+ drawtext(vid_buf, w, h, ts, 192, 192, 192, 255);
+ sprintf(ts, "%d", search_votes[pos]);
+ for(j=0; ts[j]; j++)
+ ts[j] += 127;
+ drawtext(vid_buf, w+3, h, ts, 255, 255, 255, 255);
+ }
+ if(search_scoreup[pos]>0||search_scoredown[pos]>0)
+ {
+ lv = (search_scoreup[pos]>search_scoredown[pos]?search_scoreup[pos]:search_scoredown[pos]);
+
+ if(((YRES/GRID_S+3)/2)>lv)
+ {
+ ry = ((float)((YRES/GRID_S+3)/2)/(float)lv);
+ if(lv<8)
+ {
+ ry = ry/(8-lv);
+ }
+ nyu = search_scoreup[pos]*ry;
+ nyd = search_scoredown[pos]*ry;
+ }
+ else
+ {
+ ry = ((float)lv/(float)((YRES/GRID_S+3)/2));
+ nyu = search_scoreup[pos]/ry;
+ nyd = search_scoredown[pos]/ry;
+ }
+
+
+ fillrect(vid_buf, gx-1+(XRES/GRID_S)+5, gy-1+((YRES/GRID_S+3)/2)-nyu, 4, nyu, 57, 187, 57, 255);
+ fillrect(vid_buf, gx-1+(XRES/GRID_S)+5, gy-2+((YRES/GRID_S+3)/2), 4, nyd, 187, 57, 57, 255);
+ //drawrect(vid_buf, gx-2+(XRES/GRID_S)+5, gy-2+((YRES/GRID_S+3)/2)-nyu, 4, nyu, 0, 107, 10, 255);
+ //drawrect(vid_buf, gx-2+(XRES/GRID_S)+5, gy-2+((YRES/GRID_S+3)/2)+1, 4, nyd, 107, 10, 0, 255);
+ }
+ }
+
+ if(mp!=-1 && mmt>=TIMEOUT/5 && !st)
+ {
+ gi = mp % GRID_X;
+ gj = mp / GRID_X;
+ if(is_p1)
+ gj += GRID_Y-GRID_P;
+ gx = ((XRES/GRID_X)*gi) + (XRES/GRID_X-XRES/GRID_S)/2;
+ gy = (((YRES+15)/GRID_Y)*gj) + (YRES/GRID_Y-YRES/GRID_S+10)/2 + 18;
+ i = w = textwidth(search_names[mp]);
+ h = YRES/GRID_Z+30;
+ if(w<XRES/GRID_Z) w=XRES/GRID_Z;
+ gx += XRES/(GRID_S*2)-w/2;
+ gy += YRES/(GRID_S*2)-h/2;
+ if(gx<2) gx=2;
+ if(gx+w>=XRES-2) gx=XRES-3-w;
+ if(gy<32) gy=32;
+ if(gy+h>=YRES+(MENUSIZE-2)) gy=YRES+(MENUSIZE-3)-h;
+ clearrect(vid_buf, gx-2, gy-3, w+4, h);
+ drawrect(vid_buf, gx-2, gy-3, w+4, h, 160, 160, 192, 255);
+ if(search_thumbs[mp])
+ render_thumb(search_thumbs[mp], search_thsizes[mp], 1, vid_buf, gx+(w-(XRES/GRID_Z))/2, gy, GRID_Z);
+ drawtext(vid_buf, gx+(w-i)/2, gy+YRES/GRID_Z+4, search_names[mp], 192, 192, 192, 255);
+ drawtext(vid_buf, gx+(w-textwidth(search_owners[mp]))/2, gy+YRES/GRID_Z+16, search_owners[mp], 128, 128, 128, 255);
+ }
+
+ sdl_blit(0, 0, (XRES+BARSIZE), YRES+MENUSIZE, vid_buf, (XRES+BARSIZE));
+
+ ui_edit_process(mx, my, b, &ed);
+
+ if(sdl_key==SDLK_RETURN)
+ {
+ if(!last || (!active && (strcmp(last, ed.str) || last_own!=search_own || last_date!=search_date || last_page!=search_page)))
+ lasttime = TIMEOUT;
+ else if(search_ids[0] && !search_ids[1])
+ {
+ bq = 0;
+ b = 1;
+ mp = 0;
+ }
+ }
+ if(sdl_key==SDLK_ESCAPE)
+ goto finish;
+
+ if(b && !bq && mx>=XRES-64 && mx<=XRES-8 && my>=8 && my<=24 && svf_login)
+ {
+ search_own = !search_own;
+ lasttime = TIMEOUT;
+ }
+ if(b && !bq && mx>=XRES-129 && mx<=XRES-65 && my>=8 && my<=24)
+ {
+ search_date = !search_date;
+ lasttime = TIMEOUT;
+ }
+
+ if(b && !bq && dp!=-1)
+ if(confirm_ui(vid_buf, "Do you want to delete?", search_names[dp], "Delete"))
+ {
+ execute_delete(vid_buf, search_ids[dp]);
+ lasttime = TIMEOUT;
+ if(last)
+ {
+ free(last);
+ last = NULL;
+ }
+ }
+ if(b && !bq && dap!=-1)
+ {
+ sprintf(ed.str, "history:%s", search_ids[dap]);
+ lasttime = TIMEOUT;
+ }
+
+ if(b && !bq && tp!=-1)
+ {
+ strncpy(ed.str, tag_names[tp], 255);
+ lasttime = TIMEOUT;
+ }
+
+ if(b && !bq && mp!=-1 && st)
+ {
+ sprintf(ed.str, "user:%s", search_owners[mp]);
+ lasttime = TIMEOUT;
+ }
+
+ if(do_open==1)
+ {
+ mp = 0;
+ }
+
+ if((b && !bq && mp!=-1 && !st && !uih) || do_open==1)
+ {
+ fillrect(vid_buf, 0, 0, XRES+BARSIZE, YRES+MENUSIZE, 0, 0, 0, 255);
+ info_box(vid_buf, "Loading...");
+
+ if(search_dates[mp]) {
+ uri = malloc(strlen(search_ids[mp])*3+strlen(search_dates[mp])*3+strlen(SERVER)+71);
+ strcpy(uri, "http://" SERVER "/Get.api?Op=save&ID=");
+ strcaturl(uri, search_ids[mp]);
+ strappend(uri, "&Date=");
+ strcaturl(uri, search_dates[mp]);
+ } else {
+ uri = malloc(strlen(search_ids[mp])*3+strlen(SERVER)+64);
+ strcpy(uri, "http://" SERVER "/Get.api?Op=save&ID=");
+ strcaturl(uri, search_ids[mp]);
+ }
+ data = http_simple_get(uri, &status, &dlen);
+ free(uri);
+
+ if(status == 200)
+ {
+ status = parse_save(data, dlen, 1, 0, 0);
+ switch(status)
+ {
+ case 1:
+ error_ui(vid_buf, 0, "Simulation corrupted");
+ break;
+ case 2:
+ error_ui(vid_buf, 0, "Simulation from a newer version");
+ break;
+ case 3:
+ error_ui(vid_buf, 0, "Simulation on a too large grid");
+ break;
+ }
+ if(!status)
+ {
+ char *tnames[] = {"ID", NULL};
+ char *tparts[1];
+ int tplens[1];
+ if(svf_last)
+ free(svf_last);
+ svf_last = data;
+ svf_lsize = dlen;
+
+ tparts[0] = search_ids[mp];
+ tplens[0] = strlen(search_ids[mp]);
+ data = http_multipart_post("http://" SERVER "/Tags.api", tnames, tparts, tplens, svf_user, svf_pass, &status, NULL);
+
+ svf_open = 1;
+ svf_own = svf_login && !strcmp(search_owners[mp], svf_user);
+ svf_publish = search_publish[mp] && svf_login && !strcmp(search_owners[mp], svf_user);
+
+ strcpy(svf_id, search_ids[mp]);
+ strcpy(svf_name, search_names[mp]);
+ if(status == 200)
+ {
+ if(data)
+ {
+ strncpy(svf_tags, data, 255);
+ svf_tags[255] = 0;
+ }
+ else
+ svf_tags[0] = 0;
+ }
+ else
+ {
+ svf_tags[0] = 0;
+ }
+
+ if(svf_login)
+ {
+ char *names[] = {"ID", NULL};
+ char *parts[1];
+ parts[0] = search_ids[mp];
+ data = http_multipart_post("http://" SERVER "/Vote.api", names, parts, NULL, svf_user, svf_pass, &status, NULL);
+ if(status == 200)
+ {
+ if(data)
+ {
+ if(!strcmp(data, "Up"))
+ {
+ svf_myvote = 1;
+ }
+ else if(!strcmp(data, "Down"))
+ {
+ svf_myvote = -1;
+ }
+ else
+ {
+ svf_myvote = 0;
+ }
+ }
+ else
+ {
+ svf_myvote = 0;
+ }
+ }
+ else
+ {
+ svf_myvote = 0;
+ }
+ }
+ }
+ else
+ {
+ svf_open = 0;
+ svf_publish = 0;
+ svf_own = 0;
+ svf_myvote = 0;
+ svf_id[0] = 0;
+ svf_name[0] = 0;
+ svf_tags[0] = 0;
+ if(svf_last)
+ free(svf_last);
+ svf_last = NULL;
+ }
+ }
+ else
+ error_ui(vid_buf, status, http_ret_text(status));
+
+ if(data)
+ free(data);
+ goto finish;
+ }
+
+ if(!last)
+ {
+ search = 1;
+ }
+ else if(!active && (strcmp(last, ed.str) || last_own!=search_own || last_date!=search_date || last_page!=search_page))
+ {
+ search = 1;
+ if(strcmp(last, ed.str) || last_own!=search_own || last_date!=search_date)
+ {
+ search_page = 0;
+ page_count = 0;
+ }
+ free(last);
+ last = NULL;
+ }
+ else
+ search = 0;
+
+ if(search && lasttime>=TIMEOUT)
+ {
+ lasttime = 0;
+ last = mystrdup(ed.str);
+ last_own = search_own;
+ last_date = search_date;
+ last_page = search_page;
+ active = 1;
+ uri = malloc(strlen(last)*3+80+strlen(SERVER)+strlen(svf_user));
+ if(search_own || svf_admin || svf_mod)
+ tmp = "&ShowVotes=true";
+ else
+ tmp = "";
+ if(!search_own && !search_date && !*last)
+ {
+ if(search_page)
+ {
+ exp_res = GRID_X*GRID_Y;
+ sprintf(uri, "http://" SERVER "/Search.api?Start=%d&Count=%d%s&Query=", (search_page-1)*GRID_X*GRID_Y+GRID_X*GRID_P, exp_res+1, tmp);
+ }
+ else
+ {
+ exp_res = GRID_X*GRID_P;
+ sprintf(uri, "http://" SERVER "/Search.api?Start=%d&Count=%d&t=%d%s&Query=", 0, exp_res+1, ((GRID_Y-GRID_P)*YRES)/(GRID_Y*14)*GRID_X, tmp);
+ }
+ }
+ else
+ {
+ exp_res = GRID_X*GRID_Y;
+ sprintf(uri, "http://" SERVER "/Search.api?Start=%d&Count=%d%s&Query=", search_page*GRID_X*GRID_Y, exp_res+1, tmp);
+ }
+ strcaturl(uri, last);
+ if(search_own)
+ {
+ strcaturl(uri, " user:");
+ strcaturl(uri, svf_user);
+ }
+ if(search_date)
+ strcaturl(uri, " sort:date");
+
+ http = http_async_req_start(http, uri, NULL, 0, 1);
+ if(svf_login)
+ {
+ http_auth_headers(http, svf_user, svf_pass);
+ }
+ http_last_use = time(NULL);
+ free(uri);
+ }
+
+ if(active && http_async_req_status(http))
+ {
+ http_last_use = time(NULL);
+ results = http_async_req_stop(http, &status, NULL);
+ view_own = last_own;
+ if(status == 200)
+ {
+ page_count = search_results(results, last_own||svf_admin||svf_mod);
+ memset(thumb_drawn, 0, sizeof(thumb_drawn));
+ memset(v_buf, 0, ((YRES+MENUSIZE)*(XRES+BARSIZE))*PIXELSIZE);
+ }
+ is_p1 = (exp_res < GRID_X*GRID_Y);
+ free(results);
+ active = 0;
+ }
+
+ if(http && !active && (time(NULL)>http_last_use+HTTP_TIMEOUT))
+ {
+ http_async_req_close(http);
+ http = NULL;
+ }
+
+ for(i=0; i<IMGCONNS; i++)
+ {
+ if(img_http[i] && http_async_req_status(img_http[i]))
+ {
+ thumb = http_async_req_stop(img_http[i], &status, &thlen);
+ if(status != 200)
+ {
+ if(thumb)
+ free(thumb);
+ thumb = calloc(1,4);
+ thlen = 4;
+ }
+ thumb_cache_add(img_id[i], thumb, thlen);
+ for(pos=0; pos<GRID_X*GRID_Y; pos++) {
+ if(search_dates[pos]) {
+ char *id_d_temp = malloc(strlen(search_ids[pos])+strlen(search_dates[pos])+1);
+ strcpy(id_d_temp, search_ids[pos]);
+ strappend(id_d_temp, "_");
+ strappend(id_d_temp, search_dates[pos]);
+ //img_id[i] = mystrdup(id_d_temp);
+ if(id_d_temp && !strcmp(id_d_temp, img_id[i])) {
+ break;
+ }
+ } else {
+ if(search_ids[pos] && !strcmp(search_ids[pos], img_id[i])) {
+ break;
+ }
+ }
+ }
+ if(pos<GRID_X*GRID_Y)
+ {
+ search_thumbs[pos] = thumb;
+ search_thsizes[pos] = thlen;
+ }
+ else
+ free(thumb);
+ free(img_id[i]);
+ img_id[i] = NULL;
+ }
+ if(!img_id[i])
+ {
+ for(pos=0; pos<GRID_X*GRID_Y; pos++)
+ if(search_ids[pos] && !search_thumbs[pos])
+ {
+ for(gi=0; gi<IMGCONNS; gi++)
+ if(img_id[gi] && !strcmp(search_ids[pos], img_id[gi]))
+ break;
+ if(gi<IMGCONNS)
+ continue;
+ break;
+ }
+ if(pos<GRID_X*GRID_Y)
+ {
+ if(search_dates[pos]) {
+ char *id_d_temp = malloc(strlen(search_ids[pos])+strlen(search_dates[pos])+1);
+ uri = malloc(strlen(search_ids[pos])*3+strlen(search_dates[pos])*3+strlen(SERVER)+71);
+ strcpy(uri, "http://" SERVER "/Get.api?Op=thumb&ID=");
+ strcaturl(uri, search_ids[pos]);
+ strappend(uri, "&Date=");
+ strcaturl(uri, search_dates[pos]);
+
+ strcpy(id_d_temp, search_ids[pos]);
+ strappend(id_d_temp, "_");
+ strappend(id_d_temp, search_dates[pos]);
+ img_id[i] = mystrdup(id_d_temp);
+ } else {
+ uri = malloc(strlen(search_ids[pos])*3+strlen(SERVER)+64);
+ strcpy(uri, "http://" SERVER "/Get.api?Op=thumb&ID=");
+ strcaturl(uri, search_ids[pos]);
+ img_id[i] = mystrdup(search_ids[pos]);
+ }
+
+ img_http[i] = http_async_req_start(img_http[i], uri, NULL, 0, 1);
+ free(uri);
+ }
+ }
+ if(!img_id[i] && img_http[i])
+ {
+ http_async_req_close(img_http[i]);
+ img_http[i] = NULL;
+ }
+ }
+
+ if(lasttime<TIMEOUT)
+ lasttime++;
+ }
+
+finish:
+ if(last)
+ free(last);
+ if(http)
+ http_async_req_close(http);
+ for(i=0; i<IMGCONNS; i++)
+ if(img_http[i])
+ http_async_req_close(img_http[i]);
+
+ search_results("", 0);
+
+ strcpy(search_expr, ed.str);
+
+ return 0;
+}
+
+int search_results(char *str, int votes)
+{
+ int i,j;
+ char *p,*q,*r,*s,*vu,*vd,*pu,*sd;
+
+ for(i=0; i<GRID_X*GRID_Y; i++)
+ {
+ if(search_ids[i])
+ {
+ free(search_ids[i]);
+ search_ids[i] = NULL;
+ }
+ if(search_names[i])
+ {
+ free(search_names[i]);
+ search_names[i] = NULL;
+ }
+ if(search_dates[i])
+ {
+ free(search_dates[i]);
+ search_dates[i] = NULL;
+ }
+ if(search_owners[i])
+ {
+ free(search_owners[i]);
+ search_owners[i] = NULL;
+ }
+ if(search_thumbs[i])
+ {
+ free(search_thumbs[i]);
+ search_thumbs[i] = NULL;
+ search_thsizes[i] = 0;
+ }
+ }
+ for(j=0; j<TAG_MAX; j++)
+ if(tag_names[j])
+ {
+ free(tag_names[j]);
+ tag_names[j] = NULL;
+ }
+
+ if(!str || !*str)
+ return 0;
+
+ i = 0;
+ j = 0;
+ s = NULL;
+ do_open = 0;
+ while(1)
+ {
+ if(!*str)
+ break;
+ p = strchr(str, '\n');
+ if(!p)
+ p = str + strlen(str);
+ else
+ *(p++) = 0;
+ if(!strncmp(str, "OPEN ", 5))
+ {
+ do_open = 1;
+ if(i>=GRID_X*GRID_Y)
+ break;
+ if(votes)
+ {
+ pu = strchr(str+5, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ s = strchr(pu, ' ');
+ if(!s)
+ return i;
+ *(s++) = 0;
+ vu = strchr(s, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ else
+ {
+ pu = strchr(str+5, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ vu = strchr(pu, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ if(!q)
+ return i;
+ *(q++) = 0;
+ r = strchr(q, ' ');
+ if(!r)
+ return i;
+ *(r++) = 0;
+ search_ids[i] = mystrdup(str+5);
+
+ search_publish[i] = atoi(pu);
+ search_scoreup[i] = atoi(vu);
+ search_scoredown[i] = atoi(vd);
+
+ search_owners[i] = mystrdup(q);
+ search_names[i] = mystrdup(r);
+
+ if(s)
+ search_votes[i] = atoi(s);
+ thumb_cache_find(str+5, search_thumbs+i, search_thsizes+i);
+ i++;
+ }
+ else if(!strncmp(str, "HISTORY ", 8))
+ {
+ if(i>=GRID_X*GRID_Y)
+ break;
+ if(votes)
+ {
+ sd = strchr(str+8, ' ');
+ if(!sd)
+ return i;
+ *(sd++) = 0;
+ pu = strchr(sd, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ s = strchr(pu, ' ');
+ if(!s)
+ return i;
+ *(s++) = 0;
+ vu = strchr(s, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ else
+ {
+ sd = strchr(str+8, ' ');
+ if(!sd)
+ return i;
+ *(sd++) = 0;
+ pu = strchr(sd, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ vu = strchr(pu, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ if(!q)
+ return i;
+ *(q++) = 0;
+ r = strchr(q, ' ');
+ if(!r)
+ return i;
+ *(r++) = 0;
+ search_ids[i] = mystrdup(str+8);
+
+ search_dates[i] = mystrdup(sd);
+
+ search_publish[i] = atoi(pu);
+ search_scoreup[i] = atoi(vu);
+ search_scoredown[i] = atoi(vd);
+
+ search_owners[i] = mystrdup(q);
+ search_names[i] = mystrdup(r);
+
+ if(s)
+ search_votes[i] = atoi(s);
+ thumb_cache_find(str+8, search_thumbs+i, search_thsizes+i);
+ i++;
+ }
+ else if(!strncmp(str, "TAG ", 4))
+ {
+ if(j >= TAG_MAX)
+ {
+ str = p;
+ continue;
+ }
+ q = strchr(str+4, ' ');
+ if(!q)
+ {
+ str = p;
+ continue;
+ }
+ *(q++) = 0;
+ tag_names[j] = mystrdup(str+4);
+ tag_votes[j] = atoi(q);
+ j++;
+ }
+ else
+ {
+ if(i>=GRID_X*GRID_Y)
+ break;
+ if(votes)
+ {
+ pu = strchr(str, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ s = strchr(pu, ' ');
+ if(!s)
+ return i;
+ *(s++) = 0;
+ vu = strchr(s, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ else
+ {
+ pu = strchr(str, ' ');
+ if(!pu)
+ return i;
+ *(pu++) = 0;
+ vu = strchr(pu, ' ');
+ if(!vu)
+ return i;
+ *(vu++) = 0;
+ vd = strchr(vu, ' ');
+ if(!vd)
+ return i;
+ *(vd++) = 0;
+ q = strchr(vd, ' ');
+ }
+ if(!q)
+ return i;
+ *(q++) = 0;
+ r = strchr(q, ' ');
+ if(!r)
+ return i;
+ *(r++) = 0;
+ search_ids[i] = mystrdup(str);
+
+ search_publish[i] = atoi(pu);
+ search_scoreup[i] = atoi(vu);
+ search_scoredown[i] = atoi(vd);
+
+ search_owners[i] = mystrdup(q);
+ search_names[i] = mystrdup(r);
+
+ if(s)
+ search_votes[i] = atoi(s);
+ thumb_cache_find(str, search_thumbs+i, search_thsizes+i);
+ i++;
+ }
+ str = p;
+ }
+ if(*str)
+ i++;
+ return i;
+}
+
+int execute_tagop(pixel *vid_buf, char *op, char *tag)
+{
+ int status;
+ char *result;
+
+ char *names[] = {"ID", "Tag", NULL};
+ char *parts[2];
+
+ char *uri = malloc(strlen(SERVER)+strlen(op)+36);
+ sprintf(uri, "http://" SERVER "/Tag.api?Op=%s", op);
+
+ parts[0] = svf_id;
+ parts[1] = tag;
+
+ result = http_multipart_post(
+ uri,
+ names, parts, NULL,
+ svf_user, svf_pass,
+ &status, NULL);
+
+ free(uri);
+
+ if(status!=200)
+ {
+ error_ui(vid_buf, status, http_ret_text(status));
+ if(result)
+ free(result);
+ return 1;
+ }
+ if(result && strncmp(result, "OK", 2))
+ {
+ error_ui(vid_buf, 0, result);
+ free(result);
+ return 1;
+ }
+
+ if(result[2])
+ {
+ strncpy(svf_tags, result+3, 255);
+ svf_id[15] = 0;
+ }
+
+ if(result)
+ free(result);
+
+ return 0;
+}
+
+void execute_save(pixel *vid_buf)
+{
+ int status;
+ char *result;
+
+ char *names[] = {"Name", "Data:save.bin", "Thumb:thumb.bin", "Publish", "ID", NULL};
+ char *parts[5];
+ int plens[5];
+
+ parts[0] = svf_name;
+ plens[0] = strlen(svf_name);
+ parts[1] = build_save(plens+1, 0, 0, XRES, YRES);
+ parts[2] = build_thumb(plens+2, 1);
+ parts[3] = (svf_publish==1)?"Public":"Private";
+ plens[3] = strlen((svf_publish==1)?"Public":"Private");
+
+ if(svf_id[0])
+ {
+ parts[4] = svf_id;
+ plens[4] = strlen(svf_id);
+ }
+ else
+ names[4] = NULL;
+
+ result = http_multipart_post(
+ "http://" SERVER "/Save.api",
+ names, parts, plens,
+ svf_user, svf_pass,
+ &status, NULL);
+
+ if(svf_last)
+ free(svf_last);
+ svf_last = parts[1];
+ svf_lsize = plens[1];
+
+ free(parts[2]);
+
+ if(status!=200)
+ {
+ error_ui(vid_buf, status, http_ret_text(status));
+ if(result)
+ free(result);
+ return;
+ }
+ if(result && strncmp(result, "OK", 2))
+ {
+ error_ui(vid_buf, 0, result);
+ free(result);
+ return;
+ }
+
+ if(result[2])
+ {
+ strncpy(svf_id, result+3, 15);
+ svf_id[15] = 0;
+ }
+
+ if(!svf_id[0])
+ {
+ error_ui(vid_buf, 0, "No ID supplied by server");
+ free(result);
+ return;
+ }
+
+ thumb_cache_inval(svf_id);
+
+ svf_own = 1;
+ if(result)
+ free(result);
+}
+
+void execute_delete(pixel *vid_buf, char *id)
+{
+ int status;
+ char *result;
+
+ char *names[] = {"ID", NULL};
+ char *parts[1];
+
+ parts[0] = id;
+
+ result = http_multipart_post(
+ "http://" SERVER "/Delete.api",
+ names, parts, NULL,
+ svf_user, svf_pass,
+ &status, NULL);
+
+ if(status!=200)
+ {
+ error_ui(vid_buf, status, http_ret_text(status));
+ if(result)
+ free(result);
+ return;
+ }
+ if(result && strncmp(result, "OK", 2))
+ {
+ error_ui(vid_buf, 0, result);
+ free(result);
+ return;
+ }
+
+ if(result)
+ free(result);
+}
+
+int execute_vote(pixel *vid_buf, char *id, char *action)
+{
+ int status;
+ char *result;
+
+ char *names[] = {"ID", "Action", NULL};
+ char *parts[2];
+
+ parts[0] = id;
+ parts[1] = action;
+
+ result = http_multipart_post(
+ "http://" SERVER "/Vote.api",
+ names, parts, NULL,
+ svf_user, svf_pass,
+ &status, NULL);
+
+ if(status!=200)
+ {
+ error_ui(vid_buf, status, http_ret_text(status));
+ if(result)
+ free(result);
+ return 0;
+ }
+ if(result && strncmp(result, "OK", 2))
+ {
+ error_ui(vid_buf, 0, result);
+ free(result);
+ return 0;
+ }
+
+ if(result)
+ free(result);
+ return 1;
+}
diff --git a/src/main.c b/src/main.c
new file mode 100755
index 0000000..d88b972
--- /dev/null
+++ b/src/main.c
@@ -0,0 +1,2096 @@
+/**
+ * Powder Toy - Main source
+ *
+ * Copyright (c) 2008 - 2010 Stanislaw Skowronek.
+ * Copyright (c) 2010 Simon Robertshaw
+ * Copyright (c) 2010 Skresanov Savely
+ * Copyright (c) 2010 Bryan Hoyle
+ * Copyright (c) 2010 Nathan Cousins
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
+ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <math.h>
+#include <SDL/SDL.h>
+#include <bzlib.h>
+#include <time.h>
+
+#ifdef WIN32
+#include <direct.h>
+#else
+#include <sys/stat.h>
+#include <unistd.h>
+#endif
+
+#include <misc.h>
+#include <font.h>
+#include <defines.h>
+#include <powder.h>
+#include <graphics.h>
+#include <version.h>
+#include <http.h>
+#include <md5.h>
+#include <update.h>
+#include <hmap.h>
+#include <air.h>
+#include <icon.h>
+
+static const char *it_msg =
+ "\brThe Powder Toy\n"
+ "\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\x7F\n"
+ "\n"
+ "\bgControl+C/V/X are Copy, Paste and cut respectively.\n"
+ "\bgTo choose a material, hover over once of the icons on the right, it will show a selection of elements in that group.\n"
+ "\bgPick your material from the menu using mouse left/right buttons.\n"
+ "Draw freeform lines by dragging your mouse left/right button across the drawing area.\n"
+ "Shift+drag will create straight lines of particles.\n"
+ "Ctrl+drag will result in filled rectangles.\n"
+ "Ctrl+Shift+click will flood-fill a closed area.\n"
+ "Ctrl+Z will act as Undo.\n"
+ "Middle click or Alt+Click to \"sample\" the particles.\n"
+ "\n\boUse 'Z' for a zoom tool. Click to make the drawable zoom window stay around. Use the wheel to change the zoom strength\n"
+ "Use 'S' to save parts of the window as 'stamps'.\n"
+ "'L' will load the most recent stamp, 'K' shows a library of stamps you saved.\n"
+ "'C' will cycle the display mode (Fire, Blob, Velocity and Pressure). The numbers 1 to 7 will do the same\n"
+ "Use the mouse scroll wheel to change the tool size for particles.\n"
+ "'Q' will quit the application.\n"
+ "The spacebar can be used to pause physics.\n"
+ "'P' will take a screenshot and save it into the current directory.\n"
+ "\n"
+ "\brhttp://powdertoy.co.uk/\n"
+ "\bgCopyright (c) 2008-10 Stanislaw K Skowronek (\brhttp://powder.unaligned.org\bg, \bbirc.unaligned.org #wtf\bg)\n"
+ "\bgCopyright (c) 2010 Simon Robertshaw (\brhttp://powdertoy.co.uk\bg, \bbirc.freenode.net #powder\bg)\n"
+ "\bgCopyright (c) 2010 Skresanov Savely (Stickman)\n"
+ "\bgCopyright (c) 2010 Bryan Hoyle (New elements)\n"
+ "\bgCopyright (c) 2010 Nathan Cousins (New elements, small engine mods.)\n"
+ "\n"
+ "\bgSpecial thanks to Brian Ledbetter for maintaining ports.\n"
+ "\bgTo use online features such as saving, you need to register at: \brhttp://powdertoy.co.uk/Register.html"
+ ;
+
+typedef struct
+{
+ int start, inc;
+ pixel *vid;
+} upstruc;
+
+#ifdef BETA
+static const char *old_ver_msg_beta = "A new beta is available - click here!";
+#endif
+static const char *old_ver_msg = "A new version is available - click here!";
+float mheat = 0.0f;
+
+int do_open = 0;
+int sys_pause = 0;
+int legacy_enable = 0; //Used to disable new features such as heat, will be set by commandline or save.
+int death = 0, framerender = 0;
+int amd = 1;
+int FPSB = 0;
+
+sign signs[MAXSIGNS];
+
+int numCores = 4;
+
+int core_count()
+{
+ int numCPU = 1;
+#ifdef MT
+#ifdef WIN32
+ SYSTEM_INFO sysinfo;
+ GetSystemInfo( &sysinfo );
+ numCPU = sysinfo.dwNumberOfProcessors;
+#else
+#ifdef MACOSX
+ numCPU = 4;
+#else
+ numCPU = sysconf( _SC_NPROCESSORS_ONLN );
+#endif
+#endif
+
+ printf("Cpus: %d\n", numCPU);
+ if(numCPU>1)
+ printf("Multithreading enabled\n");
+ else
+ printf("Multithreading disabled\n");
+#endif
+ return numCPU;
+}
+
+int mousex = 0, mousey = 0; //They contain mouse position
+
+void sdl_seticon(void)
+{
+#ifdef WIN32
+ //SDL_Surface *icon = SDL_CreateRGBSurfaceFrom(app_icon_w32, 32, 32, 32, 128, 0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000);
+ //SDL_WM_SetIcon(icon, NULL/*app_icon_mask*/);
+#else
+#ifdef MACOSX
+ //SDL_Surface *icon = SDL_CreateRGBSurfaceFrom(app_icon_w32, 32, 32, 32, 128, 0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000);
+ //SDL_WM_SetIcon(icon, NULL/*app_icon_mask*/);
+#else
+ SDL_Surface *icon = SDL_CreateRGBSurfaceFrom(app_icon, 16, 16, 32, 128, 0x000000FF, 0x0000FF00, 0x00FF0000, 0xFF000000);
+ SDL_WM_SetIcon(icon, NULL/*app_icon_mask*/);
+#endif
+#endif
+}
+
+int frame_idx=0;
+void dump_frame(pixel *src, int w, int h, int pitch)
+{
+ char frame_name[32];
+ int j,i;
+ unsigned char c[3];
+ FILE *f;
+ sprintf(frame_name,"frame%04d.ppm",frame_idx);
+ f=fopen(frame_name,"wb");
+ fprintf(f,"P6\n%d %d\n255\n",w,h);
+ for(j=0; j<h; j++)
+ {
+ for(i=0; i<w; i++)
+ {
+ c[0] = PIXR(src[i]);
+ c[1] = PIXG(src[i]);
+ c[2] = PIXB(src[i]);
+ fwrite(c,3,1,f);
+ }
+ src+=pitch;
+ }
+ fclose(f);
+ frame_idx++;
+}
+
+/***********************************************************
+ * STATE MANAGEMENT *
+ ***********************************************************/
+
+void *build_thumb(int *size, int bzip2)
+{
+ unsigned char *d=calloc(1,XRES*YRES), *c;
+ int i,j,x,y;
+ for(i=0; i<NPART; i++)
+ if(parts[i].type)
+ {
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+ if(x>=0 && x<XRES && y>=0 && y<YRES)
+ d[x+y*XRES] = parts[i].type;
+ }
+ for(y=0; y<YRES/CELL; y++)
+ for(x=0; x<XRES/CELL; x++)
+ if(bmap[y][x])
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ d[x*CELL+i+(y*CELL+j)*XRES] = 0xFF;
+ j = XRES*YRES;
+
+ if(bzip2)
+ {
+ i = (j*101+99)/100 + 608;
+ c = malloc(i);
+
+ c[0] = 0x53;
+ c[1] = 0x68;
+ c[2] = 0x49;
+ c[3] = 0x74;
+ c[4] = PT_NUM;
+ c[5] = CELL;
+ c[6] = XRES/CELL;
+ c[7] = YRES/CELL;
+
+ i -= 8;
+
+ if(BZ2_bzBuffToBuffCompress((char *)(c+8), (unsigned *)&i, (char *)d, j, 9, 0, 0) != BZ_OK)
+ {
+ free(d);
+ free(c);
+ return NULL;
+ }
+ free(d);
+ *size = i+8;
+ return c;
+ }
+
+ *size = j;
+ return d;
+}
+
+void *build_save(int *size, int x0, int y0, int w, int h)
+{
+ unsigned char *d=calloc(1,3*(XRES/CELL)*(YRES/CELL)+(XRES*YRES)*8+MAXSIGNS*262), *c;
+ int i,j,x,y,p=0,*m=calloc(XRES*YRES, sizeof(int));
+ int bx0=x0/CELL, by0=y0/CELL, bw=(w+CELL-1)/CELL, bh=(h+CELL-1)/CELL;
+
+ // normalize coordinates
+ x0 = bx0*CELL;
+ y0 = by0*CELL;
+ w = bw *CELL;
+ h = bh *CELL;
+
+ // save the required air state
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ d[p++] = bmap[y][x];
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ if(bmap[y][x]==4)
+ {
+ i = (int)(fvx[y][x]*64.0f+127.5f);
+ if(i<0) i=0;
+ if(i>255) i=255;
+ d[p++] = i;
+ }
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ if(bmap[y][x]==4)
+ {
+ i = (int)(fvy[y][x]*64.0f+127.5f);
+ if(i<0) i=0;
+ if(i>255) i=255;
+ d[p++] = i;
+ }
+
+ // save the particle map
+ for(i=0; i<NPART; i++)
+ if(parts[i].type)
+ {
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+ if(x>=x0 && x<x0+w && y>=y0 && y<y0+h)
+ m[(x-x0)+(y-y0)*w] = i+1;
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ d[p++] = parts[i-1].type;
+ else
+ d[p++] = 0;
+ }
+
+ // save particle properties
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ {
+ i--;
+ x = (int)(parts[i].vx*16.0f+127.5f);
+ y = (int)(parts[i].vy*16.0f+127.5f);
+ if(x<0) x=0;
+ if(x>255) x=255;
+ if(y<0) y=0;
+ if(y>255) y=255;
+ d[p++] = x;
+ d[p++] = y;
+ }
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ d[p++] = (parts[i-1].life+3)/4;
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ {
+ //New Temperature saving uses a 16bit unsigned int for temperatures, giving a precision of 1 degree versus 36 for the old format
+ int tttemp = (int)parts[i-1].temp;
+ d[p++] = ((tttemp&0xFF00)>>8);
+ d[p++] = (tttemp&0x00FF);
+ }
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i && (parts[i-1].type==PT_CLNE || parts[i-1].type==PT_SPRK || parts[i-1].type==PT_LAVA))
+ d[p++] = parts[i-1].ctype;
+ }
+
+ j = 0;
+ for(i=0; i<MAXSIGNS; i++)
+ if(signs[i].text[0] &&
+ signs[i].x>=x0 && signs[i].x<x0+w &&
+ signs[i].y>=y0 && signs[i].y<y0+h)
+ j++;
+ d[p++] = j;
+ for(i=0; i<MAXSIGNS; i++)
+ if(signs[i].text[0] &&
+ signs[i].x>=x0 && signs[i].x<x0+w &&
+ signs[i].y>=y0 && signs[i].y<y0+h)
+ {
+ d[p++] = (signs[i].x-x0);
+ d[p++] = (signs[i].x-x0)>>8;
+ d[p++] = (signs[i].y-y0);
+ d[p++] = (signs[i].y-y0)>>8;
+ d[p++] = signs[i].ju;
+ x = strlen(signs[i].text);
+ d[p++] = x;
+ memcpy(d+p, signs[i].text, x);
+ p+=x;
+ }
+
+ i = (p*101+99)/100 + 612;
+ c = malloc(i);
+
+ //New file header uses PSv, replacing fuC. This is to detect if the client uses a new save format for temperatures
+ //This creates a problem for old clients, that display and "corrupt" error instead of a "newer version" error
+
+ c[0] = 0x50; //0x66;
+ c[1] = 0x53; //0x75;
+ c[2] = 0x76; //0x43;
+ c[3] = legacy_enable;
+ c[4] = SAVE_VERSION;
+ c[5] = CELL;
+ c[6] = bw;
+ c[7] = bh;
+ c[8] = p;
+ c[9] = p >> 8;
+ c[10] = p >> 16;
+ c[11] = p >> 24;
+
+ i -= 12;
+
+ if(BZ2_bzBuffToBuffCompress((char *)(c+12), (unsigned *)&i, (char *)d, p, 9, 0, 0) != BZ_OK)
+ {
+ free(d);
+ free(c);
+ return NULL;
+ }
+ free(d);
+
+ *size = i+12;
+ return c;
+}
+
+int parse_save(void *save, int size, int replace, int x0, int y0)
+{
+ unsigned char *d,*c=save;
+ int i,j,k,x,y,p=0,*m=calloc(XRES*YRES, sizeof(int)), ver, pty, ty, legacy_beta=0;
+ int bx0=x0/CELL, by0=y0/CELL, bw, bh, w, h;
+ int fp[NPART], nf=0, new_format = 0, ttv = 0;
+
+ //New file header uses PSv, replacing fuC. This is to detect if the client uses a new save format for temperatures
+ //This creates a problem for old clients, that display and "corrupt" error instead of a "newer version" error
+
+ if(size<16)
+ return 1;
+ if(!(c[2]==0x43 && c[1]==0x75 && c[0]==0x66) && !(c[2]==0x76 && c[1]==0x53 && c[0]==0x50))
+ return 1;
+ if(c[2]==0x76 && c[1]==0x53 && c[0]==0x50) {
+ new_format = 1;
+ }
+ if(c[4]>SAVE_VERSION)
+ return 2;
+ ver = c[4];
+
+ if(ver<34)
+ {
+ legacy_enable = 1;
+ }
+ else
+ {
+ if(c[3]==1||c[3]==0)
+ legacy_enable = c[3];
+ else
+ legacy_beta = 1;
+ }
+
+ bw = c[6];
+ bh = c[7];
+ if(bx0+bw > XRES/CELL)
+ bx0 = XRES/CELL - bw;
+ if(by0+bh > YRES/CELL)
+ by0 = YRES/CELL - bh;
+ if(bx0 < 0)
+ bx0 = 0;
+ if(by0 < 0)
+ by0 = 0;
+
+ if(c[5]!=CELL || bx0+bw>XRES/CELL || by0+bh>YRES/CELL)
+ return 3;
+ i = (unsigned)c[8];
+ i |= ((unsigned)c[9])<<8;
+ i |= ((unsigned)c[10])<<16;
+ i |= ((unsigned)c[11])<<24;
+ d = malloc(i);
+ if(!d)
+ return 1;
+
+ if(BZ2_bzBuffToBuffDecompress((char *)d, (unsigned *)&i, (char *)(c+12), size-12, 0, 0))
+ return 1;
+ size = i;
+
+ if(size < bw*bh)
+ return 1;
+
+ // normalize coordinates
+ x0 = bx0*CELL;
+ y0 = by0*CELL;
+ w = bw *CELL;
+ h = bh *CELL;
+
+ if(replace)
+ {
+ memset(bmap, 0, sizeof(bmap));
+ memset(emap, 0, sizeof(emap));
+ memset(signs, 0, sizeof(signs));
+ memset(parts, 0, sizeof(particle)*NPART);
+ memset(pmap, 0, sizeof(pmap));
+ memset(vx, 0, sizeof(vx));
+ memset(vy, 0, sizeof(vy));
+ memset(pv, 0, sizeof(pv));
+ }
+
+ // make a catalog of free parts
+ memset(pmap, 0, sizeof(pmap));
+ for(i=0; i<NPART; i++)
+ if(parts[i].type)
+ {
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+ pmap[y][x] = (i<<8)|1;
+ }
+ else
+ fp[nf++] = i;
+
+ // load the required air state
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ {
+ if(d[p])
+ bmap[y][x] = d[p];
+ p++;
+ }
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ if(d[(y-by0)*bw+(x-bx0)]==4)
+ {
+ if(p >= size)
+ goto corrupt;
+ fvx[y][x] = (d[p++]-127.0f)/64.0f;
+ }
+ for(y=by0; y<by0+bh; y++)
+ for(x=bx0; x<bx0+bw; x++)
+ if(d[(y-by0)*bw+(x-bx0)]==4)
+ {
+ if(p >= size)
+ goto corrupt;
+ fvy[y][x] = (d[p++]-127.0f)/64.0f;
+ }
+
+ // load the particle map
+ i = 0;
+ pty = p;
+ for(y=y0; y<y0+h; y++)
+ for(x=x0; x<x0+w; x++)
+ {
+ if(p >= size)
+ goto corrupt;
+ j=d[p++];
+ if(j >= PT_NUM)
+ goto corrupt;
+ if(j)// && !(isplayer == 1 && j==PT_STKM))
+ {
+ if(pmap[y][x])
+ {
+ k = pmap[y][x]>>8;
+ parts[k].type = j;
+ parts[k].x = (float)x;
+ parts[k].y = (float)y;
+ m[(x-x0)+(y-y0)*w] = k+1;
+ }
+ else if(i < nf)
+ {
+ parts[fp[i]].type = j;
+ parts[fp[i]].x = (float)x;
+ parts[fp[i]].y = (float)y;
+ m[(x-x0)+(y-y0)*w] = fp[i]+1;
+ i++;
+ }
+ else
+ m[(x-x0)+(y-y0)*w] = NPART+1;
+ }
+ }
+
+ // load particle properties
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ {
+ i--;
+ if(p+1 >= size)
+ goto corrupt;
+ if(i < NPART)
+ {
+ parts[i].vx = (d[p++]-127.0f)/16.0f;
+ parts[i].vy = (d[p++]-127.0f)/16.0f;
+ if(parts[i].type == PT_STKM)
+ {
+ //player[2] = PT_DUST;
+
+ player[3] = parts[i].x-1; //Setting legs positions
+ player[4] = parts[i].y+6;
+ player[5] = parts[i].x-1;
+ player[6] = parts[i].y+6;
+
+ player[7] = parts[i].x-3;
+ player[8] = parts[i].y+12;
+ player[9] = parts[i].x-3;
+ player[10] = parts[i].y+12;
+
+ player[11] = parts[i].x+1;
+ player[12] = parts[i].y+6;
+ player[13] = parts[i].x+1;
+ player[14] = parts[i].y+6;
+
+ player[15] = parts[i].x+3;
+ player[16] = parts[i].y+12;
+ player[17] = parts[i].x+3;
+ player[18] = parts[i].y+12;
+
+ }
+ }
+ else
+ p += 2;
+ }
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ if(i)
+ {
+ if(p >= size)
+ goto corrupt;
+ if(i <= NPART)
+ parts[i-1].life = d[p++]*4;
+ else
+ p++;
+ }
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ ty = d[pty+j];
+ if(i)
+ {
+ if(ver>=34&&legacy_beta==0)
+ {
+ if(p >= size)
+ {
+ goto corrupt;
+ }
+ if(i <= NPART)
+ {
+ if(ver>=42) {
+ if(new_format) {
+ ttv = (d[p++])<<8;
+ ttv |= (d[p++]);
+ parts[i-1].temp = ttv;
+ } else {
+ parts[i-1].temp = (d[p++]*((MAX_TEMP+(-MIN_TEMP))/255))+MIN_TEMP;
+ }
+ } else {
+ parts[i-1].temp = ((d[p++]*((O_MAX_TEMP+(-O_MIN_TEMP))/255))+O_MIN_TEMP)+273;
+ }
+ }
+ else
+ {
+ p++;
+ if(new_format) {
+ p++;
+ }
+ }
+ }
+ else
+ {
+ parts[i-1].temp = ptypes[parts[i-1].type].heat;
+ }
+ }
+ }
+ for(j=0; j<w*h; j++)
+ {
+ i = m[j];
+ ty = d[pty+j];
+ if(i && (ty==PT_CLNE || (ty==PT_SPRK && ver>=21) || (ty==PT_LAVA && ver>=34)))
+ {
+ if(p >= size)
+ goto corrupt;
+ if(i <= NPART)
+ parts[i-1].ctype = d[p++];
+ else
+ p++;
+ }
+ }
+
+ if(p >= size)
+ goto version1;
+ j = d[p++];
+ for(i=0; i<j; i++)
+ {
+ if(p+6 > size)
+ goto corrupt;
+ for(k=0; k<MAXSIGNS; k++)
+ if(!signs[k].text[0])
+ break;
+ x = d[p++];
+ x |= ((unsigned)d[p++])<<8;
+ if(k<MAXSIGNS)
+ signs[k].x = x+x0;
+ x = d[p++];
+ x |= ((unsigned)d[p++])<<8;
+ if(k<MAXSIGNS)
+ signs[k].y = x+y0;
+ x = d[p++];
+ if(k<MAXSIGNS)
+ signs[k].ju = x;
+ x = d[p++];
+ if(p+x > size)
+ goto corrupt;
+ if(k<MAXSIGNS)
+ {
+ memcpy(signs[k].text, d+p, x);
+ signs[k].text[x] = 0;
+ }
+ p += x;
+ }
+
+version1:
+ free(d);
+
+ return 0;
+
+corrupt:
+ if(replace)
+ {
+ legacy_enable = 0;
+ memset(signs, 0, sizeof(signs));
+ memset(parts, 0, sizeof(particle)*NPART);
+ memset(bmap, 0, sizeof(bmap));
+ }
+ return 1;
+}
+
+// stamps library
+
+stamp stamps[STAMP_MAX];//[STAMP_X*STAMP_Y];
+
+int stamp_count = 0;
+
+unsigned last_time=0, last_name=0;
+void stamp_gen_name(char *fn)
+{
+ unsigned t=(unsigned)time(NULL);
+
+ if(last_time!=t)
+ {
+ last_time=t;
+ last_name=0;
+ }
+ else
+ last_name++;
+
+ sprintf(fn, "%08x%02x", last_time, last_name);
+}
+
+void stamp_update(void)
+{
+ FILE *f;
+ int i;
+ f=fopen("stamps" PATH_SEP "stamps.def", "wb");
+ if(!f)
+ return;
+ for(i=0; i<STAMP_MAX; i++)
+ {
+ if(!stamps[i].name[0])
+ break;
+ if(stamps[i].dodelete!=1)
+ {
+ fwrite(stamps[i].name, 1, 10, f);
+ }
+ }
+ fclose(f);
+}
+
+void stamp_gen_thumb(int i)
+{
+ char fn[64];
+ void *data;
+ int size, factor_x, factor_y;
+ pixel *tmp;
+
+ if(stamps[i].thumb)
+ {
+ free(stamps[i].thumb);
+ stamps[i].thumb = NULL;
+ }
+
+ sprintf(fn, "stamps" PATH_SEP "%s.stm", stamps[i].name);
+ data = file_load(fn, &size);
+
+ if(data)
+ {
+ stamps[i].thumb = prerender_save(data, size, &(stamps[i].thumb_w), &(stamps[i].thumb_h));
+ if(stamps[i].thumb && (stamps[i].thumb_w>XRES/GRID_S || stamps[i].thumb_h>YRES/GRID_S))
+ {
+ factor_x = ceil((float)stamps[i].thumb_w/(float)(XRES/GRID_S));
+ factor_y = ceil((float)stamps[i].thumb_h/(float)(YRES/GRID_S));
+ if(factor_y > factor_x)
+ factor_x = factor_y;
+ tmp = rescale_img(stamps[i].thumb, stamps[i].thumb_w, stamps[i].thumb_h, &(stamps[i].thumb_w), &(stamps[i].thumb_h), factor_x);
+ free(stamps[i].thumb);
+ stamps[i].thumb = tmp;
+ }
+ }
+
+ free(data);
+}
+
+int clipboard_ready = 0;
+void *clipboard_data = 0;
+int clipboard_length = 0;
+
+void stamp_save(int x, int y, int w, int h)
+{
+ FILE *f;
+ int n;
+ char fn[64], sn[16];
+ void *s=build_save(&n, x, y, w, h);
+
+#ifdef WIN32
+ _mkdir("stamps");
+#else
+ mkdir("stamps", 0755);
+#endif
+
+ stamp_gen_name(sn);
+ sprintf(fn, "stamps" PATH_SEP "%s.stm", sn);
+
+ f = fopen(fn, "wb");
+ if(!f)
+ return;
+ fwrite(s, n, 1, f);
+ fclose(f);
+
+ free(s);
+
+ if(stamps[STAMP_MAX-1].thumb)
+ free(stamps[STAMP_MAX-1].thumb);
+ memmove(stamps+1, stamps, sizeof(struct stamp)*(STAMP_MAX-1));
+ memset(stamps, 0, sizeof(struct stamp));
+ if(stamp_count<STAMP_MAX)
+ stamp_count++;
+
+ strcpy(stamps[0].name, sn);
+ stamp_gen_thumb(0);
+
+ stamp_update();
+}
+
+void *stamp_load(int i, int *size)
+{
+ void *data;
+ char fn[64];
+ struct stamp tmp;
+
+ if(!stamps[i].thumb || !stamps[i].name[0])
+ return NULL;
+
+ sprintf(fn, "stamps" PATH_SEP "%s.stm", stamps[i].name);
+ data = file_load(fn, size);
+ if(!data)
+ return NULL;
+
+ if(i>0)
+ {
+ memcpy(&tmp, stamps+i, sizeof(struct stamp));
+ memmove(stamps+1, stamps, sizeof(struct stamp)*i);
+ memcpy(stamps, &tmp, sizeof(struct stamp));
+
+ stamp_update();
+ }
+
+ return data;
+}
+
+void stamp_init(void)
+{
+ int i;
+ FILE *f;
+
+ memset(stamps, 0, sizeof(stamps));
+
+ f=fopen("stamps" PATH_SEP "stamps.def", "rb");
+ if(!f)
+ return;
+ for(i=0; i<STAMP_MAX; i++)
+ {
+ fread(stamps[i].name, 1, 10, f);
+ if(!stamps[i].name[0])
+ break;
+ stamp_count++;
+ stamp_gen_thumb(i);
+ }
+ fclose(f);
+}
+
+void del_stamp(int d)
+{
+ stamps[d].dodelete = 1;
+ stamp_update();
+ stamp_count = 0;
+ stamp_init();
+}
+
+void thumb_cache_inval(char *id);
+
+char *thumb_cache_id[THUMB_CACHE_SIZE];
+void *thumb_cache_data[THUMB_CACHE_SIZE];
+int thumb_cache_size[THUMB_CACHE_SIZE];
+int thumb_cache_lru[THUMB_CACHE_SIZE];
+
+void thumb_cache_inval(char *id)
+{
+ int i,j;
+ for(i=0; i<THUMB_CACHE_SIZE; i++)
+ if(thumb_cache_id[i] && !strcmp(id, thumb_cache_id[i]))
+ break;
+ if(i >= THUMB_CACHE_SIZE)
+ return;
+ free(thumb_cache_id[i]);
+ free(thumb_cache_data[i]);
+ thumb_cache_id[i] = NULL;
+ for(j=0; j<THUMB_CACHE_SIZE; j++)
+ if(thumb_cache_lru[j] > thumb_cache_lru[i])
+ thumb_cache_lru[j]--;
+}
+void thumb_cache_add(char *id, void *thumb, int size)
+{
+ int i,m=-1,j=-1;
+ thumb_cache_inval(id);
+ for(i=0; i<THUMB_CACHE_SIZE; i++)
+ {
+ if(!thumb_cache_id[i])
+ break;
+ if(thumb_cache_lru[i] > m)
+ {
+ m = thumb_cache_lru[i];
+ j = i;
+ }
+ }
+ if(i >= THUMB_CACHE_SIZE)
+ {
+ thumb_cache_inval(thumb_cache_id[j]);
+ i = j;
+ }
+ for(j=0; j<THUMB_CACHE_SIZE; j++)
+ thumb_cache_lru[j] ++;
+ thumb_cache_id[i] = mystrdup(id);
+ thumb_cache_data[i] = malloc(size);
+ memcpy(thumb_cache_data[i], thumb, size);
+ thumb_cache_size[i] = size;
+ thumb_cache_lru[i] = 0;
+}
+int thumb_cache_find(char *id, void **thumb, int *size)
+{
+ int i,j;
+ for(i=0; i<THUMB_CACHE_SIZE; i++)
+ if(thumb_cache_id[i] && !strcmp(id, thumb_cache_id[i]))
+ break;
+ if(i >= THUMB_CACHE_SIZE)
+ return 0;
+ for(j=0; j<THUMB_CACHE_SIZE; j++)
+ if(thumb_cache_lru[j] < thumb_cache_lru[i])
+ thumb_cache_lru[j]++;
+ thumb_cache_lru[i] = 0;
+ *thumb = malloc(thumb_cache_size[i]);
+ *size = thumb_cache_size[i];
+ memcpy(*thumb, thumb_cache_data[i], *size);
+ return 1;
+}
+
+char http_proxy_string[256] = "";
+
+unsigned char last_major=0, last_minor=0, update_flag=0;
+
+char *tag = "(c) 2008-9 Stanislaw Skowronek";
+int itc = 0;
+char itc_msg[64] = "[?]";
+
+char my_uri[] = "http://" SERVER "/Update.api?Action=Download&Architecture="
+#if defined WIN32
+ "Windows32"
+#elif defined LIN32
+ "Linux32"
+#elif defined LIN64
+ "Linux64"
+#elif defined MACOSX
+ "MacOSX"
+#else
+ "Unknown"
+#endif
+ "&InstructionSet="
+#if defined X86_SSE3
+ "SSE3"
+#elif defined X86_SSE2
+ "SSE2"
+#elif defined X86_SSE
+ "SSE"
+#else
+ "SSE"
+#endif
+ ;
+int main(int argc, char *argv[])
+{
+ int hud_enable = 1;
+ int active_menu = 0;
+#ifdef BETA
+ int is_beta = 0;
+#endif
+ char uitext[48] = "";
+ char heattext[64] = "";
+ int currentTime = 0;
+ int FPS = 0;
+ int pastFPS = 0;
+ int past = 0;
+ pixel *vid_buf=calloc((XRES+BARSIZE)*(YRES+MENUSIZE), PIXELSIZE);
+ void *http_ver_check;
+ char *ver_data=NULL, *tmp;
+ int i, j, bq, fire_fc=0, do_check=0, old_version=0, http_ret=0, major, minor, old_ver_len;
+#ifdef INTERNAL
+ int vs = 0;
+#endif
+ int x, y, b = 0, sl=1, sr=0, su=0, c, lb = 0, lx = 0, ly = 0, lm = 0;//, tx, ty;
+ int da = 0, db = 0, it = 2047, mx, my, bs = 2;
+ float nfvx, nfvy;
+ int load_mode=0, load_w=0, load_h=0, load_x=0, load_y=0, load_size=0;
+ void *load_data=NULL;
+ pixel *load_img=NULL;//, *fbi_img=NULL;
+ int save_mode=0, save_x=0, save_y=0, save_w=0, save_h=0, copy_mode=0;
+
+#ifdef MT
+ numCores = core_count();
+#endif
+//TODO: Move out version stuff
+#ifdef BETA
+ if(is_beta)
+ {
+ old_ver_len = textwidth(old_ver_msg_beta);
+ }
+ else
+ {
+ old_ver_len = textwidth(old_ver_msg);
+ }
+#else
+ old_ver_len = textwidth(old_ver_msg);
+#endif
+ menu_count();
+ parts = calloc(sizeof(particle), NPART);
+ cb_parts = calloc(sizeof(particle), NPART);
+ for(i=0; i<NPART-1; i++)
+ parts[i].life = i+1;
+ parts[NPART-1].life = -1;
+ pfree = 0;
+ fire_bg=calloc(XRES*YRES, PIXELSIZE);
+ memset(signs, 0, sizeof(signs));
+
+ //fbi_img = render_packed_rgb(fbi, FBI_W, FBI_H, FBI_CMP);
+
+ load_presets();
+
+ for(i=1; i<argc; i++)
+ {
+ if(!strncmp(argv[i], "scale:", 6))
+ {
+ sdl_scale = (argv[i][6]=='2') ? 2 : 1;
+ }
+ else if(!strncmp(argv[i], "proxy:", 6))
+ {
+ memset(http_proxy_string, 0, sizeof(http_proxy_string));
+ strncpy(http_proxy_string, argv[i]+6, 255);
+ }
+ else if(!strncmp(argv[i], "nohud", 5))
+ {
+ hud_enable = 0;
+ }
+ }
+
+ save_presets(0);
+
+ make_kernel();
+ prepare_alpha();
+
+ stamp_init();
+
+ sdl_open();
+ http_init(http_proxy_string[0] ? http_proxy_string : NULL);
+
+ if(cpu_check())
+ {
+ error_ui(vid_buf, 0, "Unsupported CPU. Try another version.");
+ return 1;
+ }
+
+#ifdef BETA
+ http_ver_check = http_async_req_start(NULL, "http://" SERVER "/Update.api?Action=CheckVersion", NULL, 0, 0);
+#else
+ http_ver_check = http_async_req_start(NULL, "http://" SERVER "/Update.api?Action=CheckVersion", NULL, 0, 0);
+#endif
+
+ while(!sdl_poll())
+ {
+ for(i=0; i<YRES/CELL; i++)
+ {
+ pv[i][0] = pv[i][0]*0.8f;
+ pv[i][1] = pv[i][1]*0.8f;
+ pv[i][2] = pv[i][2]*0.8f;
+ pv[i][XRES/CELL-2] = pv[i][XRES/CELL-2]*0.8f;
+ pv[i][XRES/CELL-1] = pv[i][XRES/CELL-1]*0.8f;
+ vx[i][0] = vx[i][1]*0.9f;
+ vx[i][1] = vx[i][2]*0.9f;
+ vx[i][XRES/CELL-2] = vx[i][XRES/CELL-3]*0.9f;
+ vx[i][XRES/CELL-1] = vx[i][XRES/CELL-2]*0.9f;
+ vy[i][0] = vy[i][1]*0.9f;
+ vy[i][1] = vy[i][2]*0.9f;
+ vy[i][XRES/CELL-2] = vy[i][XRES/CELL-3]*0.9f;
+ vy[i][XRES/CELL-1] = vy[i][XRES/CELL-2]*0.9f;
+ }
+ for(i=0; i<XRES/CELL; i++)
+ {
+ pv[0][i] = pv[0][i]*0.8f;
+ pv[1][i] = pv[1][i]*0.8f;
+ pv[2][i] = pv[2][i]*0.8f;
+ pv[YRES/CELL-2][i] = pv[YRES/CELL-2][i]*0.8f;
+ pv[YRES/CELL-1][i] = pv[YRES/CELL-1][i]*0.8f;
+ vx[0][i] = vx[1][i]*0.9f;
+ vx[1][i] = vx[2][i]*0.9f;
+ vx[YRES/CELL-2][i] = vx[YRES/CELL-3][i]*0.9f;
+ vx[YRES/CELL-1][i] = vx[YRES/CELL-2][i]*0.9f;
+ vy[0][i] = vy[1][i]*0.9f;
+ vy[1][i] = vy[2][i]*0.9f;
+ vy[YRES/CELL-2][i] = vy[YRES/CELL-3][i]*0.9f;
+ vy[YRES/CELL-1][i] = vy[YRES/CELL-2][i]*0.9f;
+ }
+
+ for(j=1; j<YRES/CELL; j++)
+ {
+ for(i=1; i<XRES/CELL; i++)
+ {
+ if(bmap[j][i]==1 || bmap[j][i]==8 || (bmap[j][i]==7 && !emap[j][i]))
+ {
+ vx[j][i] = 0.0f;
+ vx[j][i-1] = 0.0f;
+ vy[j][i] = 0.0f;
+ vy[j-1][i] = 0.0f;
+ }
+ }
+ }
+
+ if(!sys_pause||framerender)
+ {
+ update_air();
+ }
+#ifdef OpenGL
+ ClearScreen();
+#else
+ if(cmode==0 || cmode==1)
+ {
+ draw_air(vid_buf);
+ }
+ else if(cmode==2)
+ {
+ memcpy(vid_buf, fire_bg, XRES*YRES*PIXELSIZE);
+ memset(vid_buf+(XRES*YRES), 0, ((XRES+BARSIZE)*YRES*PIXELSIZE)-(XRES*YRES*PIXELSIZE));
+ }
+ else
+ {
+ memset(vid_buf, 0, (XRES+BARSIZE)*YRES*PIXELSIZE);
+ }
+#endif
+ update_particles(vid_buf);
+ draw_parts(vid_buf);
+
+ if(cmode==2)
+ {
+ if(!fire_fc)
+ {
+ dim_copy(fire_bg, vid_buf);
+ }
+ else
+ {
+ memcpy(fire_bg, vid_buf, XRES*YRES*PIXELSIZE);
+ }
+ fire_fc = (fire_fc+1) % 3;
+ }
+ if(cmode==3||cmode==4||cmode==6)
+ render_fire(vid_buf);
+
+ render_signs(vid_buf);
+
+ memset(vid_buf+((XRES+BARSIZE)*YRES), 0, (PIXELSIZE*(XRES+BARSIZE))*MENUSIZE);
+ clearrect(vid_buf, XRES-1, 0, BARSIZE+1, YRES);
+
+ draw_svf_ui(vid_buf);
+
+ if(http_ver_check)
+ {
+ if(!do_check && http_async_req_status(http_ver_check))
+ {
+ ver_data = http_async_req_stop(http_ver_check, &http_ret, NULL);
+ if(http_ret==200 && ver_data)
+ {
+#ifdef BETA
+ if(sscanf(ver_data, "%d.%d.%d", &major, &minor, &is_beta)==3)
+ if(major>SAVE_VERSION || (major==SAVE_VERSION && minor>MINOR_VERSION) || (major==SAVE_VERSION && is_beta == 0))
+ old_version = 1;
+#else
+ if(sscanf(ver_data, "%d.%d", &major, &minor)==2)
+ if(major>SAVE_VERSION || (major==SAVE_VERSION && minor>MINOR_VERSION))
+ old_version = 1;
+#endif
+ free(ver_data);
+ }
+ http_ver_check = NULL;
+ }
+ do_check = (do_check+1) & 15;
+ }
+
+ if(sdl_key=='q' || sdl_key==SDLK_ESCAPE)
+ {
+ if(confirm_ui(vid_buf, "You are about to quit", "Are you sure you want to quit?", "Quit"))
+ {
+ break;
+ }
+ }
+ if(sdl_key=='d' && isplayer)
+ {
+ death = 1;
+ //death = !(death);
+ }
+ if(sdl_key=='f')
+ {
+ framerender = 1;
+ }
+ if((sdl_key=='l' || sdl_key=='k') && stamps[0].name[0])
+ {
+ if(load_mode)
+ {
+ free(load_img);
+ free(load_data);
+ load_mode = 0;
+ load_data = NULL;
+ load_img = NULL;
+ }
+ if(it > 50)
+ it = 50;
+ if(sdl_key=='k' && stamps[1].name[0])
+ {
+ j = stamp_ui(vid_buf);
+ if(j>=0)
+ load_data = stamp_load(j, &load_size);
+ else
+ load_data = NULL;
+ }
+ else
+ load_data = stamp_load(0, &load_size);
+ if(load_data)
+ {
+ load_img = prerender_save(load_data, load_size, &load_w, &load_h);
+ if(load_img)
+ load_mode = 1;
+ else
+ free(load_data);
+ }
+ }
+ if(sdl_key=='s')
+ {
+ if(it > 50)
+ it = 50;
+ save_mode = 1;
+ }
+ if(sdl_key=='1')
+ {
+ set_cmode(0);
+ }
+ if(sdl_key=='2')
+ {
+ set_cmode(1);
+ }
+ if(sdl_key=='3')
+ {
+ set_cmode(2);
+ }
+ if(sdl_key=='4')
+ {
+ set_cmode(3);
+ }
+ if(sdl_key=='5')
+ {
+ set_cmode(4);
+ }
+ if(sdl_key=='6')
+ {
+ set_cmode(5);
+ }
+ if(sdl_key=='7')
+ {
+ set_cmode(6);
+ }
+ if(sdl_key==SDLK_LEFTBRACKET) {
+ if(sdl_zoom_trig==1)
+ {
+ ZSIZE -= 1;
+ if(ZSIZE>32)
+ ZSIZE = 32;
+ if(ZSIZE<2)
+ ZSIZE = 2;
+ ZFACTOR = 256/ZSIZE;
+ }
+ else
+ {
+ if(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL))
+ bs -= 1;
+ else
+ bs -= ceil((bs/5)+0.5f);
+ if(bs>1224)
+ bs = 1224;
+ if(bs<0)
+ bs = 0;
+ }
+ }
+ if(sdl_key==SDLK_RIGHTBRACKET) {
+ if(sdl_zoom_trig==1)
+ {
+ ZSIZE += 1;
+ if(ZSIZE>32)
+ ZSIZE = 32;
+ if(ZSIZE<2)
+ ZSIZE = 2;
+ ZFACTOR = 256/ZSIZE;
+ }
+ else
+ {
+ if(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL))
+ bs += 1;
+ else
+ bs += ceil((bs/5)+0.5f);
+ if(bs>1224)
+ bs = 1224;
+ if(bs<0)
+ bs = 0;
+ }
+ }
+ if(sdl_key==SDLK_SPACE)
+ sys_pause = !sys_pause;
+ if(sdl_key=='h')
+ hud_enable = !hud_enable;
+ if(sdl_key=='p')
+ dump_frame(vid_buf, XRES, YRES, XRES+BARSIZE);
+ if(sdl_key=='v'&&(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)))
+ {
+ if(clipboard_ready==1)
+ {
+ load_data = malloc(clipboard_length);
+ memcpy(load_data, clipboard_data, clipboard_length);
+ load_size = clipboard_length;
+ if(load_data)
+ {
+ load_img = prerender_save(load_data, load_size, &load_w, &load_h);
+ if(load_img)
+ load_mode = 1;
+ else
+ free(load_data);
+ }
+ }
+ }
+ if(sdl_key=='x'&&(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)))
+ {
+ save_mode = 1;
+ copy_mode = 2;
+ }
+ if(sdl_key=='c'&&(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)))
+ {
+ save_mode = 1;
+ copy_mode = 1;
+ }
+ else if(sdl_key=='c')
+ {
+ set_cmode((cmode+1) % 7);
+ if(it > 50)
+ it = 50;
+ }
+ if(sdl_key=='z'&&(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL))) // Undo
+ {
+ int cbx, cby, cbi;
+
+ for(cbi=0; cbi<NPART; cbi++)
+ parts[cbi] = cb_parts[cbi];
+
+ for(cby = 0; cby<YRES; cby++)
+ for(cbx = 0; cbx<XRES; cbx++)
+ pmap[cby][cbx] = cb_pmap[cby][cbx];
+
+ for(cby = 0; cby<(YRES/CELL); cby++)
+ for(cbx = 0; cbx<(XRES/CELL); cbx++)
+ {
+ vx[cby][cbx] = cb_vx[cby][cbx];
+ vy[cby][cbx] = cb_vy[cby][cbx];
+ pv[cby][cbx] = cb_pv[cby][cbx];
+ bmap[cby][cbx] = cb_bmap[cby][cbx];
+ emap[cby][cbx] = cb_emap[cby][cbx];
+ }
+ }
+#ifdef INTERNAL
+ if(sdl_key=='v')
+ vs = !vs;
+ if(vs)
+ dump_frame(vid_buf, XRES, YRES, XRES+BARSIZE);
+#endif
+
+ if(sdl_wheel)
+ {
+ if(sdl_zoom_trig==1)
+ {
+ ZSIZE += sdl_wheel;
+ if(ZSIZE>32)
+ ZSIZE = 32;
+ if(ZSIZE<2)
+ ZSIZE = 2;
+ ZFACTOR = 256/ZSIZE;
+ sdl_wheel = 0;
+ }
+ else
+ {
+ bs += sdl_wheel;
+ if(bs>1224)
+ bs = 1224;
+ if(bs<0)
+ bs = 0;
+ sdl_wheel = 0;
+ /*if(su >= PT_NUM) {
+ if(sl < PT_NUM)
+ su = sl;
+ if(sr < PT_NUM)
+ su = sr;
+ }*/
+ }
+ }
+
+ bq = b;
+ b = SDL_GetMouseState(&x, &y);
+
+ for(i=0; i<SC_TOTAL; i++)
+ {
+ draw_menu(vid_buf, i, active_menu);
+ }
+
+ for(i=0; i<SC_TOTAL; i++)
+ {
+ if(!b&&x>=sdl_scale*(XRES-2) && x<sdl_scale*(XRES+BARSIZE-1) &&y>= sdl_scale*((i*16)+YRES+MENUSIZE-16-(SC_TOTAL*16)) && y<sdl_scale*((i*16)+YRES+MENUSIZE-16-(SC_TOTAL*16)+15))
+ {
+ active_menu = i;
+ }
+ }
+ menu_ui_v3(vid_buf, active_menu, &sl, &sr, b, bq, x, y);
+
+ if(zoom_en && x>=sdl_scale*zoom_wx && y>=sdl_scale*zoom_wy
+ && x<sdl_scale*(zoom_wx+ZFACTOR*ZSIZE)
+ && y<sdl_scale*(zoom_wy+ZFACTOR*ZSIZE))
+ {
+ x = (((x/sdl_scale-zoom_wx)/ZFACTOR)+zoom_x)*sdl_scale;
+ y = (((y/sdl_scale-zoom_wy)/ZFACTOR)+zoom_y)*sdl_scale;
+ }
+ if(y>0 && y<sdl_scale*YRES && x>0 && x<sdl_scale*XRES)
+ {
+ int cr;
+ cr = pmap[y/sdl_scale][x/sdl_scale];
+ if(!((cr>>8)>=NPART || !cr))
+ {
+#ifdef BETA
+ sprintf(heattext, "%s, Pressure: %3.2f, Temp: %4.2f C, Life: %d", ptypes[cr&0xFF].name, pv[(y/sdl_scale)/CELL][(x/sdl_scale)/CELL], parts[cr>>8].temp-273.15f, parts[cr>>8].life);
+#else
+ sprintf(heattext, "%s, Pressure: %3.2f, Temp: %4.2f C", ptypes[cr&0xFF].name, pv[(y/sdl_scale)/CELL][(x/sdl_scale)/CELL], parts[cr>>8].temp-273.15f);
+#endif
+ }
+ else
+ {
+ sprintf(heattext, "Empty, Pressure: %3.2f", pv[(y/sdl_scale)/CELL][(x/sdl_scale)/CELL]);
+ }
+ }
+ mx = x;
+ my = y;
+ if(update_flag)
+ {
+ info_box(vid_buf, "Finalizing update...");
+ if(last_major>SAVE_VERSION || (last_major==SAVE_VERSION && last_minor>=MINOR_VERSION))
+ {
+ update_cleanup();
+ error_ui(vid_buf, 0, "Update failed - try downloading a new version.");
+ }
+ else
+ {
+ if(update_finish())
+ error_ui(vid_buf, 0, "Update failed - try downloading a new version.");
+ else
+ info_ui(vid_buf, "Update success", "You have successfully updated the Powder Toy!");
+ }
+ update_flag = 0;
+ }
+
+ if(b && !bq && x>=(XRES-19-old_ver_len)*sdl_scale &&
+ x<=(XRES-14)*sdl_scale && y>=(YRES-22)*sdl_scale && y<=(YRES-9)*sdl_scale && old_version)
+ {
+ tmp = malloc(64);
+#ifdef BETA
+ if(is_beta)
+ {
+ sprintf(tmp, "Your version: %d (Beta %d), new version: %d (Beta %d).", SAVE_VERSION, MINOR_VERSION, major, minor);
+ }
+ else
+ {
+ sprintf(tmp, "Your version: %d (Beta %d), new version: %d.%d.", SAVE_VERSION, MINOR_VERSION, major, minor);
+ }
+#else
+ sprintf(tmp, "Your version: %d.%d, new version: %d.%d.", SAVE_VERSION, MINOR_VERSION, major, minor);
+#endif
+ if(confirm_ui(vid_buf, "Do you want to update The Powder Toy?", tmp, "Update"))
+ {
+ free(tmp);
+ tmp = download_ui(vid_buf, my_uri, &i);
+ if(tmp)
+ {
+ save_presets(1);
+ if(update_start(tmp, i))
+ {
+ update_cleanup();
+ save_presets(0);
+ error_ui(vid_buf, 0, "Update failed - try downloading a new version.");
+ }
+ else
+ return 0;
+ }
+ }
+ else
+ free(tmp);
+ }
+ if(y>=sdl_scale*(YRES+(MENUSIZE-20)))
+ {
+ if(x>=189*sdl_scale && x<=202*sdl_scale && svf_login && svf_open && svf_myvote==0)
+ {
+ db = svf_own ? 275 : 272;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=204 && x<=217 && svf_login && svf_open && svf_myvote==0)
+ {
+ db = svf_own ? 275 : 272;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=189 && x<=217 && svf_login && svf_open && svf_myvote!=0)
+ {
+ db = (svf_myvote==1) ? 273 : 274;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=219*sdl_scale && x<=((XRES+BARSIZE-(510-349))*sdl_scale) && svf_login && svf_open)
+ {
+ db = svf_own ? 257 : 256;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=((XRES+BARSIZE-(510-351))*sdl_scale) && x<((XRES+BARSIZE-(510-366))*sdl_scale))
+ {
+ db = 270;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=((XRES+BARSIZE-(510-367))*sdl_scale) && x<((XRES+BARSIZE-(510-383))*sdl_scale))
+ {
+ db = 266;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=37*sdl_scale && x<=187*sdl_scale && svf_login)
+ {
+ db = 259;
+ if(svf_open && svf_own && x<=55*sdl_scale)
+ db = 258;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=((XRES+BARSIZE-(510-385))*sdl_scale) && x<=((XRES+BARSIZE-(510-476))*sdl_scale))
+ {
+ db = svf_login ? 261 : 260;
+ if(svf_admin)
+ {
+ db = 268;
+ }
+ else if(svf_mod)
+ {
+ db = 271;
+ }
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=sdl_scale && x<=17*sdl_scale)
+ {
+ db = 262;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=((XRES+BARSIZE-(510-494))*sdl_scale) && x<=((XRES+BARSIZE-(510-509))*sdl_scale))
+ {
+ db = sys_pause ? 264 : 263;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=((XRES+BARSIZE-(510-476))*sdl_scale) && x<=((XRES+BARSIZE-(510-491))*sdl_scale))
+ {
+ db = 267;
+ if(da < 51)
+ da ++;
+ }
+ else if(x>=19*sdl_scale && x<=35*sdl_scale && svf_open)
+ {
+ db = 265;
+ if(da < 51)
+ da ++;
+ }
+ else if(da > 0)
+ da --;
+ }
+ else if(da > 0)
+ da --;
+
+ if(!sdl_zoom_trig && zoom_en==1)
+ zoom_en = 0;
+
+ if(sdl_key==Z_keysym && zoom_en==2)
+ zoom_en = 1;
+
+ if(load_mode)
+ {
+ load_x = CELL*((mx/sdl_scale-load_w/2+CELL/2)/CELL);
+ load_y = CELL*((my/sdl_scale-load_h/2+CELL/2)/CELL);
+ if(load_x+load_w>XRES) load_x=XRES-load_w;
+ if(load_y+load_h>YRES) load_y=YRES-load_h;
+ if(load_x<0) load_x=0;
+ if(load_y<0) load_y=0;
+ if(bq==1 && !b)
+ {
+ parse_save(load_data, load_size, 0, load_x, load_y);
+ free(load_data);
+ free(load_img);
+ load_mode = 0;
+ }
+ else if(bq==4 && !b)
+ {
+ free(load_data);
+ free(load_img);
+ load_mode = 0;
+ }
+ }
+ else if(save_mode==1)
+ {
+ save_x = (mx/sdl_scale)/CELL;
+ save_y = (my/sdl_scale)/CELL;
+ if(save_x >= XRES/CELL) save_x = XRES/CELL-1;
+ if(save_y >= YRES/CELL) save_y = YRES/CELL-1;
+ save_w = 1;
+ save_h = 1;
+ if(b==1)
+ {
+ save_mode = 2;
+ }
+ else if(b==4)
+ {
+ save_mode = 0;
+ copy_mode = 0;
+ }
+ }
+ else if(save_mode==2)
+ {
+ save_w = (mx/sdl_scale+CELL/2)/CELL - save_x;
+ save_h = (my/sdl_scale+CELL/2)/CELL - save_y;
+ if(save_w>XRES/CELL) save_w = XRES/CELL;
+ if(save_h>YRES/CELL) save_h = YRES/CELL;
+ if(save_w<1) save_w = 1;
+ if(save_h<1) save_h = 1;
+ if(!b)
+ {
+ if(copy_mode==1)
+ {
+ clipboard_data=build_save(&clipboard_length, save_x*CELL, save_y*CELL, save_w*CELL, save_h*CELL);
+ clipboard_ready = 1;
+ save_mode = 0;
+ copy_mode = 0;
+ }
+ else if(copy_mode==2)
+ {
+ clipboard_data=build_save(&clipboard_length, save_x*CELL, save_y*CELL, save_w*CELL, save_h*CELL);
+ clipboard_ready = 1;
+ save_mode = 0;
+ copy_mode = 0;
+ clear_area(save_x*CELL, save_y*CELL, save_w*CELL, save_h*CELL);
+ }
+ else
+ {
+ stamp_save(save_x*CELL, save_y*CELL, save_w*CELL, save_h*CELL);
+ save_mode = 0;
+ }
+ }
+ }
+ else if(sdl_zoom_trig && zoom_en<2)
+ {
+ x /= sdl_scale;
+ y /= sdl_scale;
+ x -= ZSIZE/2;
+ y -= ZSIZE/2;
+ if(x<0) x=0;
+ if(y<0) y=0;
+ if(x>XRES-ZSIZE) x=XRES-ZSIZE;
+ if(y>YRES-ZSIZE) y=YRES-ZSIZE;
+ zoom_x = x;
+ zoom_y = y;
+ zoom_wx = (x<XRES/2) ? XRES-ZSIZE*ZFACTOR : 0;
+ zoom_wy = 0;
+ zoom_en = 1;
+ if(!b && bq)
+ zoom_en = 2;
+ }
+ else if(b)
+ {
+ if(it > 50)
+ it = 50;
+ x /= sdl_scale;
+ y /= sdl_scale;
+ if(y>=YRES+(MENUSIZE-20))
+ {
+ if(!lb)
+ {
+ if(x>=189 && x<=202 && svf_login && svf_open && svf_myvote==0 && svf_own==0)
+ {
+ if(execute_vote(vid_buf, svf_id, "Up"))
+ {
+ svf_myvote = 1;
+ }
+ }
+ if(x>=204 && x<=217 && svf_login && svf_open && svf_myvote==0 && svf_own==0)
+ {
+ if(execute_vote(vid_buf, svf_id, "Down"))
+ {
+ svf_myvote = -1;
+ }
+ }
+ if(x>=219 && x<=(XRES+BARSIZE-(510-349)) && svf_login && svf_open)
+ tag_list_ui(vid_buf);
+ if(x>=(XRES+BARSIZE-(510-351)) && x<(XRES+BARSIZE-(510-366)) && !bq)
+ {
+ legacy_enable = !legacy_enable;
+ }
+ if(x>=(XRES+BARSIZE-(510-367)) && x<=(XRES+BARSIZE-(510-383)) && !bq)
+ {
+ memset(signs, 0, sizeof(signs));
+ memset(pv, 0, sizeof(pv));
+ memset(vx, 0, sizeof(vx));
+ memset(vy, 0, sizeof(vy));
+ memset(fvx, 0, sizeof(fvx));
+ memset(fvy, 0, sizeof(fvy));
+ memset(bmap, 0, sizeof(bmap));
+ memset(emap, 0, sizeof(emap));
+ memset(parts, 0, sizeof(particle)*NPART);
+ for(i=0; i<NPART-1; i++)
+ parts[i].life = i+1;
+ parts[NPART-1].life = -1;
+ pfree = 0;
+
+ legacy_enable = 0;
+ svf_myvote = 0;
+ svf_open = 0;
+ svf_publish = 0;
+ svf_own = 0;
+ svf_id[0] = 0;
+ svf_name[0] = 0;
+ svf_tags[0] = 0;
+
+ memset(fire_bg, 0, XRES*YRES*PIXELSIZE);
+ memset(fire_r, 0, sizeof(fire_r));
+ memset(fire_g, 0, sizeof(fire_g));
+ memset(fire_b, 0, sizeof(fire_b));
+ }
+ if(x>=(XRES+BARSIZE-(510-385)) && x<=(XRES+BARSIZE-(510-476)))
+ {
+ login_ui(vid_buf);
+ if(svf_login)
+ save_presets(0);
+ }
+ if(x>=37 && x<=187 && svf_login)
+ {
+ if(!svf_open || !svf_own || x>51)
+ {
+ if(save_name_ui(vid_buf))
+ execute_save(vid_buf);
+ }
+ else
+ execute_save(vid_buf);
+ while(!sdl_poll())
+ if(!SDL_GetMouseState(&x, &y))
+ break;
+ b = bq = 0;
+ }
+ if(x>=1 && x<=17)
+ {
+ search_ui(vid_buf);
+ memset(fire_bg, 0, XRES*YRES*PIXELSIZE);
+ memset(fire_r, 0, sizeof(fire_r));
+ memset(fire_g, 0, sizeof(fire_g));
+ memset(fire_b, 0, sizeof(fire_b));
+ }
+ if(x>=19 && x<=35 && svf_last && svf_open && !bq)
+ parse_save(svf_last, svf_lsize, 1, 0, 0);
+ if(x>=(XRES+BARSIZE-(510-476)) && x<=(XRES+BARSIZE-(510-491)) && !bq)
+ {
+ if(b & SDL_BUTTON_LMASK)
+ set_cmode((cmode+1) % 7);
+ if(b & SDL_BUTTON_RMASK)
+ set_cmode((cmode+6) % 7);
+ save_presets(0);
+ }
+ if(x>=(XRES+BARSIZE-(510-494)) && x<=(XRES+BARSIZE-(510-509)) && !bq)
+ sys_pause = !sys_pause;
+ lb = 0;
+ }
+ }
+ else if(y<YRES)
+ {
+ c = (b&1) ? sl : sr;
+ su = c;
+ if(c==126)
+ {
+ if(!bq)
+ add_sign_ui(vid_buf, x, y);
+ }
+ else if(lb)
+ {
+ if(lm == 1)
+ {
+ xor_line(lx, ly, x, y, vid_buf);
+ if(c==127 && lx>=0 && ly>=0 && lx<XRES && ly<YRES && bmap[ly/CELL][lx/CELL]==4)
+ {
+ nfvx = (x-lx)*0.005f;
+ nfvy = (y-ly)*0.005f;
+ flood_parts(lx, ly, 255, -1, 4);
+ for(j=0; j<YRES/CELL; j++)
+ for(i=0; i<XRES/CELL; i++)
+ if(bmap[j][i] == 255)
+ {
+ fvx[j][i] = nfvx;
+ fvy[j][i] = nfvy;
+ bmap[j][i] = 4;
+ }
+ }
+ }
+ else if(lm == 2)
+ {
+ xor_line(lx, ly, lx, y, vid_buf);
+ xor_line(lx, y, x, y, vid_buf);
+ xor_line(x, y, x, ly, vid_buf);
+ xor_line(x, ly, lx, ly, vid_buf);
+ }
+ else
+ {
+ create_line(lx, ly, x, y, bs, c);
+ lx = x;
+ ly = y;
+ }
+ }
+ else
+ {
+ if((sdl_mod & (KMOD_LSHIFT|KMOD_RSHIFT)) && !(sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)))
+ {
+ lx = x;
+ ly = y;
+ lb = b;
+ lm = 1;
+ }
+ else if((sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)) && !(sdl_mod & (KMOD_LSHIFT|KMOD_RSHIFT)))
+ {
+ lx = x;
+ ly = y;
+ lb = b;
+ lm = 2;
+ }
+ else if((sdl_mod & (KMOD_LCTRL|KMOD_RCTRL)) && (sdl_mod & (KMOD_LSHIFT|KMOD_RSHIFT)))
+ {
+ if(c!=125&&c!=SPC_AIR&&c!=SPC_HEAT&&c!=SPC_COOL&&c!=SPC_VACUUM)
+ flood_parts(x, y, c, -1, -1);
+ lx = x;
+ ly = y;
+ lb = 0;
+ lm = 0;
+ }
+ else if((sdl_mod & (KMOD_LALT||KMOD_RALT)) || b==SDL_BUTTON_MIDDLE)
+ {
+ if(y>0 && y<sdl_scale*YRES && x>0 && x<sdl_scale*XRES)
+ {
+ int cr;
+ cr = pmap[y][x];
+ if(!((cr>>8)>=NPART || !cr))
+ {
+ c = sl = cr&0xFF;
+ }
+ else
+ {
+ //Something
+ }
+ }
+ lx = x;
+ ly = y;
+ lb = 0;
+ lm = 0;
+ }
+ else
+ {
+ //Copy state before drawing any particles (for undo)7
+ int cbx, cby, cbi;
+
+ for(cbi=0; cbi<NPART; cbi++)
+ cb_parts[cbi] = parts[cbi];
+
+ for(cby = 0; cby<YRES; cby++)
+ for(cbx = 0; cbx<XRES; cbx++)
+ cb_pmap[cby][cbx] = pmap[cby][cbx];
+
+ for(cby = 0; cby<(YRES/CELL); cby++)
+ for(cbx = 0; cbx<(XRES/CELL); cbx++)
+ {
+ cb_vx[cby][cbx] = vx[cby][cbx];
+ cb_vy[cby][cbx] = vy[cby][cbx];
+ cb_pv[cby][cbx] = pv[cby][cbx];
+ cb_bmap[cby][cbx] = bmap[cby][cbx];
+ cb_emap[cby][cbx] = emap[cby][cbx];
+ }
+
+ create_parts(x, y, bs, c);
+ lx = x;
+ ly = y;
+ lb = b;
+ lm = 0;
+ }
+ }
+ }
+ }
+ else
+ {
+ if(lb && lm)
+ {
+ x /= sdl_scale;
+ y /= sdl_scale;
+ c = (lb&1) ? sl : sr;
+ su = c;
+ if(lm == 1)
+ {
+ if(c!=127 || lx<0 || ly<0 || lx>=XRES || ly>=YRES || bmap[ly/CELL][lx/CELL]!=4)
+ create_line(lx, ly, x, y, bs, c);
+ }
+ else
+ create_box(lx, ly, x, y, c);
+ lm = 0;
+ }
+ lb = 0;
+ }
+
+ if(load_mode)
+ {
+ draw_image(vid_buf, load_img, load_x, load_y, load_w, load_h, 128);
+ xor_rect(vid_buf, load_x, load_y, load_w, load_h);
+ }
+
+ if(save_mode)
+ {
+ xor_rect(vid_buf, save_x*CELL, save_y*CELL, save_w*CELL, save_h*CELL);
+ da = 51;
+ db = 269;
+ }
+
+ if(zoom_en!=1 && !load_mode && !save_mode)
+ {
+ render_cursor(vid_buf, mx/sdl_scale, my/sdl_scale, su, bs);
+ mousex = mx/sdl_scale;
+ mousey = my/sdl_scale;
+ }
+
+ if(zoom_en)
+ render_zoom(vid_buf);
+
+ if(da)
+ switch(db)
+ {
+ case 256:
+ drawtext(vid_buf, 16, YRES-24, "Add simulation tags.", 255, 255, 255, da*5);
+ break;
+ case 257:
+ drawtext(vid_buf, 16, YRES-24, "Add and remove simulation tags.", 255, 255, 255, da*5);
+ break;
+ case 258:
+ drawtext(vid_buf, 16, YRES-24, "Save the simulation under the current name.", 255, 255, 255, da*5);
+ break;
+ case 259:
+ drawtext(vid_buf, 16, YRES-24, "Save the simulation under a new name.", 255, 255, 255, da*5);
+ break;
+ case 260:
+ drawtext(vid_buf, 16, YRES-24, "Sign into the Simulation Server.", 255, 255, 255, da*5);
+ break;
+ case 261:
+ drawtext(vid_buf, 16, YRES-24, "Sign into the Simulation Server under a new name.", 255, 255, 255, da*5);
+ break;
+ case 262:
+ drawtext(vid_buf, 16, YRES-24, "Find & open a simulation", 255, 255, 255, da*5);
+ break;
+ case 263:
+ drawtext(vid_buf, 16, YRES-24, "Pause the simulation", 255, 255, 255, da*5);
+ break;
+ case 264:
+ drawtext(vid_buf, 16, YRES-24, "Resume the simulation", 255, 255, 255, da*5);
+ break;
+ case 265:
+ drawtext(vid_buf, 16, YRES-24, "Reload the simulation", 255, 255, 255, da*5);
+ break;
+ case 266:
+ drawtext(vid_buf, 16, YRES-24, "Erase all particles and walls", 255, 255, 255, da*5);
+ break;
+ case 267:
+ drawtext(vid_buf, 16, YRES-24, "Change display mode", 255, 255, 255, da*5);
+ break;
+ case 268:
+ drawtext(vid_buf, 16, YRES-24, "Annuit C\245ptis", 255, 255, 255, da*5);
+ break;
+ case 269:
+ drawtext(vid_buf, 16, YRES-24, "Click-and-drag to specify a rectangle to copy (right click = cancel).", 255, 216, 32, da*5);
+ break;
+ case 270:
+ drawtext(vid_buf, 16, YRES-24, "Enable or disable compatability mode (disables heat simulation).", 255, 255, 255, da*5);
+ break;
+ case 271:
+ drawtext(vid_buf, 16, YRES-24, "You're a moderator", 255, 255, 255, da*5);
+ break;
+ case 272:
+ drawtext(vid_buf, 16, YRES-24, "Like/Dislike this save.", 255, 255, 255, da*5);
+ break;
+ case 273:
+ drawtext(vid_buf, 16, YRES-24, "You like this.", 255, 255, 255, da*5);
+ break;
+ case 274:
+ drawtext(vid_buf, 16, YRES-24, "You dislike this.", 255, 255, 255, da*5);
+ break;
+ case 275:
+ drawtext(vid_buf, 16, YRES-24, "You cannot vote on your own save.", 255, 255, 255, da*5);
+ break;
+ default:
+ drawtext(vid_buf, 16, YRES-24, (char *)ptypes[db].descs, 255, 255, 255, da*5);
+ }
+ if(itc)
+ {
+ itc--;
+ drawtext(vid_buf, (XRES-textwidth(itc_msg))/2, ((YRES/2)-10), itc_msg, 255, 255, 255, itc>51?255:itc*5);
+ }
+ if(it)
+ {
+ it--;
+ drawtext(vid_buf, 16, 20, it_msg, 255, 255, 255, it>51?255:it*5);
+ }
+
+ if(old_version)
+ {
+ clearrect(vid_buf, XRES-21-old_ver_len, YRES-24, old_ver_len+9, 17);
+#ifdef BETA
+ if(is_beta)
+ {
+ drawtext(vid_buf, XRES-16-old_ver_len, YRES-19, old_ver_msg_beta, 255, 216, 32, 255);
+ }
+ else
+ {
+ drawtext(vid_buf, XRES-16-old_ver_len, YRES-19, old_ver_msg, 255, 216, 32, 255);
+ }
+#else
+ drawtext(vid_buf, XRES-16-old_ver_len, YRES-19, old_ver_msg, 255, 216, 32, 255);
+#endif
+ drawrect(vid_buf, XRES-19-old_ver_len, YRES-22, old_ver_len+5, 13, 255, 216, 32, 255);
+ }
+
+ if(hud_enable)
+ {
+ currentTime = SDL_GetTicks();
+ if(currentTime-past>=16)
+ {
+ past = SDL_GetTicks();
+ FPS++;
+ }
+ if(currentTime-pastFPS>=1000)
+ {
+#ifdef BETA
+ sprintf(uitext, "Version %d (Beta %d) FPS:%d", SAVE_VERSION, MINOR_VERSION, FPS);
+ //printf("%s\n", uitext);
+#else
+ sprintf(uitext, "Version %d.%d FPS:%d", SAVE_VERSION, MINOR_VERSION, FPS);
+#endif
+ FPSB = FPS;
+ FPS = 0;
+ pastFPS = currentTime;
+ }
+ if(sdl_zoom_trig||zoom_en)
+ {
+ if(zoom_x<XRES/2)
+ {
+ fillrect(vid_buf, XRES-20-textwidth(heattext), 266, textwidth(heattext)+8, 15, 0, 0, 0, 140);
+ drawtext(vid_buf, XRES-16-textwidth(heattext), 270, heattext, 255, 255, 255, 200);
+ }
+ else
+ {
+ fillrect(vid_buf, 12, 266, textwidth(heattext)+8, 15, 0, 0, 0, 140);
+ drawtext(vid_buf, 16, 270, heattext, 255, 255, 255, 200);
+ }
+ }
+ else
+ {
+ fillrect(vid_buf, XRES-20-textwidth(heattext), 12, textwidth(heattext)+8, 15, 0, 0, 0, 140);
+ drawtext(vid_buf, XRES-16-textwidth(heattext), 16, heattext, 255, 255, 255, 200);
+ }
+ fillrect(vid_buf, 12, 12, textwidth(uitext)+8, 15, 0, 0, 0, 140);
+ drawtext(vid_buf, 16, 16, uitext, 32, 216, 255, 200);
+ }
+ sdl_blit(0, 0, XRES+BARSIZE, YRES+MENUSIZE, vid_buf, XRES+BARSIZE);
+
+ //Setting an element for the stick man
+ if(isplayer==0)
+ {
+ if(ptypes[sr].falldown>0 || sr == PT_NEUT || sr == PT_PHOT)
+ player[2] = sr;
+ else
+ player[2] = PT_DUST;
+ }
+
+ }
+
+ http_done();
+ return 0;
+}
+
diff --git a/src/md5.c b/src/md5.c
new file mode 100644
index 0000000..a51f4fe
--- /dev/null
+++ b/src/md5.c
@@ -0,0 +1,231 @@
+// based on public-domain code from Colin Plumb (1993)
+#include <string.h>
+#include <md5.h>
+
+static unsigned getu32(const unsigned char *addr)
+{
+ return (((((unsigned long)addr[3] << 8) | addr[2]) << 8) | addr[1]) << 8 | addr[0];
+}
+
+static void putu32(unsigned data, unsigned char *addr)
+{
+ addr[0] = (unsigned char)data;
+ addr[1] = (unsigned char)(data >> 8);
+ addr[2] = (unsigned char)(data >> 16);
+ addr[3] = (unsigned char)(data >> 24);
+}
+
+void md5_init(struct md5_context *ctx)
+{
+ ctx->buf[0] = 0x67452301;
+ ctx->buf[1] = 0xefcdab89;
+ ctx->buf[2] = 0x98badcfe;
+ ctx->buf[3] = 0x10325476;
+
+ ctx->bits[0] = 0;
+ ctx->bits[1] = 0;
+}
+
+void md5_update(struct md5_context *ctx, unsigned char const *buf, unsigned len)
+{
+ unsigned t;
+
+ // update bit count
+ t = ctx->bits[0];
+ if((ctx->bits[0] = (t + ((unsigned)len << 3)) & 0xffffffff) < t)
+ ctx->bits[1]++; // carry
+ ctx->bits[1] += len >> 29;
+
+ t = (t >> 3) & 0x3f;
+
+ // use leading data to top up the buffer
+
+ if(t)
+ {
+ unsigned char *p = ctx->in + t;
+
+ t = 64-t;
+ if (len < t)
+ {
+ memcpy(p, buf, len);
+ return;
+ }
+ memcpy(p, buf, t);
+ md5_transform(ctx->buf, ctx->in);
+ buf += t;
+ len -= t;
+ }
+
+ // following 64-byte chunks
+
+ while(len >= 64)
+ {
+ memcpy(ctx->in, buf, 64);
+ md5_transform(ctx->buf, ctx->in);
+ buf += 64;
+ len -= 64;
+ }
+
+ // save rest of bytes for later
+
+ memcpy(ctx->in, buf, len);
+}
+
+void md5_final(unsigned char digest[16], struct md5_context *ctx)
+{
+ unsigned count;
+ unsigned char *p;
+
+ // #bytes mod64
+ count = (ctx->bits[0] >> 3) & 0x3F;
+
+ // first char of padding = 0x80
+ p = ctx->in + count;
+ *p++ = 0x80;
+
+ // calculate # of bytes to pad
+ count = 64 - 1 - count;
+
+ // Pad out to 56 mod 64
+ if(count < 8)
+ {
+ // we need to finish a whole block before padding
+ memset(p, 0, count);
+ md5_transform(ctx->buf, ctx->in);
+ memset(ctx->in, 0, 56);
+ }
+ else
+ {
+ // just pad to 56 bytes
+ memset(p, 0, count-8);
+ }
+
+ // append length & final transform
+ putu32(ctx->bits[0], ctx->in + 56);
+ putu32(ctx->bits[1], ctx->in + 60);
+
+ md5_transform(ctx->buf, ctx->in);
+ putu32(ctx->buf[0], digest);
+ putu32(ctx->buf[1], digest + 4);
+ putu32(ctx->buf[2], digest + 8);
+ putu32(ctx->buf[3], digest + 12);
+ memset(ctx, 0, sizeof(ctx));
+}
+
+#define F1(x, y, z) (z ^ (x & (y ^ z)))
+#define F2(x, y, z) F1(z, x, y)
+#define F3(x, y, z) (x ^ y ^ z)
+#define F4(x, y, z) (y ^ (x | ~z))
+
+#define MD5STEP(f, w, x, y, z, data, s) \
+ ( w += f(x, y, z) + data, w &= 0xffffffff, w = w<<s | w>>(32-s), w += x )
+
+void md5_transform(unsigned buf[4], const unsigned char inraw[64])
+{
+ unsigned a, b, c, d;
+ unsigned in[16];
+ int i;
+
+ for (i = 0; i < 16; ++i)
+ in[i] = getu32 (inraw + 4 * i);
+
+ a = buf[0];
+ b = buf[1];
+ c = buf[2];
+ d = buf[3];
+
+ MD5STEP(F1, a, b, c, d, in[ 0]+0xd76aa478, 7);
+ MD5STEP(F1, d, a, b, c, in[ 1]+0xe8c7b756, 12);
+ MD5STEP(F1, c, d, a, b, in[ 2]+0x242070db, 17);
+ MD5STEP(F1, b, c, d, a, in[ 3]+0xc1bdceee, 22);
+ MD5STEP(F1, a, b, c, d, in[ 4]+0xf57c0faf, 7);
+ MD5STEP(F1, d, a, b, c, in[ 5]+0x4787c62a, 12);
+ MD5STEP(F1, c, d, a, b, in[ 6]+0xa8304613, 17);
+ MD5STEP(F1, b, c, d, a, in[ 7]+0xfd469501, 22);
+ MD5STEP(F1, a, b, c, d, in[ 8]+0x698098d8, 7);
+ MD5STEP(F1, d, a, b, c, in[ 9]+0x8b44f7af, 12);
+ MD5STEP(F1, c, d, a, b, in[10]+0xffff5bb1, 17);
+ MD5STEP(F1, b, c, d, a, in[11]+0x895cd7be, 22);
+ MD5STEP(F1, a, b, c, d, in[12]+0x6b901122, 7);
+ MD5STEP(F1, d, a, b, c, in[13]+0xfd987193, 12);
+ MD5STEP(F1, c, d, a, b, in[14]+0xa679438e, 17);
+ MD5STEP(F1, b, c, d, a, in[15]+0x49b40821, 22);
+
+ MD5STEP(F2, a, b, c, d, in[ 1]+0xf61e2562, 5);
+ MD5STEP(F2, d, a, b, c, in[ 6]+0xc040b340, 9);
+ MD5STEP(F2, c, d, a, b, in[11]+0x265e5a51, 14);
+ MD5STEP(F2, b, c, d, a, in[ 0]+0xe9b6c7aa, 20);
+ MD5STEP(F2, a, b, c, d, in[ 5]+0xd62f105d, 5);
+ MD5STEP(F2, d, a, b, c, in[10]+0x02441453, 9);
+ MD5STEP(F2, c, d, a, b, in[15]+0xd8a1e681, 14);
+ MD5STEP(F2, b, c, d, a, in[ 4]+0xe7d3fbc8, 20);
+ MD5STEP(F2, a, b, c, d, in[ 9]+0x21e1cde6, 5);
+ MD5STEP(F2, d, a, b, c, in[14]+0xc33707d6, 9);
+ MD5STEP(F2, c, d, a, b, in[ 3]+0xf4d50d87, 14);
+ MD5STEP(F2, b, c, d, a, in[ 8]+0x455a14ed, 20);
+ MD5STEP(F2, a, b, c, d, in[13]+0xa9e3e905, 5);
+ MD5STEP(F2, d, a, b, c, in[ 2]+0xfcefa3f8, 9);
+ MD5STEP(F2, c, d, a, b, in[ 7]+0x676f02d9, 14);
+ MD5STEP(F2, b, c, d, a, in[12]+0x8d2a4c8a, 20);
+
+ MD5STEP(F3, a, b, c, d, in[ 5]+0xfffa3942, 4);
+ MD5STEP(F3, d, a, b, c, in[ 8]+0x8771f681, 11);
+ MD5STEP(F3, c, d, a, b, in[11]+0x6d9d6122, 16);
+ MD5STEP(F3, b, c, d, a, in[14]+0xfde5380c, 23);
+ MD5STEP(F3, a, b, c, d, in[ 1]+0xa4beea44, 4);
+ MD5STEP(F3, d, a, b, c, in[ 4]+0x4bdecfa9, 11);
+ MD5STEP(F3, c, d, a, b, in[ 7]+0xf6bb4b60, 16);
+ MD5STEP(F3, b, c, d, a, in[10]+0xbebfbc70, 23);
+ MD5STEP(F3, a, b, c, d, in[13]+0x289b7ec6, 4);
+ MD5STEP(F3, d, a, b, c, in[ 0]+0xeaa127fa, 11);
+ MD5STEP(F3, c, d, a, b, in[ 3]+0xd4ef3085, 16);
+ MD5STEP(F3, b, c, d, a, in[ 6]+0x04881d05, 23);
+ MD5STEP(F3, a, b, c, d, in[ 9]+0xd9d4d039, 4);
+ MD5STEP(F3, d, a, b, c, in[12]+0xe6db99e5, 11);
+ MD5STEP(F3, c, d, a, b, in[15]+0x1fa27cf8, 16);
+ MD5STEP(F3, b, c, d, a, in[ 2]+0xc4ac5665, 23);
+
+ MD5STEP(F4, a, b, c, d, in[ 0]+0xf4292244, 6);
+ MD5STEP(F4, d, a, b, c, in[ 7]+0x432aff97, 10);
+ MD5STEP(F4, c, d, a, b, in[14]+0xab9423a7, 15);
+ MD5STEP(F4, b, c, d, a, in[ 5]+0xfc93a039, 21);
+ MD5STEP(F4, a, b, c, d, in[12]+0x655b59c3, 6);
+ MD5STEP(F4, d, a, b, c, in[ 3]+0x8f0ccc92, 10);
+ MD5STEP(F4, c, d, a, b, in[10]+0xffeff47d, 15);
+ MD5STEP(F4, b, c, d, a, in[ 1]+0x85845dd1, 21);
+ MD5STEP(F4, a, b, c, d, in[ 8]+0x6fa87e4f, 6);
+ MD5STEP(F4, d, a, b, c, in[15]+0xfe2ce6e0, 10);
+ MD5STEP(F4, c, d, a, b, in[ 6]+0xa3014314, 15);
+ MD5STEP(F4, b, c, d, a, in[13]+0x4e0811a1, 21);
+ MD5STEP(F4, a, b, c, d, in[ 4]+0xf7537e82, 6);
+ MD5STEP(F4, d, a, b, c, in[11]+0xbd3af235, 10);
+ MD5STEP(F4, c, d, a, b, in[ 2]+0x2ad7d2bb, 15);
+ MD5STEP(F4, b, c, d, a, in[ 9]+0xeb86d391, 21);
+
+ buf[0] += a;
+ buf[1] += b;
+ buf[2] += c;
+ buf[3] += d;
+}
+
+static char hex[] = "0123456789abcdef";
+void md5_ascii(char *result, unsigned char const *buf, unsigned len)
+{
+ struct md5_context md5;
+ unsigned char hash[16];
+ int i;
+
+ if(len==0)
+ len = strlen((char *)buf);
+
+ md5_init(&md5);
+ md5_update(&md5, buf, len);
+ md5_final(hash, &md5);
+
+ for(i=0; i<16; i++)
+ {
+ result[i*2] = hex[(hash[i]>>4)&0xF];
+ result[i*2+1] = hex[hash[i]&0x0F];
+ }
+ result[32] = 0;
+}
diff --git a/src/misc.c b/src/misc.c
new file mode 100644
index 0000000..7c551e2
--- /dev/null
+++ b/src/misc.c
@@ -0,0 +1,283 @@
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include "misc.h"
+#include "defines.h"
+#include "interface.h"
+#include "graphics.h"
+
+//Signum function
+#ifdef WIN32
+_inline int isign(float i)
+#else
+inline int isign(float i)
+#endif
+{
+ if (i<0)
+ return -1;
+ if (i>0)
+ return 1;
+ return 0;
+}
+
+#ifdef WIN32
+_inline unsigned clamp_flt(float f, float min, float max)
+#else
+inline unsigned clamp_flt(float f, float min, float max)
+#endif
+{
+ if(f<min)
+ return 0;
+ if(f>max)
+ return 255;
+ return (int)(255.0f*(f-min)/(max-min));
+}
+
+#ifdef WIN32
+_inline float restrict_flt(float f, float min, float max)
+#else
+inline float restrict_flt(float f, float min, float max)
+#endif
+{
+ if(f<min)
+ return min;
+ if(f>max)
+ return max;
+ return f;
+}
+
+char *mystrdup(char *s)
+{
+ char *x;
+ if(s)
+ {
+ x = (char*)malloc(strlen(s)+1);
+ strcpy(x, s);
+ return x;
+ }
+ return s;
+}
+
+void strlist_add(struct strlist **list, char *str)
+{
+ struct strlist *item = malloc(sizeof(struct strlist));
+ item->str = mystrdup(str);
+ item->next = *list;
+ *list = item;
+}
+
+int strlist_find(struct strlist **list, char *str)
+{
+ struct strlist *item;
+ for(item=*list; item; item=item->next)
+ if(!strcmp(item->str, str))
+ return 1;
+ return 0;
+}
+
+void strlist_free(struct strlist **list)
+{
+ struct strlist *item;
+ while(*list)
+ {
+ item = *list;
+ *list = (*list)->next;
+ free(item);
+ }
+}
+
+void save_presets(int do_update)
+{
+ FILE *f=fopen("powder.def", "wb");
+ unsigned char sig[4] = {0x50, 0x44, 0x65, 0x66};
+ unsigned char tmp = sdl_scale;
+ if(!f)
+ return;
+ fwrite(sig, 1, 4, f);
+ save_string(f, svf_user);
+ save_string(f, svf_pass);
+ fwrite(&tmp, 1, 1, f);
+ tmp = cmode;
+ fwrite(&tmp, 1, 1, f);
+ tmp = svf_admin;
+ fwrite(&tmp, 1, 1, f);
+ tmp = svf_mod;
+ fwrite(&tmp, 1, 1, f);
+ save_string(f, http_proxy_string);
+ tmp = SAVE_VERSION;
+ fwrite(&tmp, 1, 1, f);
+ tmp = MINOR_VERSION;
+ fwrite(&tmp, 1, 1, f);
+ tmp = do_update;
+ fwrite(&tmp, 1, 1, f);
+ fclose(f);
+}
+
+void load_presets(void)
+{
+ FILE *f=fopen("powder.def", "rb");
+ unsigned char sig[4], tmp;
+ if(!f)
+ return;
+ fread(sig, 1, 4, f);
+ if(sig[0]!=0x50 || sig[1]!=0x44 || sig[2]!=0x65 || sig[3]!=0x66)
+ {
+ if(sig[0]==0x4D && sig[1]==0x6F && sig[2]==0x46 && sig[3]==0x6F)
+ {
+ if(fseek(f, -3, SEEK_END))
+ {
+ remove("powder.def");
+ return;
+ }
+ if(fread(sig, 1, 3, f) != 3)
+ {
+ remove("powder.def");
+ goto fail;
+ }
+ last_major = sig[0];
+ last_minor = sig[1];
+ update_flag = sig[2];
+ }
+ fclose(f);
+ remove("powder.def");
+ return;
+ }
+ if(load_string(f, svf_user, 63))
+ goto fail;
+ if(load_string(f, svf_pass, 63))
+ goto fail;
+ svf_login = !!svf_user[0];
+ if(fread(&tmp, 1, 1, f) != 1)
+ goto fail;
+ sdl_scale = (tmp == 2) ? 2 : 1;
+ if(fread(&tmp, 1, 1, f) != 1)
+ goto fail;
+ cmode = tmp%7;
+ if(fread(&tmp, 1, 1, f) != 1)
+ goto fail;
+ svf_admin = tmp;
+ if(fread(&tmp, 1, 1, f) != 1)
+ goto fail;
+ svf_mod = tmp;
+ if(load_string(f, http_proxy_string, 255))
+ goto fail;
+ if(fread(sig, 1, 3, f) != 3)
+ goto fail;
+ last_major = sig[0];
+ last_minor = sig[1];
+ update_flag = sig[2];
+fail:
+ fclose(f);
+}
+
+void save_string(FILE *f, char *str)
+{
+ int li = strlen(str);
+ unsigned char lb[2];
+ lb[0] = li;
+ lb[1] = li >> 8;
+ fwrite(lb, 2, 1, f);
+ fwrite(str, li, 1, f);
+}
+
+int load_string(FILE *f, char *str, int max)
+{
+ int li;
+ unsigned char lb[2];
+ fread(lb, 2, 1, f);
+ li = lb[0] | (lb[1] << 8);
+ if(li > max)
+ {
+ str[0] = 0;
+ return 1;
+ }
+ fread(str, li, 1, f);
+ str[li] = 0;
+ return 0;
+}
+
+void strcaturl(char *dst, char *src)
+{
+ char *d;
+ unsigned char *s;
+
+ for(d=dst; *d; d++) ;
+
+ for(s=(unsigned char *)src; *s; s++)
+ {
+ if((*s>='0' && *s<='9') ||
+ (*s>='a' && *s<='z') ||
+ (*s>='A' && *s<='Z'))
+ *(d++) = *s;
+ else
+ {
+ *(d++) = '%';
+ *(d++) = hex[*s>>4];
+ *(d++) = hex[*s&15];
+ }
+ }
+ *d = 0;
+}
+
+void strappend(char *dst, char *src)
+{
+ char *d;
+ unsigned char *s;
+
+ for(d=dst; *d; d++) ;
+
+ for(s=(unsigned char *)src; *s; s++)
+ {
+ *(d++) = *s;
+ }
+ *d = 0;
+}
+
+void *file_load(char *fn, int *size)
+{
+ FILE *f = fopen(fn, "rb");
+ void *s;
+
+ if(!f)
+ return NULL;
+ fseek(f, 0, SEEK_END);
+ *size = ftell(f);
+ fseek(f, 0, SEEK_SET);
+ s = malloc(*size);
+ if(!s)
+ {
+ fclose(f);
+ return NULL;
+ }
+ fread(s, *size, 1, f);
+ fclose(f);
+ return s;
+}
+
+int cpu_check(void)
+{
+#ifdef MACOSX
+ return 0;
+#else
+#ifdef X86
+ unsigned af,bf,cf,df;
+ x86_cpuid(0, af, bf, cf, df);
+ if(bf==0x68747541 && cf==0x444D4163 && df==0x69746E65)
+ amd = 1;
+ x86_cpuid(1, af, bf, cf, df);
+#ifdef X86_SSE
+ if(!(df&(1<<25)))
+ return 1;
+#endif
+#ifdef X86_SSE2
+ if(!(df&(1<<26)))
+ return 1;
+#endif
+#ifdef X86_SSE3
+ if(!(cf&1))
+ return 1;
+#endif
+#endif
+#endif
+ return 0;
+} \ No newline at end of file
diff --git a/src/powder.c b/src/powder.c
new file mode 100644
index 0000000..f578e28
--- /dev/null
+++ b/src/powder.c
@@ -0,0 +1,3611 @@
+#include <stdint.h>
+#include <math.h>
+#include <defines.h>
+#include <powder.h>
+#include <air.h>
+#include <misc.h>
+
+int isplayer = 0;
+float player[27]; //[0] is a command cell, [3]-[18] are legs positions, [19] is index, [19]-[26] are accelerations
+
+particle *parts;
+particle *cb_parts;
+
+unsigned char bmap[YRES/CELL][XRES/CELL];
+unsigned char emap[YRES/CELL][XRES/CELL];
+
+unsigned char cb_bmap[YRES/CELL][XRES/CELL];
+unsigned char cb_emap[YRES/CELL][XRES/CELL];
+
+int pfree;
+
+unsigned pmap[YRES][XRES];
+unsigned cb_pmap[YRES][XRES];
+
+static int pn_junction_sprk(int x, int y, int pt)
+{
+ unsigned r = pmap[y][x];
+ if((r & 0xFF) != pt)
+ return 0;
+ r >>= 8;
+ if(parts[r].type != pt)
+ return 0;
+
+ parts[r].ctype = pt;
+ parts[r].type = PT_SPRK;
+ parts[r].life = 4;
+ return 1;
+}
+
+static void photoelectric_effect(int nx, int ny)
+{
+ unsigned r = pmap[ny][nx];
+
+ if((r&0xFF) == PT_PSCN) {
+ if((pmap[ny][nx-1] & 0xFF) == PT_NSCN ||
+ (pmap[ny][nx+1] & 0xFF) == PT_NSCN ||
+ (pmap[ny-1][nx] & 0xFF) == PT_NSCN ||
+ (pmap[ny+1][nx] & 0xFF) == PT_NSCN)
+ pn_junction_sprk(nx, ny, PT_PSCN);
+ }
+}
+
+static int eval_move(int pt, int nx, int ny, unsigned *rr)
+{
+ unsigned r;
+
+ if(nx<0 || ny<0 || nx>=XRES || ny>=YRES)
+ return 0;
+
+ r = pmap[ny][nx];
+ if(r && (r>>8)<NPART)
+ r = (r&~0xFF) | parts[r>>8].type;
+ if(rr)
+ *rr = r;
+
+ if((r&0xFF)==PT_VOID || (r&0xFF)==PT_BHOL)
+ return 1;
+
+ if(pt==PT_NEUT && (r&0xFF)==PT_GLAS)
+ return 2;
+
+ if(pt==PT_PHOT&&(
+ (r&0xFF)==PT_GLAS || (r&0xFF)==PT_PHOT ||
+ (r&0xFF)==PT_CLNE || (r&0xFF)==PT_PCLN ||
+ (r&0xFF)==PT_WATR || (r&0xFF)==PT_DSTW || (r&0xFF)==PT_SLTW ||
+ ((r&0xFF)==PT_LCRY&&parts[r>>8].life > 5)))
+ return 2;
+
+ if(pt==PT_STKM) //Stick man's head shouldn't collide
+ return 2;
+
+ if(bmap[ny/CELL][nx/CELL]==13 && ptypes[pt].falldown!=0 && pt!=PT_FIRE && pt!=PT_SMKE)
+ return 0;
+ if(ptypes[pt].falldown!=2 && bmap[ny/CELL][nx/CELL]==3)
+ return 0;
+ if((pt==PT_NEUT ||pt==PT_PHOT) && bmap[ny/CELL][nx/CELL]==7 && !emap[ny/CELL][nx/CELL])
+ return 0;
+
+ if(bmap[ny/CELL][nx/CELL]==9)
+ return 0;
+
+ if(ptypes[pt].falldown!=1 && bmap[ny/CELL][nx/CELL]==10)
+ return 0;
+
+ if (r && ((r&0xFF) >= PT_NUM || !can_move[pt][(r&0xFF)]))
+ return 0;
+
+ if(pt == PT_PHOT)
+ return 2;
+ return 1;
+}
+
+static void create_cherenkov_photon(int pp);
+
+int try_move(int i, int x, int y, int nx, int ny)
+{
+ unsigned r, e;
+
+ if(x==nx && y==ny)
+ return 1;
+
+ e = eval_move(parts[i].type, nx, ny, &r);
+ if(!e) {
+ if(!legacy_enable && parts[i].type==PT_PHOT) {
+ if((r & 0xFF) == PT_COAL || (r & 0xFF) == PT_BCOL)
+ parts[r>>8].temp = parts[i].temp;
+ if((r & 0xFF) < PT_NUM)
+ parts[i].temp = parts[r>>8].temp =
+ restrict_flt((parts[r>>8].temp+parts[i].temp)/2, MIN_TEMP, MAX_TEMP);
+ }
+ return 0;
+ }
+ if(e == 2) {
+ if(parts[i].type == PT_NEUT && (r&0xFF)==PT_GLAS) {
+ if(rand() < RAND_MAX/10)
+ create_cherenkov_photon(i);
+ }
+ return 1;
+ }
+
+ if((r&0xFF)==PT_VOID)
+ {
+ parts[i].type=PT_NONE;
+ return 0;
+ }
+ if((r&0xFF)==PT_BHOL)
+ {
+ parts[i].type=PT_NONE;
+ if(!legacy_enable)
+ {
+ parts[r>>8].temp = restrict_flt(parts[r>>8].temp+parts[i].temp/2, MIN_TEMP, MAX_TEMP);//3.0f;
+ }
+
+ return 0;
+ }
+ if(parts[i].type==PT_CNCT && y<ny && (pmap[y+1][x]&0xFF)==PT_CNCT)
+ return 0;
+
+ if(bmap[ny/CELL][nx/CELL]==12 && !emap[y/CELL][x/CELL])
+ return 1;
+ if((bmap[y/CELL][x/CELL]==12 && !emap[y/CELL][x/CELL]) && (bmap[ny/CELL][nx/CELL]!=12 && !emap[ny/CELL][nx/CELL]))
+ return 0;
+
+ if(r && (r>>8)<NPART && ptypes[r&0xFF].falldown!=2 && bmap[y/CELL][x/CELL]==3)
+ return 0;
+
+ pmap[ny][nx] = (i<<8)|parts[i].type;
+ pmap[y][x] = r;
+
+ if(r && (r>>8)<NPART)
+ {
+ r >>= 8;
+ parts[r].x += x-nx;
+ parts[r].y += y-ny;
+ }
+
+ return 1;
+}
+#define SURF_RANGE 10
+#define NORMAL_MIN_EST 3
+#define NORMAL_INTERP 20
+#define NORMAL_FRAC 16
+
+#define REFRACT 0x80000000
+
+/* heavy flint glass, for awesome refraction/dispersion
+ this way you can make roof prisms easily */
+#define GLASS_IOR 1.9
+#define GLASS_DISP 0.07
+
+static unsigned direction_to_map(float dx, float dy)
+{
+ return (dx >= 0) |
+ (((dx + dy) >= 0) << 1) | /* 567 */
+ ((dy >= 0) << 2) | /* 4+0 */
+ (((dy - dx) >= 0) << 3) | /* 321 */
+ ((dx <= 0) << 4) |
+ (((dx + dy) <= 0) << 5) |
+ ((dy <= 0) << 6) |
+ (((dy - dx) <= 0) << 7);
+}
+
+static int is_blocking(int t, int x, int y)
+{
+ if(t & REFRACT) {
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return 0;
+ if((pmap[y][x] & 0xFF) == PT_GLAS)
+ return 1;
+ return 0;
+ }
+
+ return !eval_move(t, x, y, NULL);
+}
+
+static int is_boundary(int pt, int x, int y)
+{
+ if(!is_blocking(pt,x,y))
+ return 0;
+ if(is_blocking(pt,x,y-1) && is_blocking(pt,x,y+1) && is_blocking(pt,x-1,y) && is_blocking(pt,x+1,y))
+ return 0;
+ return 1;
+}
+
+static int find_next_boundary(int pt, int *x, int *y, int dm, int *em)
+{
+ static int dx[8] = {1,1,0,-1,-1,-1,0,1};
+ static int dy[8] = {0,1,1,1,0,-1,-1,-1};
+ static int de[8] = {0x83,0x07,0x0E,0x1C,0x38,0x70,0xE0,0xC1};
+ int i, ii, i0;
+
+ if(*x <= 0 || *x >= XRES-1 || *y <= 0 || *y >= YRES-1)
+ return 0;
+
+ if(*em != -1) {
+ i0 = *em;
+ dm &= de[i0];
+ } else
+ i0 = 0;
+
+ for(ii=0; ii<8; ii++) {
+ i = (ii + i0) & 7;
+ if((dm & (1 << i)) && is_boundary(pt, *x+dx[i], *y+dy[i])) {
+ *x += dx[i];
+ *y += dy[i];
+ *em = i;
+ return 1;
+ }
+ }
+
+ return 0;
+}
+
+int get_normal(int pt, int x, int y, float dx, float dy, float *nx, float *ny)
+{
+ int ldm, rdm, lm, rm;
+ int lx, ly, lv, rx, ry, rv;
+ int i, j;
+ float r, ex, ey;
+
+ if(!dx && !dy)
+ return 0;
+
+ if(!is_boundary(pt, x, y))
+ return 0;
+
+ ldm = direction_to_map(-dy, dx);
+ rdm = direction_to_map(dy, -dx);
+ lx = rx = x;
+ ly = ry = y;
+ lv = rv = 1;
+ lm = rm = -1;
+
+ j = 0;
+ for(i=0; i<SURF_RANGE; i++) {
+ if(lv)
+ lv = find_next_boundary(pt, &lx, &ly, ldm, &lm);
+ if(rv)
+ rv = find_next_boundary(pt, &rx, &ry, rdm, &rm);
+ j += lv + rv;
+ if(!lv && !rv)
+ break;
+ }
+
+ if(j < NORMAL_MIN_EST)
+ return 0;
+
+ if((lx == rx) && (ly == ry))
+ return 0;
+
+ ex = rx - lx;
+ ey = ry - ly;
+ r = 1.0f/hypot(ex, ey);
+ *nx = ey * r;
+ *ny = -ex * r;
+
+ return 1;
+}
+
+int get_normal_interp(int pt, float x0, float y0, float dx, float dy, float *nx, float *ny)
+{
+ int x, y, i;
+
+ dx /= NORMAL_FRAC;
+ dy /= NORMAL_FRAC;
+
+ for(i=0; i<NORMAL_INTERP; i++) {
+ x = (int)(x0 + 0.5f);
+ y = (int)(y0 + 0.5f);
+ if(is_boundary(pt, x, y))
+ break;
+ x0 += dx;
+ y0 += dy;
+ }
+ if(i >= NORMAL_INTERP)
+ return 0;
+
+ if(pt == PT_PHOT)
+ photoelectric_effect(x, y);
+
+ return get_normal(pt, x, y, dx, dy, nx, ny);
+}
+
+void kill_part(int i)
+{
+ int x, y;
+ parts[i].type = PT_NONE;
+
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+
+ if(x>=0 && y>=0 && x<XRES && y<YRES)
+ pmap[y][x] = 0;
+
+ parts[i].life = pfree;
+ pfree = i;
+}
+
+#if defined(WIN32) && !defined(__MINGW32__)
+_inline int create_part(int p, int x, int y, int t)
+#else
+inline int create_part(int p, int x, int y, int t)
+#endif
+{
+ int i;
+
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return -1;
+
+ if(t==SPC_HEAT||t==SPC_COOL)
+ {
+ if((pmap[y][x]&0xFF)!=PT_NONE&&(pmap[y][x]&0xFF)<PT_NUM)
+ {
+ if(t==SPC_HEAT&&parts[pmap[y][x]>>8].temp<MAX_TEMP)
+ {
+ parts[pmap[y][x]>>8].temp = restrict_flt(parts[pmap[y][x]>>8].temp + 4.0f, MIN_TEMP, MAX_TEMP);
+ }
+ if(t==SPC_COOL&&parts[pmap[y][x]>>8].temp>MIN_TEMP)
+ {
+ parts[pmap[y][x]>>8].temp = restrict_flt(parts[pmap[y][x]>>8].temp - 4.0f, MIN_TEMP, MAX_TEMP);
+ }
+ return pmap[y][x]>>8;
+ }
+ else
+ {
+ return -1;
+ }
+ }
+ if(t==SPC_AIR)
+ {
+ pv[y/CELL][x/CELL] += 0.03f;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL] += 0.03f;
+ if(x+CELL<XRES)
+ {
+ pv[y/CELL][x/CELL+1] += 0.03f;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL+1] += 0.03f;
+ }
+ return -1;
+ }
+ if(t==SPC_VACUUM)
+ {
+ pv[y/CELL][x/CELL] -= 0.03f;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL] -= 0.03f;
+ if(x+CELL<XRES)
+ {
+ pv[y/CELL][x/CELL+1] -= 0.03f;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL+1] -= 0.03f;
+ }
+ return -1;
+ }
+
+ if(t==PT_SPRK)
+ {
+ if((pmap[y][x]&0xFF)!=PT_METL &&
+ (pmap[y][x]&0xFF)!=PT_PSCN &&
+ (pmap[y][x]&0xFF)!=PT_NSCN &&
+ (pmap[y][x]&0xFF)!=PT_NTCT &&
+ (pmap[y][x]&0xFF)!=PT_PTCT &&
+ (pmap[y][x]&0xFF)!=PT_WATR &&
+ (pmap[y][x]&0xFF)!=PT_SLTW &&
+ (pmap[y][x]&0xFF)!=PT_BMTL &&
+ (pmap[y][x]&0xFF)!=PT_RBDM &&
+ (pmap[y][x]&0xFF)!=PT_LRBD &&
+ (pmap[y][x]&0xFF)!=PT_ETRD &&
+ (pmap[y][x]&0xFF)!=PT_BRMT &&
+ (pmap[y][x]&0xFF)!=PT_NBLE &&
+ (pmap[y][x]&0xFF)!=PT_INWR)
+ return -1;
+ parts[pmap[y][x]>>8].type = PT_SPRK;
+ parts[pmap[y][x]>>8].life = 4;
+ parts[pmap[y][x]>>8].ctype = pmap[y][x]&0xFF;
+ pmap[y][x] = (pmap[y][x]&~0xFF) | PT_SPRK;
+ return pmap[y][x]>>8;
+ }
+
+ if(p==-1)
+ {
+ if(pmap[y][x])
+ return -1;
+ if(pfree == -1)
+ return -1;
+ i = pfree;
+ pfree = parts[i].life;
+ }
+ else
+ i = p;
+
+ if(t==PT_GLAS)
+ {
+ parts[i].pavg[1] = pv[y/CELL][x/CELL];
+ }
+ if(t!=PT_STKM)
+ {
+ parts[i].x = (float)x;
+ parts[i].y = (float)y;
+ parts[i].type = t;
+ parts[i].vx = 0;
+ parts[i].vy = 0;
+ parts[i].life = 0;
+ parts[i].ctype = 0;
+ parts[i].temp = ptypes[t].heat;
+ parts[i].tmp = 0;
+ }
+ if(t==PT_ACID)
+ {
+ parts[i].life = 75;
+ }
+ /*Testing
+ if(t==PT_WOOD){
+ parts[i].life = 150;
+ }
+ End Testing*/
+ if(t==PT_FUSE) {
+ parts[i].life = 50;
+ parts[i].tmp = 50;
+ }
+ if(t==PT_FSEP)
+ parts[i].life = 50;
+ if(t==PT_COAL) {
+ parts[i].life = 110;
+ parts[i].tmp = 50;
+ }
+ if(t==PT_BCOL)
+ parts[i].life = 110;
+ if(t==PT_FIRE)
+ parts[i].life = rand()%50+120;
+ if(t==PT_PLSM)
+ parts[i].life = rand()%150+50;
+ if(t==PT_HFLM)
+ parts[i].life = rand()%150+50;
+ if(t==PT_LAVA)
+ parts[i].life = rand()%120+240;
+ if(t==PT_NBLE)
+ parts[i].life = 0;
+ if(t==PT_ICEI)
+ parts[i].ctype = PT_WATR;
+ if(t==PT_NEUT)
+ {
+ float r = (rand()%128+128)/127.0f;
+ float a = (rand()%360)*3.14159f/180.0f;
+ parts[i].life = rand()%480+480;
+ parts[i].vx = r*cosf(a);
+ parts[i].vy = r*sinf(a);
+ }
+ if(t==PT_PHOT)
+ {
+ float a = (rand()%8) * 0.78540f;
+ parts[i].life = 680;
+ parts[i].ctype = 0x3FFFFFFF;
+ parts[i].vx = 3.0f*cosf(a);
+ parts[i].vy = 3.0f*sinf(a);
+ }
+
+ if(t!=PT_STKM && t!=PT_PHOT && t!=PT_NEUT)
+ pmap[y][x] = t|(i<<8);
+ else if(t==PT_STKM)
+ {
+ if(isplayer==0)
+ {
+ parts[i].x = (float)x;
+ parts[i].y = (float)y;
+ parts[i].type = PT_STKM;
+ parts[i].vx = 0;
+ parts[i].vy = 0;
+ parts[i].life = 100;
+ parts[i].ctype = 0;
+ parts[i].temp = ptypes[t].heat;
+
+
+
+ player[3] = x-1; //Setting legs positions
+ player[4] = y+6;
+ player[5] = x-1;
+ player[6] = y+6;
+
+ player[7] = x-3;
+ player[8] = y+12;
+ player[9] = x-3;
+ player[10] = y+12;
+
+ player[11] = x+1;
+ player[12] = y+6;
+ player[13] = x+1;
+ player[14] = y+6;
+
+ player[15] = x+3;
+ player[16] = y+12;
+ player[17] = x+3;
+ player[18] = y+12;
+
+ isplayer = 1;
+ }
+ }
+
+ return i;
+}
+
+static void create_cherenkov_photon(int pp)
+{
+ int i, lr, nx, ny;
+ float r, eff_ior;
+
+ if(pfree == -1)
+ return;
+ i = pfree;
+
+ nx = (int)(parts[pp].x + 0.5f);
+ ny = (int)(parts[pp].y + 0.5f);
+ if((pmap[ny][nx] & 0xFF) != PT_GLAS)
+ return;
+
+ if(hypotf(parts[pp].vx, parts[pp].vy) < 1.44f)
+ return;
+
+ pfree = parts[i].life;
+
+ lr = rand() % 2;
+
+ parts[i].type = PT_PHOT;
+ parts[i].ctype = 0x00000F80;
+ parts[i].life = 680;
+ parts[i].x = parts[pp].x;
+ parts[i].y = parts[pp].y;
+ parts[i].temp = parts[pmap[ny][nx] >> 8].temp;
+ parts[i].tmp = 0;
+
+ if(lr) {
+ parts[i].vx = parts[pp].vx - 2.5f*parts[pp].vy;
+ parts[i].vy = parts[pp].vy + 2.5f*parts[pp].vx;
+ } else {
+ parts[i].vx = parts[pp].vx + 2.5f*parts[pp].vy;
+ parts[i].vy = parts[pp].vy - 2.5f*parts[pp].vx;
+ }
+
+ /* photons have speed of light. no discussion. */
+ r = 1.269 / hypotf(parts[i].vx, parts[i].vy);
+ parts[i].vx *= r;
+ parts[i].vy *= r;
+}
+
+#if defined(WIN32) && !defined(__MINGW32__)
+_inline void delete_part(int x, int y)
+#else
+inline void delete_part(int x, int y)
+#endif
+{
+ unsigned i;
+
+ if(x<0 || y<0 || x>=XRES || y>=YRES)
+ return;
+ i = pmap[y][x];
+ if(!i || (i>>8)>=NPART)
+ return;
+
+ kill_part(i>>8);
+ pmap[y][x] = 0; // just in case
+}
+
+#if defined(WIN32) && !defined(__MINGW32__)
+_inline int is_wire(int x, int y)
+#else
+inline int is_wire(int x, int y)
+#endif
+{
+ return bmap[y][x]==6 || bmap[y][x]==7 || bmap[y][x]==3 || bmap[y][x]==8 || bmap[y][x]==11 || bmap[y][x]==12;
+}
+
+#if defined(WIN32) && !defined(__MINGW32__)
+_inline int is_wire_off(int x, int y)
+#else
+inline int is_wire_off(int x, int y)
+#endif
+{
+ return (bmap[y][x]==6 || bmap[y][x]==7 || bmap[y][x]==3 || bmap[y][x]==8 || bmap[y][x]==11 || bmap[y][x]==12) && emap[y][x]<8;
+}
+
+int get_wavelength_bin(int *wm)
+{
+ int i, w0=30, wM=0;
+
+ if(!*wm)
+ return -1;
+
+ for(i=0; i<30; i++)
+ if(*wm & (1<<i)) {
+ if(i < w0)
+ w0 = i;
+ if(i > wM)
+ wM = i;
+ }
+
+ if(wM-w0 < 5)
+ return (wM+w0)/2;
+
+ i = rand() % (wM-w0-3);
+ i += w0;
+
+ *wm &= 0x1F << i;
+ return i + 2;
+}
+
+void set_emap(int x, int y)
+{
+ int x1, x2;
+
+ if(!is_wire_off(x, y))
+ return;
+
+ // go left as far as possible
+ x1 = x2 = x;
+ while(x1>0)
+ {
+ if(!is_wire_off(x1-1, y))
+ break;
+ x1--;
+ }
+ while(x2<XRES/CELL-1)
+ {
+ if(!is_wire_off(x2+1, y))
+ break;
+ x2++;
+ }
+
+ // fill span
+ for(x=x1; x<=x2; x++)
+ emap[y][x] = 16;
+
+ // fill children
+
+ if(y>1 && x1==x2 &&
+ is_wire(x1-1, y-1) && is_wire(x1, y-1) && is_wire(x1+1, y-1) &&
+ !is_wire(x1-1, y-2) && is_wire(x1, y-2) && !is_wire(x1+1, y-2))
+ set_emap(x1, y-2);
+ else if(y>0)
+ for(x=x1; x<=x2; x++)
+ if(is_wire_off(x, y-1))
+ {
+ if(x==x1 || x==x2 || y>=YRES/CELL-1 ||
+ is_wire(x-1, y-1) || is_wire(x+1, y-1) ||
+ is_wire(x-1, y+1) || !is_wire(x, y+1) || is_wire(x+1, y+1))
+ set_emap(x, y-1);
+ }
+
+ if(y<YRES/CELL-2 && x1==x2 &&
+ is_wire(x1-1, y+1) && is_wire(x1, y+1) && is_wire(x1+1, y+1) &&
+ !is_wire(x1-1, y+2) && is_wire(x1, y+2) && !is_wire(x1+1, y+2))
+ set_emap(x1, y+2);
+ else if(y<YRES/CELL-1)
+ for(x=x1; x<=x2; x++)
+ if(is_wire_off(x, y+1))
+ {
+ if(x==x1 || x==x2 || y<0 ||
+ is_wire(x-1, y+1) || is_wire(x+1, y+1) ||
+ is_wire(x-1, y-1) || !is_wire(x, y-1) || is_wire(x+1, y-1))
+ set_emap(x, y+1);
+ }
+}
+
+#if defined(WIN32) && !defined(__MINGW32__)
+_inline int parts_avg(int ci, int ni)
+#else
+inline int parts_avg(int ci, int ni)
+#endif
+{
+ int pmr = pmap[(int)((parts[ci].y + parts[ni].y)/2)][(int)((parts[ci].x + parts[ni].x)/2)];
+ if((pmr>>8) < NPART && (pmr>>8) >= 1)
+ {
+ return parts[pmr>>8].type;
+ }
+ else
+ {
+ return PT_NONE;
+ }
+}
+
+
+int nearest_part(int ci, int t)
+{
+ int distance = sqrt(pow(XRES, 2)+pow(YRES, 2));
+ int ndistance = 0;
+ int id = -1;
+ int i = 0;
+ int cx = (int)parts[ci].x;
+ int cy = (int)parts[ci].y;
+ for(i=0; i<NPART; i++)
+ {
+ if(parts[i].type==t&&!parts[i].life&&i!=ci)
+ {
+ ndistance = abs((cx-parts[i].x)+(cy-parts[i].y));// Faster but less accurate Older: sqrt(pow(cx-parts[i].x, 2)+pow(cy-parts[i].y, 2));
+ if(ndistance<distance)
+ {
+ distance = ndistance;
+ id = i;
+ }
+ }
+ }
+ return id;
+}
+
+void update_particles_i(pixel *vid, int start, int inc)
+{
+ int i, j, x, y, t, nx, ny, r, a, s, lt, rt, fe, nt, lpv, nearp, pavg;
+ uint16_t tempu1, tempu2;
+ int16_t temps1, temps2;
+ float tempf1, tempf2;
+ float mv, dx, dy, ix, iy, lx, ly, d, pp, nrx, nry, dp;
+ float nn, ct1, ct2;
+ float pt = R_TEMP;
+ float c_heat = 0.0f;
+ int h_count = 0;
+ int starti = (start*-1);
+ for(i=start; i<(NPART-starti); i+=inc)
+ if(parts[i].type)
+ {
+ //printf("parts[%d].type: %d\n", i, parts[i].type);
+
+ lx = parts[i].x;
+ ly = parts[i].y;
+ t = parts[i].type;
+
+ if(sys_pause&&!framerender)
+ return;
+
+ if(parts[i].life && t!=PT_ACID && t!=PT_COAL && t!=PT_WOOD && t!=PT_NBLE && t!=PT_SWCH && t!=PT_STKM && t!=PT_FUSE && t!=PT_FSEP && t!=PT_BCOL)
+ {
+ if(!(parts[i].life==10&&(parts[i].type==PT_LCRY||parts[i].type==PT_PCLN||parts[i].type==PT_HSWC)))
+ parts[i].life--;
+ if(parts[i].life<=0 && t!=PT_METL && t!=PT_FIRW && t!=PT_PCLN && t!=PT_HSWC && t!=PT_WATR && t!=PT_RBDM && t!=PT_LRBD && t!=PT_SLTW && t!=PT_BRMT && t!=PT_PSCN && t!=PT_NSCN && t!=PT_NTCT && t!=PT_PTCT && t!=PT_BMTL && t!=PT_SPRK && t!=PT_LAVA && t!=PT_ETRD&&t!=PT_LCRY && t!=PT_INWR)
+ {
+ kill_part(i);
+ continue;
+ }
+ if(parts[i].life<=0 && t==PT_SPRK)
+ {
+ t = parts[i].ctype;
+ if(t!=PT_METL&&t!=PT_BMTL&&t!=PT_BRMT&&t!=PT_LRBD&&t!=PT_RBDM&&t!=PT_BTRY&&t!=PT_NBLE)
+ parts[i].temp = R_TEMP + 273.15f;
+ if(!t)
+ t = PT_METL;
+ parts[i].type = t;
+ parts[i].life = 4;
+ if(t == PT_WATR)
+ parts[i].life = 64;
+ if(t == PT_SLTW)
+ parts[i].life = 54;
+ }
+ }
+
+ if(t==PT_SPRK&&parts[i].ctype==PT_SPRK)
+ {
+ kill_part(i);
+ continue;
+ }
+
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+
+
+ if(x<0 || y<0 || x>=XRES || y>=YRES ||
+ ((bmap[y/CELL][x/CELL]==1 ||
+ bmap[y/CELL][x/CELL]==8 ||
+ bmap[y/CELL][x/CELL]==9 ||
+ (bmap[y/CELL][x/CELL]==2) ||
+ (bmap[y/CELL][x/CELL]==3 && ptypes[t].falldown!=2) ||
+ (bmap[y/CELL][x/CELL]==10 && ptypes[t].falldown!=1) ||
+ (bmap[y/CELL][x/CELL]==13 && ptypes[t].falldown!=0 && parts[i].type!=PT_FIRE && parts[i].type!=PT_SMKE) ||
+ (bmap[y/CELL][x/CELL]==6 && (t==PT_METL || t==PT_SPRK)) ||
+ (bmap[y/CELL][x/CELL]==7 && !emap[y/CELL][x/CELL])) && (t!=PT_STKM)))
+ {
+ kill_part(i);
+ continue;
+ }
+
+ vx[y/CELL][x/CELL] *= ptypes[t].airloss;
+ vy[y/CELL][x/CELL] *= ptypes[t].airloss;
+ vx[y/CELL][x/CELL] += ptypes[t].airdrag*parts[i].vx;
+ vy[y/CELL][x/CELL] += ptypes[t].airdrag*parts[i].vy;
+ if(t==PT_GAS||t==PT_NBLE)
+ {
+ if(pv[y/CELL][x/CELL]<3.5f)
+ pv[y/CELL][x/CELL] += ptypes[t].hotair*(3.5f-pv[y/CELL][x/CELL]);
+ if(y+CELL<YRES && pv[y/CELL+1][x/CELL]<3.5f)
+ pv[y/CELL+1][x/CELL] += ptypes[t].hotair*(3.5f-pv[y/CELL+1][x/CELL]);
+ if(x+CELL<XRES)
+ {
+ pv[y/CELL][x/CELL+1] += ptypes[t].hotair*(3.5f-pv[y/CELL][x/CELL+1]);
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL+1] += ptypes[t].hotair*(3.5f-pv[y/CELL+1][x/CELL+1]);
+ }
+ }
+ else
+ {
+ pv[y/CELL][x/CELL] += ptypes[t].hotair;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL] += ptypes[t].hotair;
+ if(x+CELL<XRES)
+ {
+ pv[y/CELL][x/CELL+1] += ptypes[t].hotair;
+ if(y+CELL<YRES)
+ pv[y/CELL+1][x/CELL+1] += ptypes[t].hotair;
+ }
+ }
+
+ if((ptypes[t].explosive&2) && pv[y/CELL][x/CELL]>2.5f)
+ {
+ parts[i].life = rand()%80+180;
+ rt = parts[i].type = PT_FIRE;
+ parts[i].temp = ptypes[PT_FIRE].heat + (ptypes[rt].flammable/2);
+ pv[y/CELL][x/CELL] += 0.25f * CFDS;
+ t = PT_FIRE;
+ }
+
+ parts[i].vx *= ptypes[t].loss;
+ parts[i].vy *= ptypes[t].loss;
+
+ if(t==PT_GOO && !parts[i].life)
+ {
+ if(pv[y/CELL][x/CELL]>1.0f)
+ {
+ parts[i].vx += ptypes[t].advection*vx[y/CELL][x/CELL];
+ parts[i].vy += ptypes[t].advection*vy[y/CELL][x/CELL];
+ parts[i].life = rand()%80+300;
+ }
+ }
+ else
+ {
+ parts[i].vx += ptypes[t].advection*vx[y/CELL][x/CELL];
+ parts[i].vy += ptypes[t].advection*vy[y/CELL][x/CELL] + ptypes[t].gravity;
+ }
+
+ if(ptypes[t].diffusion)
+ {
+ parts[i].vx += ptypes[t].diffusion*(rand()/(0.5f*RAND_MAX)-1.0f);
+ parts[i].vy += ptypes[t].diffusion*(rand()/(0.5f*RAND_MAX)-1.0f);
+ }
+
+ // interpolator
+#if defined(WIN32) && !defined(__MINGW32__)
+ mv = max(fabsf(parts[i].vx), fabsf(parts[i].vy));
+#else
+ mv = fmaxf(fabsf(parts[i].vx), fabsf(parts[i].vy));
+#endif
+ if(mv < ISTP)
+ {
+ parts[i].x += parts[i].vx;
+ parts[i].y += parts[i].vy;
+ ix = parts[i].x;
+ iy = parts[i].y;
+ }
+ else
+ {
+ dx = parts[i].vx*ISTP/mv;
+ dy = parts[i].vy*ISTP/mv;
+ ix = parts[i].x;
+ iy = parts[i].y;
+ while(1)
+ {
+ mv -= ISTP;
+ if(mv <= 0.0f)
+ {
+ // nothing found
+ parts[i].x += parts[i].vx;
+ parts[i].y += parts[i].vy;
+ ix = parts[i].x;
+ iy = parts[i].y;
+ break;
+ }
+ ix += dx;
+ iy += dy;
+ nx = (int)(ix+0.5f);
+ ny = (int)(iy+0.5f);
+ if(nx<0 || ny<0 || nx>=XRES || ny>=YRES || pmap[ny][nx] || (bmap[ny/CELL][nx/CELL] && bmap[ny/CELL][nx/CELL]!=5))
+ {
+ parts[i].x = ix;
+ parts[i].y = iy;
+ break;
+ }
+ }
+ }
+
+ a = nt = 0;
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES &&
+ (!bmap[(y+ny)/CELL][(x+nx)/CELL] || bmap[(y+ny)/CELL][(x+nx)/CELL]==5))
+ {
+ if(!pmap[y+ny][x+nx])
+ a = 1;
+ if((pmap[y+ny][x+nx]&0xFF)!=t)
+ nt = 1;
+ }
+ if(legacy_enable)
+ {
+ if(t==PT_WTRV && pv[y/CELL][x/CELL]>4.0f)
+ t = parts[i].type = PT_DSTW;
+ if(t==PT_OIL && pv[y/CELL][x/CELL]<-6.0f)
+ t = parts[i].type = PT_GAS;
+ if(t==PT_GAS && pv[y/CELL][x/CELL]>6.0f)
+ t = parts[i].type = PT_OIL;
+ if(t==PT_DESL && pv[y/CELL][x/CELL]>12.0f)
+ t = parts[i].type = PT_FIRE;
+ }
+ if(t==PT_GAS && pv[y/CELL][x/CELL]<-6.0f)
+ t = parts[i].type = PT_OIL;
+ if(t==PT_DESL && pv[y/CELL][x/CELL]>5.0f) // Only way I know to make it
+ t = parts[i].type = PT_FIRE; // combust under pressure.
+ if(t==PT_GAS && pv[y/CELL][x/CELL]>6.0f)
+ t = parts[i].type = PT_OIL;
+ if(t==PT_BMTL && pv[y/CELL][x/CELL]>2.5f)
+ t = parts[i].type = PT_BRMT;
+ if(t==PT_BRCK && pv[y/CELL][x/CELL]>2.8f)
+ t = parts[i].type = PT_STNE;
+ //if(t==PT_GLAS && pv[y/CELL][x/CELL]>4.0f)
+ // t = parts[i].type = PT_BGLA;
+ if(t==PT_GLAS)
+ {
+ parts[i].pavg[0] = parts[i].pavg[1];
+ parts[i].pavg[1] = pv[y/CELL][x/CELL];
+ if(parts[i].pavg[1]-parts[i].pavg[0] > 0.05f || parts[i].pavg[1]-parts[i].pavg[0] < -0.05f)
+ {
+ parts[i].type = PT_BGLA;
+ }
+ }
+ if(t==PT_ICEI && pv[y/CELL][x/CELL]>0.8f)
+ t = parts[i].type = PT_SNOW;
+ if(t==PT_PLUT && 1>rand()%100 && ((int)(5.0f*pv[y/CELL][x/CELL]))>(rand()%1000))
+ {
+ t = PT_NEUT;
+ create_part(i, x, y, t);
+ }
+
+ if(t==PT_SPRK&&parts[i].ctype==PT_ETRD&&parts[i].life==1)
+ {
+ nearp = nearest_part(i, PT_ETRD);
+ if(nearp!=-1&&parts_avg(i, nearp)!=PT_INSL)
+ {
+ create_line((int)parts[i].x, (int)parts[i].y, (int)parts[nearp].x, (int)parts[nearp].y, 0, PT_PLSM);
+ t = parts[i].type = PT_ETRD;
+ parts[i].ctype = PT_NONE;
+ parts[i].life = 20;
+ parts[nearp].type = PT_SPRK;
+ parts[nearp].life = 9;
+ parts[nearp].ctype = PT_ETRD;
+ }
+ }
+
+ if(!legacy_enable)
+ {
+ int ctemp = pv[y/CELL][x/CELL]*2;
+ c_heat = 0.0f;
+ h_count = 0;
+ if(t==PT_ICEI && !parts[i].ctype)
+ parts[i].ctype = PT_WATR;
+ if(ptypes[t].hconduct>(rand()%250)&&!(parts[i].type==PT_HSWC&&parts[i].life!=10))
+ {
+ for(nx=-1; nx<2; nx++)
+ {
+ for(ny=-1; ny<2; ny++)
+ {
+ if(x+nx>=0 && y+ny>0 && x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(parts[r>>8].type!=PT_NONE&&parts[i].type!=PT_NONE&&ptypes[parts[r>>8].type].hconduct>0&&!(parts[r>>8].type==PT_HSWC&&parts[r>>8].life!=10))
+ {
+ h_count++;
+ c_heat += parts[r>>8].temp;
+ }
+ }
+ }
+ }
+ pt = parts[i].temp = (c_heat+parts[i].temp)/(h_count+1);
+ for(nx=-1; nx<2; nx++)
+ {
+ for(ny=-1; ny<2; ny++)
+ {
+ if(x+nx>=0 && y+ny>0 && x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(parts[r>>8].type!=PT_NONE&&parts[i].type!=PT_NONE&&ptypes[parts[r>>8].type].hconduct>0&&!(parts[r>>8].type==PT_HSWC&&parts[r>>8].life!=10))
+ {
+ parts[r>>8].temp = parts[i].temp;
+ }
+ }
+ }
+ }
+ if(pt>=pstates[t].btemp&&pstates[t].burn)
+ {
+ t = parts[i].type = pstates[t].burn;
+ if(t==PT_FIRE||t==PT_PLSM)
+ parts[i].life = rand()%50+120;
+ }
+ else if((pt<=pstates[t].stemp||(t==PT_LAVA&&(pt<=pstates[parts[i].ctype].ltemp)))&&pstates[t].solid)
+ {
+ if(t==PT_LAVA&&parts[i].ctype)
+ {
+ parts[i].life = 0;
+ if(parts[i].ctype==PT_THRM)
+ {
+ parts[i].tmp = 0;
+ parts[i].ctype = PT_BMTL;
+ }
+ t = parts[i].type = parts[i].ctype;
+ parts[i].ctype = PT_NONE;
+ }
+ else if(pstates[t].solid==PT_ICEI&&pt<=pstates[t].stemp)
+ {
+ parts[i].ctype = parts[i].type;
+ t = parts[i].type = PT_ICEI;
+ }
+ else
+ {
+ parts[i].life = 0;
+ t = parts[i].type = pstates[t].solid;
+ }
+ }
+ else if((pt>=pstates[t].ltemp&&(pt<=pstates[t].gtemp||!pstates[t].gas)&&pstates[t].state==ST_SOLID&&pstates[t].liquid)||(t==PT_ICEI&&pt>pstates[parts[i].ctype].stemp))
+ {
+ if(pstates[t].liquid==PT_LAVA)
+ {
+ parts[i].life = rand()%120+240;
+ parts[i].ctype = (parts[i].type==PT_BRMT)?PT_BMTL:parts[i].type;
+ parts[i].ctype = (parts[i].ctype==PT_SAND)?PT_GLAS:parts[i].ctype;
+ parts[i].ctype = (parts[i].ctype==PT_BGLA)?PT_GLAS:parts[i].ctype;
+ t = parts[i].type = pstates[t].liquid;
+ }
+ else if(t==PT_ICEI&&parts[i].ctype)
+ {
+ t = parts[i].type = parts[i].ctype;
+ parts[i].ctype = PT_NONE;
+ }
+ else
+ {
+ t = parts[i].type = pstates[t].liquid;
+ }
+ }
+ else if(pt-ctemp<=pstates[t].ltemp&&pstates[t].liquid&&pstates[t].state==ST_GAS)
+ {
+ t = parts[i].type = pstates[t].liquid;
+ }
+ else if(pt-ctemp>=pstates[t].gtemp&&(pstates[t].gas||parts[i].type==PT_LNTG)&&(pstates[t].state==ST_LIQUID||pstates[t].state==ST_SOLID))
+ {
+ if(t==PT_SLTW&&1>rand()%6)
+ {
+ t = parts[i].type = PT_SALT;
+ }
+ else
+ {
+ t = parts[i].type = pstates[t].gas;
+ pv[y/CELL][x/CELL] += 0.50f;
+ if(t==PT_FIRE)
+ parts[i].life = rand()%50+120;
+ if(t==PT_HFLM)
+ parts[i].life = rand()%50+120;
+ }
+ }
+ if(t==PT_URAN && pv[y/CELL][x/CELL]>0.0f)
+ {
+ float atemp = parts[i].temp + (-MIN_TEMP);
+ pt = parts[i].temp = (atemp*(1+(pv[y/CELL][x/CELL]/2000)))+MIN_TEMP;
+ }
+ if(t==PT_LAVA)
+ {
+ parts[i].life = restrict_flt((pt-700)/7, 0.0f, 400.0f);
+ if(parts[i].ctype==PT_THRM&&parts[i].tmp>0)
+ {
+ parts[i].tmp--;
+ parts[i].temp = 3500;
+ }
+ }
+ pt = parts[i].temp = restrict_flt(parts[i].temp, MIN_TEMP, MAX_TEMP);
+ }
+ }
+ if(t==PT_PTCT&&parts[i].temp>295.0f)
+ {
+ pt = parts[i].temp -= 2.5f;
+ }
+ if(t==PT_NTCT&&parts[i].temp>295.0f)
+ {
+ pt = parts[i].temp -= 2.5f;
+ }
+
+ if(t==PT_WATR || t==PT_ETRD || t==PT_SLTW || t==PT_METL || t==PT_RBDM || t==PT_LRBD || t==PT_BRMT || t==PT_PSCN || t==PT_NSCN || t==PT_NTCT || t==PT_PTCT || t==PT_BMTL || t==PT_SPRK|| t == PT_NBLE || t==PT_INWR)
+ {
+ nx = x % CELL;
+ if(nx == 0)
+ nx = x/CELL - 1;
+ else if(nx == CELL-1)
+ nx = x/CELL + 1;
+ else
+ nx = x/CELL;
+ ny = y % CELL;
+ if(ny == 0)
+ ny = y/CELL - 1;
+ else if(ny == CELL-1)
+ ny = y/CELL + 1;
+ else
+ ny = y/CELL;
+ if(nx>=0 && ny>=0 && nx<XRES/CELL && ny<YRES/CELL)
+ {
+ if(t==PT_WATR || t==PT_ETRD || t==PT_SLTW || t==PT_METL || t==PT_RBDM || t==PT_LRBD || t==PT_NSCN || t==PT_NTCT || t==PT_PTCT || t==PT_PSCN || t==PT_BRMT || t==PT_BMTL||t==PT_NBLE || t==PT_INWR)
+ {
+ if(emap[ny][nx]==12 && !parts[i].life)
+ {
+ parts[i].type = PT_SPRK;
+ parts[i].life = 4;
+ parts[i].ctype = t;
+ t = PT_SPRK;
+ }
+ }
+ else if(bmap[ny][nx]==6 || bmap[ny][nx]==7 || bmap[ny][nx]==3 || bmap[ny][nx]==8 || bmap[ny][nx]==11 || bmap[ny][nx]==12)
+ set_emap(nx, ny);
+ }
+ }
+
+ nx = x/CELL;
+ ny = y/CELL;
+ if(bmap[ny][nx]==6 && emap[ny][nx]<8)
+ set_emap(nx, ny);
+
+ fe = 0;
+ if(t==PT_THDR)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_METL || (r&0xFF)==PT_ETRD || (r&0xFF)==PT_PSCN || (r&0xFF)==PT_NSCN || (r&0xFF)==PT_NTCT || (r&0xFF)==PT_PTCT || (r&0xFF)==PT_BMTL || (r&0xFF)==PT_RBDM || (r&0xFF)==PT_LRBD || (r&0xFF)==PT_BRMT||(r&0xFF)==PT_NBLE) || (r&0xFF)==PT_INWR && parts[r>>8].ctype!=PT_SPRK)
+
+ {
+ t = parts[i].type = PT_NONE;
+ parts[r>>8].ctype = parts[r>>8].type;
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ }
+ else if((r&0xFF)!=PT_CLNE&&(r&0xFF)!=PT_THDR&&(r&0xFF)!=PT_SPRK&&(r&0xFF)!=PT_DMND&&(r&0xFF)!=PT_FIRE&&(r&0xFF)!=PT_NEUT&&(r&0xFF)!=PT_PHOT&&(r&0xFF))
+ {
+ pv[y/CELL][x/CELL] += 100.0f;
+ if(legacy_enable&&1>(rand()%200))
+ {
+ parts[i].life = rand()%50+120;
+ t = parts[i].type = PT_FIRE;
+ }
+ else
+ {
+ t = parts[i].type = PT_NONE;
+ }
+ }
+ }
+ }
+ else if(t==PT_ICEI || t==PT_SNOW)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_SALT || (r&0xFF)==PT_SLTW) && 1>(rand()%1000))
+ {
+ t = parts[i].type = PT_SLTW;
+ parts[r>>8].type = PT_SLTW;
+ }
+ if(legacy_enable)
+ {
+ if(((r&0xFF)==PT_WATR || (r&0xFF)==PT_DSTW) && 1>(rand()%1000))
+ {
+ t = parts[i].type = PT_ICEI;
+ parts[r>>8].type = PT_ICEI;
+ }
+ if(t==PT_SNOW && ((r&0xFF)==PT_WATR || (r&0xFF)==PT_DSTW) && 15>(rand()%1000))
+ t = parts[i].type = PT_WATR;
+ }
+ }
+ }
+ else if(t==PT_COAL)
+ {
+ if(parts[i].life<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ create_part(-1, x, y, PT_FIRE);
+ goto killed;
+ } else if(parts[i].life < 100) {
+ parts[i].life--;
+ create_part(-1, x+rand()%3-1, y+rand()%3-1, PT_FIRE);
+ }
+ if((pv[y/CELL][x/CELL] > 4.3f)&&parts[i].tmp>40)
+ parts[i].tmp=39;
+ else if(parts[i].tmp<40&&parts[i].tmp>0)
+ parts[i].tmp--;
+ else if(parts[i].tmp<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ r = create_part(-1, x, y, PT_BCOL);
+ goto killed;
+ }
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_FIRE || (r&0xFF)==PT_PLSM) && 1>(rand()%500))
+ {
+ if(parts[i].life>100) {
+ parts[i].life = 99;
+ }
+ }
+ }
+ }
+ else if(t==PT_BCOL)
+ {
+ if(parts[i].life<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ create_part(-1, x, y, PT_FIRE);
+ goto killed;
+ } else if(parts[i].life < 100) {
+ parts[i].life--;
+ create_part(-1, x+rand()%3-1, y+rand()%3-1, PT_FIRE);
+ }
+
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_FIRE || (r&0xFF)==PT_PLSM) && 1>(rand()%500))
+ {
+ if(parts[i].life>100) {
+ parts[i].life = 99;
+ }
+ }
+ }
+ }
+ else if(t==PT_FUSE)
+ {
+ if(parts[i].life<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ r = create_part(-1, x, y, PT_PLSM);
+ parts[r].life = 50;
+ goto killed;
+ } else if (parts[i].life < 40) {
+ parts[i].life--;
+ if((rand()%100)==0) {
+ r = create_part(-1, (nx=x+rand()%3-1), (ny=y+rand()%3-1), PT_PLSM);
+ parts[r].life = 50;
+ }
+ }
+ if((pv[y/CELL][x/CELL] > 2.7f)&&parts[i].tmp>40)
+ parts[i].tmp=39;
+ else if(parts[i].tmp<40&&parts[i].tmp>0)
+ parts[i].tmp--;
+ else if(parts[i].tmp<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ r = create_part(-1, x, y, PT_FSEP);
+ goto killed;
+ }
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_SPRK || ((parts[i].temp>=(273.15+700.0f)) && 1>(rand()%20)))
+ {
+ if(parts[i].life>40) {
+ parts[i].life = 39;
+ }
+ }
+ }
+ }
+ else if(t==PT_FSEP)
+ {
+ if(parts[i].life<=0) {
+ t = PT_NONE;
+ kill_part(i);
+ r = create_part(-1, x, y, PT_PLSM);
+ parts[r].life = 50;
+ goto killed;
+ } else if (parts[i].life < 40) {
+ parts[i].life--;
+ if((rand()%10)==0) {
+ r = create_part(-1, (nx=x+rand()%3-1), (ny=y+rand()%3-1), PT_PLSM);
+ parts[r].life = 50;
+ }
+ }
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_SPRK || (parts[i].temp>=(273.15+400.0f)) && 1>(rand()%15))
+ {
+ if(parts[i].life>40) {
+ parts[i].life = 39;
+ }
+ }
+ }
+ }
+ else if(t==PT_NTCT||t==PT_PTCT||t==PT_INWR)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_SPRK && parts[r>>8].ctype==PT_METL && parts_avg(i, r>>8)!=PT_INSL)
+ {
+ parts[i].temp = 473.0f;
+ }
+ }
+ }
+ else if(t==PT_PLNT)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_WATR && 1>(rand()%250))
+ {
+ t = parts[i].type = PT_PLNT;
+ parts[r>>8].type = PT_PLNT;
+ }
+ else if((r&0xFF)==PT_LAVA && 1>(rand()%250))
+ {
+ parts[i].life = 4;
+ t = parts[i].type = PT_FIRE;
+ }
+ //if(t==PT_SNOW && (r&0xFF)==PT_WATR && 15>(rand()%1000))
+ //t = parts[i].type = PT_WATR;
+ }
+ }
+ else if(t==PT_THRM)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 && x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_FIRE || (r&0xFF)==PT_PLSM || (r&0xFF)==PT_LAVA))
+ {
+ if(1>(rand()%500)) {
+ t = parts[i].type = PT_LAVA;
+ parts[i].ctype = PT_BMTL;
+ pt = parts[i].temp = 3500.0f;
+ pv[y/CELL][x/CELL] += 50.0f;
+ } else {
+ t = parts[i].type = PT_LAVA;
+ parts[i].life = 400;
+ parts[i].ctype = PT_THRM;
+ pt = parts[i].temp = 3500.0f;
+ parts[i].tmp = 20;
+ }
+ }
+ //if(t==PT_SNOW && (r&0xFF)==PT_WATR && 15>(rand()%1000))
+ //t = parts[i].type = PT_WATR;
+ }
+ }
+ else if(t==PT_WATR||t==PT_DSTW)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_FIRE || (r&0xFF)==PT_LAVA) && 1>(rand()%10) && legacy_enable)
+ {
+ t = parts[i].type = PT_WTRV;
+ }
+ else if((r&0xFF)==PT_SALT && 1>(rand()%250))
+ {
+ t = parts[i].type = PT_SLTW;
+ parts[r>>8].type = PT_SLTW;
+ }
+ if((((r&0xFF)==PT_WATR||(r&0xFF)==PT_SLTW)&&t==PT_DSTW) && 1>(rand()%500))
+ {
+ t = parts[i].type = PT_WATR;
+ }
+ if(((r&0xFF)==PT_SLTW&&t==PT_DSTW) && 1>(rand()%500))
+ {
+ t = parts[i].type = PT_SLTW;
+ }
+ if(((r&0xFF)==PT_RBDM||(r&0xFF)==PT_LRBD) && (legacy_enable||pt>12.0f) && 1>(rand()%500))
+ {
+ parts[i].life = 4;
+ t = parts[i].type = PT_FIRE;
+
+ }
+ }
+ }
+ else if(t==PT_SLTW)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_FIRE || (r&0xFF)==PT_LAVA) && 1>(rand()%10) && legacy_enable)
+ {
+ t = parts[i].type = PT_SALT;
+ parts[r>>8].type = PT_WTRV;
+ }
+ else if((r&0xFF)==PT_SALT && 1>(rand()%10000))
+ {
+ parts[r>>8].type = PT_SLTW;
+ }
+ if(((r&0xFF)==PT_RBDM||(r&0xFF)==PT_LRBD) && pt>12.0f && 1>(rand()%500))
+ {
+ parts[i].life = 4;
+ t = parts[i].type = PT_FIRE;
+
+ }
+ }
+ }
+ else if(t==PT_WTRV)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(((r&0xFF)==PT_WATR||(r&0xFF)==PT_DSTW||(r&0xFF)==PT_SLTW) && 1>(rand()%1000) && legacy_enable)
+ {
+ t = parts[i].type = PT_WATR;
+ parts[r>>8].type = PT_WATR;
+ }
+
+ if(((r&0xFF)==PT_RBDM||(r&0xFF)==PT_LRBD) && pt>12.0f && 1>(rand()%500))
+ {
+ parts[i].life = 4;
+ t = parts[i].type = PT_FIRE;
+
+ }
+ if(((r&0xFF)==PT_ICEI || (r&0xFF)==PT_SNOW) && 1>(rand()%1000) && legacy_enable)
+ {
+ t = parts[i].type = PT_WATR;
+ if(1>(rand()%1000))
+ parts[r>>8].type = PT_WATR;
+ }
+ }
+ }
+ else if(t==PT_YEST)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_DYST && 1>(rand()%30) && !legacy_enable)
+ {
+ t = parts[i].type = PT_DYST;
+ }
+ }
+ }
+ else if(t==PT_ACID)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 && x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)!=PT_ACID)
+ {
+ if ((r&0xFF)==PT_PLEX || (r&0xFF)==PT_NITR || (r&0xFF)==PT_GUNP || (r&0xFF)==PT_RBDM || (r&0xFF)==PT_LRBD)
+ {
+ t = parts[i].type = PT_FIRE;
+ parts[i].life = 4;
+ parts[r>>8].type = PT_FIRE;
+ parts[r>>8].life = 4;
+ }
+ else if(((r&0xFF)!=PT_CLNE && ptypes[parts[r>>8].type].hardness>(rand()%1000))&&parts[i].life>=50)
+ {
+ parts[i].life--;
+ parts[r>>8].type = PT_NONE;
+ }
+ else if (parts[i].life==50)
+ {
+ parts[i].life = 0;
+ t = parts[i].type = PT_NONE;
+ }
+ }
+ }
+ }
+ else if(t==PT_NEUT)
+ {
+ rt = 3 + (int)pv[y/CELL][x/CELL];
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_WATR || (r&0xFF)==PT_ICEI || (r&0xFF)==PT_SNOW)
+ {
+ parts[i].vx *= 0.995;
+ parts[i].vy *= 0.995;
+ }
+ if((r&0xFF)==PT_PLUT && rt>(rand()%1000))
+ {
+ if(33>rand()%100)
+ {
+ create_part(r>>8, x+nx, y+ny, rand()%2 ? PT_LAVA : PT_URAN);
+ }
+ else
+ {
+ create_part(r>>8, x+nx, y+ny, PT_NEUT);
+ parts[r>>8].vx = 0.25f*parts[r>>8].vx + parts[i].vx;
+ parts[r>>8].vy = 0.25f*parts[r>>8].vy + parts[i].vy;
+ }
+ pv[y/CELL][x/CELL] += 10.0f * CFDS; //Used to be 2, some people said nukes weren't powerful enough
+ fe ++;
+ }
+ if((r&0xFF)==PT_GUNP && 15>(rand()%1000))
+ parts[r>>8].type = PT_DUST;
+ if((r&0xFF)==PT_DYST && 15>(rand()%1000))
+ parts[r>>8].type = PT_YEST;
+ if((r&0xFF)==PT_YEST) {
+ if(15>(rand()%100000)&&isplayer==0)
+ parts[r>>8].type = PT_STKM;
+ else
+ parts[r>>8].type = PT_DYST;
+ }
+
+ if((r&0xFF)==PT_WATR && 15>(rand()%100))
+ parts[r>>8].type = PT_DSTW;
+ if((r&0xFF)==PT_PLEX && 15>(rand()%1000))
+ parts[r>>8].type = PT_GOO;
+ if((r&0xFF)==PT_NITR && 15>(rand()%1000))
+ parts[r>>8].type = PT_DESL;
+ if((r&0xFF)==PT_PLNT && 5>(rand()%100))
+ parts[r>>8].type = PT_WOOD;
+ if((r&0xFF)==PT_DESL && 15>(rand()%1000))
+ parts[r>>8].type = PT_GAS;
+ if((r&0xFF)==PT_COAL && 5>(rand()%100))
+ parts[r>>8].type = PT_WOOD;
+ /*if(parts[r>>8].type>1 && parts[r>>8].type!=PT_NEUT && parts[r>>8].type-1!=PT_NEUT && parts[r>>8].type-1!=PT_STKM &&
+ (ptypes[parts[r>>8].type-1].menusection==SC_LIQUID||
+ ptypes[parts[r>>8].type-1].menusection==SC_EXPLOSIVE||
+ ptypes[parts[r>>8].type-1].menusection==SC_GAS||
+ ptypes[parts[r>>8].type-1].menusection==SC_POWDERS) && 15>(rand()%1000))
+ parts[r>>8].type--;*/
+ }
+ }
+ else if(t==PT_PHOT)
+ {
+ rt = 3 + (int)pv[y/CELL][x/CELL];
+ for(nx=0; nx<1; nx++)
+ for(ny=0; ny<1; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if((r&0xFF)==PT_WATR || (r&0xFF)==PT_ICEI || (r&0xFF)==PT_SNOW)
+ {
+ parts[i].vx *= 0.995;
+ parts[i].vy *= 0.995;
+ }
+ }
+ }
+ else if(t==PT_LCRY)
+ {
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(rt==PT_SPRK)
+ {
+ if(parts[r>>8].ctype==PT_PSCN)
+ {
+ parts[i].life = 10;
+ }
+ else if(parts[r>>8].ctype==PT_NSCN)
+ {
+ parts[i].life = 9;
+ }
+ }
+ if(rt==PT_LCRY)
+ {
+ if(parts[i].life==10&&parts[r>>8].life<10&&parts[r>>8].life>0)
+ {
+ parts[i].life = 9;
+ }
+ else if(parts[i].life==0&&parts[r>>8].life==10)
+ {
+ parts[i].life = 10;
+ }
+ }
+ }
+ }
+ else if(t==PT_PCLN)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(rt==PT_SPRK)
+ {
+ if(parts[r>>8].ctype==PT_PSCN)
+ {
+ parts[i].life = 10;
+ }
+ else if(parts[r>>8].ctype==PT_NSCN)
+ {
+ parts[i].life = 9;
+ }
+ }
+ if(rt==PT_PCLN)
+ {
+ if(parts[i].life==10&&parts[r>>8].life<10&&parts[r>>8].life>0)
+ {
+ parts[i].life = 9;
+ }
+ else if(parts[i].life==0&&parts[r>>8].life==10)
+ {
+ parts[i].life = 10;
+ }
+ }
+ }
+ }
+ else if(t==PT_HSWC)
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(rt==PT_SPRK)
+ {
+ if(parts[r>>8].ctype==PT_PSCN)
+ {
+ parts[i].life = 10;
+ }
+ else if(parts[r>>8].ctype==PT_NSCN)
+ {
+ parts[i].life = 9;
+ }
+ }
+ if(rt==PT_HSWC)
+ {
+ if(parts[i].life==10&&parts[r>>8].life<10&&parts[r>>8].life>0)
+ {
+ parts[i].life = 9;
+ }
+ else if(parts[i].life==0&&parts[r>>8].life==10)
+ {
+ parts[i].life = 10;
+ }
+ }
+ }
+ }
+ else if(t==PT_AMTR)
+ {
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if((r&0xFF)!=PT_AMTR && (r&0xFF)!=PT_DMND && (r&0xFF)!=PT_CLNE && (r&0xFF)!=PT_PCLN && (r&0xFF)!=PT_NONE && (r&0xFF)!=PT_PHOT && (r&0xFF)!=PT_VOID && (r&0xFF)!=PT_BHOL)
+ {
+ t = parts[i].life++;
+ if(parts[i].life==3)
+ {
+ parts[i].type = PT_NONE;
+ kill_part(i);
+ }
+ parts[r>>8].life = 0;
+ parts[r>>8].type = PT_NONE;
+ kill_part(r>>8);
+ if(2>(rand()/(RAND_MAX/100)))
+ create_part(r>>8, x+nx, y+ny, PT_PHOT);
+ pv[y/CELL][x/CELL] -= 5.0f;
+ continue;
+ }
+ }
+ }
+ else if(t==PT_FIRW) {
+ if(parts[i].tmp==0) {
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(rt==PT_FIRE||rt==PT_PLSM||rt==PT_THDR)
+ {
+ parts[i].tmp = 1;
+ parts[i].life = rand()%50+60;
+ }
+ }
+ }
+ else if(parts[i].tmp==1) {
+ if(parts[i].life==0) {
+ parts[i].tmp=2;
+ } else {
+ float newVel = parts[i].life/25;
+ parts[i].flags = parts[i].flags&0xFFFFFFFE;
+ if((pmap[(int)(ly-newVel)][(int)lx]&0xFF)==PT_NONE) {
+ parts[i].vy = -newVel;
+ ly-=newVel;
+ iy-=newVel;
+ }
+ }
+ }
+ else if(parts[i].tmp==2) {
+ int col = rand()%200+4;
+ for(nx=-2; nx<3; nx++) {
+ for(ny=-2; ny<3; ny++) {
+ if(x+nx>=0 && y+ny>0 && x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ int tmul = rand()%7;
+ create_part(-1, x+nx, y+ny, PT_FIRW);
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(parts[r>>8].type==PT_FIRW) {
+ parts[r>>8].vx = (rand()%3-1)*tmul;
+ parts[r>>8].vy = (rand()%3-1)*tmul;
+ parts[r>>8].tmp = col;
+ parts[r>>8].life = rand()%100+100;
+ parts[r>>8].temp = 6000.0f;
+ }
+ }
+ }
+ }
+ pv[y/CELL][x/CELL] += 20;
+ kill_part(i);
+ } else if(parts[i].tmp>=3) {
+ if(parts[i].life<=0) {
+ kill_part(i);
+ }
+ }
+ }
+ else if(t==PT_BTRY)
+ {
+ rt = 3 + (int)pv[y/CELL][x/CELL];
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(parts_avg(i,r>>8) != PT_INSL)
+ {
+ if((rt==PT_METL||rt==PT_ETRD||rt==PT_BMTL||rt==PT_BRMT||rt==PT_LRBD||rt==PT_RBDM||rt==PT_PSCN||rt==PT_NSCN||rt==PT_NBLE)&&parts[r>>8].life==0 && abs(nx)+abs(ny) < 4)
+ {
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ parts[r>>8].type = PT_SPRK;
+ }
+ }
+ }
+ } else if(t==PT_SWCH)
+ {
+ rt = 3 + (int)pv[y/CELL][x/CELL];
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ rt = parts[r>>8].type;
+ if(parts[r>>8].type == PT_SWCH&&parts_avg(i,r>>8)!=PT_INSL)
+ {
+ if(parts[i].life==10&&parts[r>>8].life<10&&parts[r>>8].life>0)
+ {
+ parts[i].life = 9;
+ }
+ else if(parts[i].life==0&&parts[r>>8].life==10)
+ {
+ parts[i].life = 10;
+ }
+ }
+ }
+ }
+ if(t==PT_SWCH)
+ if((parts[i].life>0&&parts[i].life<10)|| parts[i].life == 11)
+ {
+ parts[i].life--;
+ }
+ if(t==PT_FIRE || t==PT_PLSM || t==PT_LAVA || t==PT_SPRK || fe || (t==PT_PHOT&&(1>rand()%10)))
+ {
+ for(nx=-2; nx<3; nx++)
+ for(ny=-2; ny<3; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES && (nx || ny))
+ {
+ r = pmap[y+ny][x+nx];
+ if((r>>8)>=NPART || !r)
+ continue;
+ if(bmap[(y+ny)/CELL][(x+nx)/CELL] && bmap[(y+ny)/CELL][(x+nx)/CELL]!=5)
+ continue;
+ rt = parts[r>>8].type;
+ if((a || ptypes[rt].explosive) && ((rt!=PT_RBDM && rt!=PT_LRBD && rt!=PT_INSL && rt!=PT_SWCH) || t!=PT_SPRK) &&
+ (t!=PT_LAVA || parts[i].life>0 || (rt!=PT_STNE && rt!=PT_PSCN && rt!=PT_NSCN && rt!=PT_NTCT && rt!=PT_PTCT && rt!=PT_METL && rt!=PT_ETRD && rt!=PT_BMTL && rt!=PT_BRMT && rt!=PT_SWCH && rt!=PT_INWR)) &&
+ ptypes[rt].flammable && (ptypes[rt].flammable + (int)(pv[(y+ny)/CELL][(x+nx)/CELL]*10.0f))>(rand()%1000))
+ {
+ parts[r>>8].type = PT_FIRE;
+ parts[r>>8].temp = ptypes[PT_FIRE].heat + (ptypes[rt].flammable/2);
+ parts[r>>8].life = rand()%80+180;
+ if(ptypes[rt].explosive)
+ pv[y/CELL][x/CELL] += 0.25f * CFDS;
+ continue;
+ }
+ lpv = (int)pv[(y+ny)/CELL][(x+nx)/CELL];
+ if(lpv < 1) lpv = 1;
+ if(legacy_enable)
+ {
+ if(t!=PT_SPRK && ptypes[rt].meltable && ((rt!=PT_RBDM && rt!=PT_LRBD) || t!=PT_SPRK) && ((t!=PT_FIRE&&t!=PT_PLSM) || (rt!=PT_METL && rt!=PT_ETRD && rt!=PT_PSCN && rt!=PT_NSCN && rt!=PT_NTCT && rt!=PT_PTCT && rt!=PT_BMTL && rt!=PT_BRMT && rt!=PT_SALT && rt!=PT_INWR)) &&
+ ptypes[rt].meltable*lpv>(rand()%1000))
+ {
+ if(t!=PT_LAVA || parts[i].life>0)
+ {
+ parts[r>>8].ctype = (parts[r>>8].type==PT_BRMT)?PT_BMTL:parts[r>>8].type;
+ parts[r>>8].ctype = (parts[r>>8].ctype==PT_SAND)?PT_GLAS:parts[r>>8].ctype;
+ parts[r>>8].type = PT_LAVA;
+ parts[r>>8].life = rand()%120+240;
+ }
+ else
+ {
+ parts[i].life = 0;
+ t = parts[i].type = (parts[i].ctype)?parts[i].ctype:PT_STNE;
+ parts[i].ctype = PT_NONE;//rt;
+ goto killed;
+ }
+ }
+ if(t!=PT_SPRK && (rt==PT_ICEI || rt==PT_SNOW))
+ {
+ parts[r>>8].type = PT_WATR;
+ if(t==PT_FIRE)
+ {
+ parts[i].x = lx;
+ parts[i].y = ly;
+ kill_part(i);
+ goto killed;
+ }
+ if(t==PT_LAVA)
+ {
+ parts[i].life = 0;
+ t = parts[i].type = PT_STNE;
+ goto killed;
+ }
+ }
+ if(t!=PT_SPRK && (rt==PT_WATR || rt==PT_DSTW || rt==PT_SLTW))
+ {
+ kill_part(r>>8);
+ if(t==PT_FIRE)
+ {
+ parts[i].x = lx;
+ parts[i].y = ly;
+ kill_part(i);
+ goto killed;
+ }
+ if(t==PT_LAVA)
+ {
+ parts[i].life = 0;
+ t = parts[i].type = (parts[i].ctype)?parts[i].ctype:PT_STNE;
+ parts[i].ctype = PT_NONE;
+ goto killed;
+ }
+ }
+ }
+ pavg = parts_avg(i, r>>8);
+ if(rt==PT_SWCH && t==PT_SPRK)
+ {
+ pavg = parts_avg(r>>8, i);
+ if(parts[i].ctype == PT_PSCN&&pavg != PT_INSL)
+ parts[r>>8].life = 10;
+ if(parts[i].ctype == PT_NSCN&&pavg != PT_INSL)
+ parts[r>>8].life = 9;
+ if(!(parts[i].ctype == PT_PSCN||parts[i].ctype == PT_NSCN)&&parts[r>>8].life == 10&&pavg != PT_INSL)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].ctype = PT_SWCH;
+ parts[r>>8].life = 4;
+ }
+ }
+ pavg = parts_avg(i, r>>8);
+ if(pavg != PT_INSL)
+ {
+ if(t==PT_SPRK && (rt==PT_METL||rt==PT_ETRD||rt==PT_BMTL||rt==PT_BRMT||rt==PT_LRBD||rt==PT_RBDM||rt==PT_PSCN||rt==PT_NSCN||rt==PT_NBLE) && parts[r>>8].life==0 &&
+ (parts[i].life<3 || ((r>>8)<i && parts[i].life<4)) && abs(nx)+abs(ny)<4)
+ {
+ if(!(rt==PT_PSCN&&parts[i].ctype==PT_NSCN)&&!(rt!=PT_PSCN&&!(rt==PT_NSCN&&parts[i].temp>=373.0f)&&parts[i].ctype==PT_NTCT)&&!(rt!=PT_PSCN&&!(rt==PT_NSCN&&parts[i].temp<=373.0f)&&parts[i].ctype==PT_PTCT)&&!(rt!=PT_PSCN&&!(rt==PT_NSCN)&&parts[i].ctype==PT_INWR) && pavg != PT_INSL &&!(parts[i].ctype==PT_SWCH&&(rt==PT_PSCN||rt==PT_NSCN)) )
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ if(parts[r>>8].temp+10.0f<673.0f&&!legacy_enable&&!(rt==PT_LRBD||rt==PT_RBDM||rt==PT_NTCT||rt==PT_PTCT||rt==PT_INWR))
+ parts[r>>8].temp = parts[r>>8].temp+10.0f;
+ }
+ }
+ if(t==PT_SPRK && rt==PT_NTCT && parts[r>>8].life==0 &&
+ (parts[i].life<3 || ((r>>8)<i && parts[i].life<4)) && abs(nx)+abs(ny)<4)
+ {
+ if((parts[i].ctype==PT_NSCN||parts[i].ctype==PT_NTCT||(parts[i].ctype==PT_PSCN&&parts[r>>8].temp>373.0f))&&pavg != PT_INSL)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ }
+ }
+ if(t==PT_SPRK && rt==PT_PTCT && parts[r>>8].life==0 &&
+ (parts[i].life<3 || ((r>>8)<i && parts[i].life<4)) && abs(nx)+abs(ny)<4)
+ {
+ if((parts[i].ctype==PT_NSCN||parts[i].ctype==PT_PTCT||(parts[i].ctype==PT_PSCN&&parts[r>>8].temp<373.0f))&&pavg != PT_INSL)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ }
+ }
+ if(t==PT_SPRK && rt==PT_INWR && parts[r>>8].life==0 &&
+ (parts[i].life<3 || ((r>>8)<i && parts[i].life<4)) && abs(nx)+abs(ny)<4)
+ {
+ if((parts[i].ctype==PT_NSCN||parts[i].ctype==PT_INWR||parts[i].ctype==PT_PSCN)&&pavg != PT_INSL)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ }
+ }
+ if(t==PT_SPRK && rt==PT_WATR && parts[r>>8].life==0 &&
+ (parts[i].life<2 || ((r>>8)<i && parts[i].life<3)) && abs(nx)+abs(ny)<4)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 6;
+ parts[r>>8].ctype = rt;
+ }
+ if(t==PT_SPRK && rt==PT_SLTW && parts[r>>8].life==0 &&
+ (parts[i].life<2 || ((r>>8)<i && parts[i].life<3)) && abs(nx)+abs(ny)<4)
+ {
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 5;
+ parts[r>>8].ctype = rt;
+ }
+ if(t==PT_SPRK&&parts[i].ctype==PT_ETRD&&parts[i].life==5)
+ {
+ if(rt==PT_METL||rt==PT_ETRD||rt==PT_BMTL||rt==PT_BRMT||rt==PT_LRBD||rt==PT_RBDM||rt==PT_PSCN||rt==PT_NSCN)
+ {
+ t = parts[i].type = PT_ETRD;
+ parts[i].ctype = PT_NONE;
+ parts[i].life = 20;
+ parts[r>>8].type = PT_SPRK;
+ parts[r>>8].life = 4;
+ parts[r>>8].ctype = rt;
+ }
+ }
+
+ if(t==PT_SPRK&&parts[i].ctype==PT_NBLE&&parts[i].life<=1)
+ {
+ parts[i].life = rand()%150+50;
+ parts[i].type = PT_PLSM;
+ parts[i].ctype = PT_NBLE;
+ parts[i].temp = 3500;
+ pv[y/CELL][x/CELL] += 1;
+ }
+ if(t==PT_SPRK&&parts[i].ctype==PT_SWCH&&parts[i].life<=1)
+ {
+ parts[i].type = PT_SWCH;
+ parts[i].life = 11;
+ }
+ }
+ }
+killed:
+ if(parts[i].type == PT_NONE)
+ continue;
+ }
+ if(t==PT_STKM)
+ {
+ float dt = 0.9;///(FPSB*FPSB); //Delta time in square
+ //Tempirature handling
+ if(parts[i].temp<243)
+ parts[i].life -= 1;
+ if((parts[i].temp<309.6f) && (parts[i].temp>=243))
+ parts[i].temp += 1;
+
+ //Death
+ if(parts[i].life<1 || death == 1 || (pv[y/CELL][x/CELL]>=4.5f && player[2] != SPC_AIR) ) //If his HP is less that 0 or there is very big wind...
+ {
+ death = 0;
+ for(r=-2; r<=1; r++)
+ {
+ create_part(-1, x+r, y-2, player[2]);
+ create_part(-1, x+r+1, y+2, player[2]);
+ create_part(-1, x-2, y+r+1, player[2]);
+ create_part(-1, x+2, y+r, player[2]);
+ }
+ kill_part(i); //Kill him
+ goto killed;
+ }
+
+ parts[i].vy += -0.7*dt; //Head up!
+
+ //Verlet integration
+ pp = 2*player[3]-player[5]+player[19]*dt*dt;;
+ player[5] = player[3];
+ player[3] = pp;
+ pp = 2*player[4]-player[6]+player[20]*dt*dt;;
+ player[6] = player[4];
+ player[4] = pp;
+
+ pp = 2*player[7]-player[9]+player[21]*dt*dt;;
+ player[9] = player[7];
+ player[7] = pp;
+ pp = 2*player[8]-player[10]+(player[22]+1)*dt*dt;;
+ player[10] = player[8];
+ player[8] = pp;
+
+ pp = 2*player[11]-player[13]+player[23]*dt*dt;;
+ player[13] = player[11];
+ player[11] = pp;
+ pp = 2*player[12]-player[14]+player[24]*dt*dt;;
+ player[14] = player[12];
+ player[12] = pp;
+
+ pp = 2*player[15]-player[17]+player[25]*dt*dt;;
+ player[17] = player[15];
+ player[15] = pp;
+ pp = 2*player[16]-player[18]+(player[26]+1)*dt*dt;;
+ player[18] = player[16];
+ player[16] = pp;
+
+ //Setting acceleration to 0
+ player[19] = 0;
+ player[20] = 0;
+
+ player[21] = 0;
+ player[22] = 0;
+
+ player[23] = 0;
+ player[24] = 0;
+
+ player[25] = 0;
+ player[26] = 0;
+
+ //Go left
+ if (((int)(player[0])&0x01) == 0x01 && pstates[pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF].state != ST_GAS)
+ {
+ if (pstates[pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF].state != ST_LIQUID
+ && (pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF) != PT_LNTG)
+ {
+ if (pmap[(int)(player[8]-1)][(int)(player[7])])
+ {
+ player[21] = -3;
+ player[22] = -2;
+ player[19] = -2;
+ }
+
+ if (pmap[(int)(player[16]-1)][(int)(player[15])])
+ {
+ player[25] = -3;
+ player[26] = -2;
+ player[23] = -2;
+ }
+ }
+ else
+ {
+ if (pmap[(int)(player[8]-1)][(int)(player[7])]) //It should move another way in liquids
+ {
+ player[21] = -1;
+ player[22] = -1;
+ player[19] = -1;
+ }
+
+ if (pmap[(int)(player[16]-1)][(int)(player[15])])
+ {
+ player[25] = -1;
+ player[26] = -1;
+ player[23] = -1;
+ }
+ }
+ }
+
+ //Go right
+ if (((int)(player[0])&0x02) == 0x02 && pstates[pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF].state != ST_GAS)
+ {
+ if (pstates[pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF].state != ST_LIQUID
+ && (pmap[(int)(parts[i].y+10)][(int)(parts[i].x)]&0xFF) != PT_LNTG)
+ {
+ if (pmap[(int)(player[8]-1)][(int)(player[7])])
+ {
+ player[21] = 3;
+ player[22] = -2;
+ player[19] = 2;
+ }
+
+ if (pmap[(int)(player[16]-1)][(int)(player[15])])
+ {
+ player[25] = 3;
+ player[26] = -2;
+ player[23] = 2;
+ }
+ }
+ else
+ {
+ if (pmap[(int)(player[8]-1)][(int)(player[7])])
+ {
+ player[21] = 1;
+ player[22] = -1;
+ player[19] = 1;
+ }
+
+ if (pmap[(int)(player[16]-1)][(int)(player[15])])
+ {
+ player[25] = 1;
+ player[26] = -1;
+ player[23] = 1;
+ }
+
+ }
+ }
+
+ //Jump
+ if (((int)(player[0])&0x04) == 0x04 && (pstates[pmap[(int)(player[8]-0.5)][(int)(player[7])]&0xFF].state != ST_GAS || pstates[pmap[(int)(player[16]-0.5)][(int)(player[15])]&0xFF].state != ST_GAS))
+ {
+ if (pmap[(int)(player[8]-0.5)][(int)(player[7])] || pmap[(int)(player[16]-0.5)][(int)(player[15])])
+ {
+ parts[i].vy = -5;
+ player[22] -= 1;
+ player[26] -= 1;
+ }
+ }
+
+ //Charge detector wall if foot inside
+ if(bmap[(int)(player[8]+0.5)/CELL][(int)(player[7]+0.5)/CELL]==6)
+ set_emap((int)player[7]/CELL, (int)player[8]/CELL);
+ if(bmap[(int)(player[16]+0.5)/CELL][(int)(player[15]+0.5)/CELL]==6)
+ set_emap((int)(player[15]+0.5)/CELL, (int)(player[16]+0.5)/CELL);
+
+ //Searching for particles near head
+ for(nx = -2; nx <= 2; nx++)
+ for(ny = 0; ny>=-2; ny--)
+ {
+ if(!pmap[ny+y][nx+x] || (pmap[ny+y][nx+x]>>8)>=NPART)
+ continue;
+ if(ptypes[pmap[ny+y][nx+x]&0xFF].falldown!=0 || (pmap[ny+y][nx+x]&0xFF) == PT_NEUT || (pmap[ny+y][nx+x]&0xFF) == PT_PHOT)
+ {
+ player[2] = pmap[ny+y][nx+x]&0xFF; //Current element
+ }
+ if((pmap[ny+y][nx+x]&0xFF) == PT_PLNT && parts[i].life<100) //Plant gives him 5 HP
+ {
+ if(parts[i].life<=95)
+ parts[i].life += 5;
+ else
+ parts[i].life = 100;
+ kill_part(pmap[ny+y][nx+x]>>8);
+ }
+
+ if((pmap[ny+y][nx+x]&0xFF) == PT_NEUT)
+ {
+ parts[i].life -= (102-parts[i].life)/2;
+ kill_part(pmap[ny+y][nx+x]>>8);
+ }
+ if(bmap[(ny+y)/CELL][(nx+x)/CELL]==4)
+ player[2] = SPC_AIR;
+ }
+
+ //Head position
+ nx = x + 3*((((int)player[1])&0x02) == 0x02) - 3*((((int)player[1])&0x01) == 0x01);
+ ny = y - 3*(player[1] == 0);
+
+ //Spawn
+ if(((int)(player[0])&0x08) == 0x08)
+ {
+ ny -= 2*(rand()%2)+1;
+ r = pmap[ny][nx];
+ if(!((r>>8)>=NPART))
+ {
+ if(pstates[r&0xFF].state == ST_SOLID)
+ {
+ create_part(-1, nx, ny, PT_SPRK);
+ }
+ else
+ {
+ if(player[2] == SPC_AIR)
+ create_parts(nx + 3*((((int)player[1])&0x02) == 0x02) - 3*((((int)player[1])&0x01) == 0x01), ny, 4, SPC_AIR);
+ else
+ create_part(-1, nx, ny, player[2]);
+
+ r = pmap[ny][nx];
+ if( ((r>>8) < NPART) && (r>>8)>=0 && player[2] != PT_PHOT && player[2] != SPC_AIR)
+ parts[r>>8].vx = parts[r>>8].vx + 5*((((int)player[1])&0x02) == 0x02) - 5*(((int)(player[1])&0x01) == 0x01);
+ if(((r>>8) < NPART) && (r>>8)>=0 && player[2] == PT_PHOT)
+ {
+ int random = abs(rand()%3-1)*3;
+ if (random==0)
+ {
+ parts[r>>8].life = 0;
+ parts[r>>8].type = PT_NONE;
+ }
+ else
+ {
+ parts[r>>8].vy = 0;
+ parts[r>>8].vx = (((((int)player[1])&0x02) == 0x02) - (((int)(player[1])&0x01) == 0x01))*random;
+ }
+ }
+
+ }
+ }
+ }
+
+ //Simulation of joints
+ d = 25/(pow((player[3]-player[7]), 2) + pow((player[4]-player[8]), 2)+25) - 0.5; //Fast distance
+ player[7] -= (player[3]-player[7])*d;
+ player[8] -= (player[4]-player[8])*d;
+ player[3] += (player[3]-player[7])*d;
+ player[4] += (player[4]-player[8])*d;
+
+ d = 25/(pow((player[11]-player[15]), 2) + pow((player[12]-player[16]), 2)+25) - 0.5;
+ player[15] -= (player[11]-player[15])*d;
+ player[16] -= (player[12]-player[16])*d;
+ player[11] += (player[11]-player[15])*d;
+ player[12] += (player[12]-player[16])*d;
+
+ d = 36/(pow((player[3]-parts[i].x), 2) + pow((player[4]-parts[i].y), 2)+36) - 0.5;
+ parts[i].vx -= (player[3]-parts[i].x)*d;
+ parts[i].vy -= (player[4]-parts[i].y)*d;
+ player[3] += (player[3]-parts[i].x)*d;
+ player[4] += (player[4]-parts[i].y)*d;
+
+ d = 36/(pow((player[11]-parts[i].x), 2) + pow((player[12]-parts[i].y), 2)+36) - 0.5;
+ parts[i].vx -= (player[11]-parts[i].x)*d;
+ parts[i].vy -= (player[12]-parts[i].y)*d;
+ player[11] += (player[11]-parts[i].x)*d;
+ player[12] += (player[12]-parts[i].y)*d;
+
+ //Side collisions checking
+ for(nx = -3; nx <= 3; nx++)
+ {
+ r = pmap[(int)(player[16]-2)][(int)(player[15]+nx)];
+ if(r && pstates[r&0xFF].state != ST_GAS && pstates[r&0xFF].state != ST_LIQUID)
+ player[15] -= nx;
+
+ r = pmap[(int)(player[8]-2)][(int)(player[7]+nx)];
+ if(r && pstates[r&0xFF].state != ST_GAS && pstates[r&0xFF].state != ST_LIQUID)
+ player[7] -= nx;
+ }
+
+ //Collision checks
+ for(ny = -2-(int)parts[i].vy; ny<=0; ny++)
+ {
+ r = pmap[(int)(player[8]+ny)][(int)(player[7]+0.5)]; //This is to make coding more pleasant :-)
+
+ //For left leg
+ if (r && (r&0xFF)!=PT_STKM)
+ {
+ if(pstates[r&0xFF].state == ST_LIQUID || (r&0xFF) == PT_LNTG) //Liquid checks //Liquid checks
+ {
+ if(parts[i].y<(player[8]-10))
+ parts[i].vy = 1*dt;
+ else
+ parts[i].vy = 0;
+ if(abs(parts[i].vx)>1)
+ parts[i].vx *= 0.5*dt;
+ }
+ else
+ {
+ if(pstates[r&0xFF].state != ST_GAS)
+ {
+ player[8] += ny-1;
+ parts[i].vy -= 0.5*parts[i].vy*dt;
+ }
+ }
+ player[9] = player[7];
+ }
+
+ r = pmap[(int)(player[16]+ny)][(int)(player[15]+0.5)];
+
+ //For right leg
+ if (r && (r&0xFF)!=PT_STKM)
+ {
+ if(pstates[r&0xFF].state == ST_LIQUID || (r&0xFF) == PT_LNTG)
+ {
+ if(parts[i].y<(player[16]-10))
+ parts[i].vy = 1*dt;
+ else
+ parts[i].vy = 0;
+ if(abs(parts[i].vx)>1)
+ parts[i].vx *= 0.5*dt;
+ }
+ else
+ {
+ if(pstates[r&0xFF].state != ST_GAS)
+ {
+ player[16] += ny-1;
+ parts[i].vy -= 0.5*parts[i].vy*dt;
+ }
+ }
+ player[17] = player[15];
+ }
+
+ //If it falls too fast
+ if (parts[i].vy>=30)
+ {
+ parts[i].y -= (10+ny)*dt;
+ parts[i].vy = -10*dt;
+ }
+
+ }
+
+ //Keeping legs distance
+ if (pow((player[7] - player[15]), 2)<16 && pow((player[8]-player[16]), 2)<1)
+ {
+ player[21] -= 0.2;
+ player[25] += 0.2;
+ }
+
+ if (pow((player[3] - player[11]), 2)<16 && pow((player[4]-player[12]), 2)<1)
+ {
+ player[19] -= 0.2;
+ player[23] += 0.2;
+ }
+
+ //If legs touch something
+ r = pmap[(int)(player[8]+0.5)][(int)(player[7]+0.5)];
+ if((r&0xFF)==PT_SPRK && r && (r>>8)<NPART) //If on charge
+ {
+ parts[i].life -= (int)(rand()/1000)+38;
+ }
+
+ if (r>0 && (r>>8)<NPART) //If hot or cold
+ {
+ if(parts[r>>8].temp>=323 || parts[r>>8].temp<=243)
+ {
+ parts[i].life -= 2;
+ player[26] -= 1;
+ }
+ }
+
+ if ((r&0xFF)==PT_ACID) //If on acid
+ parts[i].life -= 5;
+
+ if ((r&0xFF)==PT_PLUT) //If on plut
+ parts[i].life -= 1;
+
+ r = pmap[(int)(player[16]+0.5)][(int)(player[15]+0.5)];
+ if((r&0xFF)==PT_SPRK && r && (r>>8)<NPART) //If on charge
+ {
+ parts[i].life -= (int)(rand()/1000)+38;
+ }
+
+ if(r>0 && (r>>8)<NPART) //If hot or cold
+ {
+ if(parts[r>>8].temp>=323 || parts[r>>8].temp<=243)
+ {
+ parts[i].life -= 2;
+ player[22] -= 1;
+ }
+ }
+
+ if ((r&0xFF)==PT_ACID) //If on acid
+ parts[i].life -= 5;
+
+ if ((r&0xFF)==PT_PLUT) //If on plut
+ parts[i].life -= 1;
+
+ isplayer = 1;
+ }
+ if(t==PT_CLNE)
+ {
+ if(!parts[i].ctype)
+ {
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES &&
+ pmap[y+ny][x+nx] &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_CLNE &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_STKM &&
+ (pmap[y+ny][x+nx]&0xFF)!=0xFF)
+ parts[i].ctype = pmap[y+ny][x+nx]&0xFF;
+ }
+ else
+ create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+ }
+ if(parts[i].type==PT_PCLN)
+ {
+ if(!parts[i].ctype)
+ for(nx=-1; nx<2; nx++)
+ for(ny=-1; ny<2; ny++)
+ if(x+nx>=0 && y+ny>0 &&
+ x+nx<XRES && y+ny<YRES &&
+ pmap[y+ny][x+nx] &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_CLNE &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_PCLN &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_SPRK &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_NSCN &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_PSCN &&
+ (pmap[y+ny][x+nx]&0xFF)!=PT_STKM &&
+ (pmap[y+ny][x+nx]&0xFF)!=0xFF)
+ parts[i].ctype = pmap[y+ny][x+nx]&0xFF;
+ if(parts[i].ctype && parts[i].life==10)
+ create_part(-1, x+rand()%3-1, y+rand()%3-1, parts[i].ctype);
+ }
+ if(t==PT_YEST)
+ {
+ if(parts[i].temp>303&&parts[i].temp<317) {
+ create_part(-1, x+rand()%3-1, y+rand()%3-1, PT_YEST);
+ }
+ }
+ if(t==PT_PLSM&&parts[i].ctype == PT_NBLE&&parts[i].life <=1)
+ {
+ parts[i].type = PT_NBLE;
+ parts[i].life = 0;
+ }
+ if (t==PT_FIRE && parts[i].life <=1 && parts[i].temp<625)
+ {
+ t = parts[i].type = PT_SMKE;
+ parts[i].life = rand()%20+250;
+ }
+
+ nx = (int)(parts[i].x+0.5f);
+ ny = (int)(parts[i].y+0.5f);
+
+ if(nx<CELL || nx>=XRES-CELL ||
+ ny<CELL || ny>=YRES-CELL)
+ {
+ parts[i].x = lx;
+ parts[i].y = ly;
+ kill_part(i);
+ continue;
+ }
+
+ if(parts[i].type == PT_PHOT) {
+ rt = pmap[ny][nx] & 0xFF;
+
+ if(rt==PT_CLNE) {
+ lt = pmap[ny][nx] >> 8;
+ if(!parts[lt].ctype)
+ parts[lt].ctype = PT_PHOT;
+ }
+
+ lt = pmap[y][x] & 0xFF;
+
+ r = eval_move(PT_PHOT, nx, ny, NULL);
+
+ if(((rt==PT_GLAS && lt!=PT_GLAS) || (rt!=PT_GLAS && lt==PT_GLAS)) && r) {
+ if(!get_normal_interp(REFRACT|parts[i].type, x, y, parts[i].vx, parts[i].vy, &nrx, &nry)) {
+ kill_part(i);
+ continue;
+ }
+
+ r = get_wavelength_bin(&parts[i].ctype);
+ if(r == -1) {
+ kill_part(i);
+ continue;
+ }
+ nn = GLASS_IOR - GLASS_DISP*(r-15)/15.0f;
+ nn *= nn;
+
+ nrx = -nrx;
+ nry = -nry;
+ if(rt==PT_GLAS && lt!=PT_GLAS)
+ nn = 1.0f/nn;
+ ct1 = parts[i].vx*nrx + parts[i].vy*nry;
+ ct2 = 1.0f - (nn*nn)*(1.0f-(ct1*ct1));
+ if(ct2 < 0.0f) {
+ parts[i].vx -= 2.0f*ct1*nrx;
+ parts[i].vy -= 2.0f*ct1*nry;
+ parts[i].x = lx;
+ parts[i].y = ly;
+ nx = (int)(lx + 0.5f);
+ ny = (int)(ly + 0.5f);
+ } else {
+ ct2 = sqrtf(ct2);
+ ct2 = ct2 - nn*ct1;
+ parts[i].vx = nn*parts[i].vx + ct2*nrx;
+ parts[i].vy = nn*parts[i].vy + ct2*nry;
+ }
+ }
+ }
+
+ rt = parts[i].flags & FLAG_STAGNANT;
+ parts[i].flags &= ~FLAG_STAGNANT;
+ if(!try_move(i, x, y, nx, ny))
+ {
+ parts[i].x = lx;
+ parts[i].y = ly;
+ if(ptypes[t].falldown)
+ {
+ if(nx!=x && try_move(i, x, y, nx, y))
+ {
+ parts[i].x = ix;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else if(ny!=y && try_move(i, x, y, x, ny))
+ {
+ parts[i].y = iy;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else
+ {
+ r = (rand()%2)*2-1;
+ if(ny!=y && try_move(i, x, y, x+r, ny))
+ {
+ parts[i].x += r;
+ parts[i].y = iy;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else if(ny!=y && try_move(i, x, y, x-r, ny))
+ {
+ parts[i].x -= r;
+ parts[i].y = iy;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else if(nx!=x && try_move(i, x, y, nx, y+r))
+ {
+ parts[i].x = ix;
+ parts[i].y += r;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else if(nx!=x && try_move(i, x, y, nx, y-r))
+ {
+ parts[i].x = ix;
+ parts[i].y -= r;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else if(ptypes[t].falldown>1 && parts[i].vy>fabs(parts[i].vx))
+ {
+ s = 0;
+ if(!rt || nt)
+ rt = 50;
+ else
+ rt = 10;
+ for(j=x+r; j>=0 && j>=x-rt && j<x+rt && j<XRES; j+=r)
+ {
+ if(try_move(i, x, y, j, ny))
+ {
+ parts[i].x += j-x;
+ parts[i].y += ny-y;
+ x = j;
+ y = ny;
+ s = 1;
+ break;
+ }
+ if(try_move(i, x, y, j, y))
+ {
+ parts[i].x += j-x;
+ x = j;
+ s = 1;
+ break;
+ }
+ if((pmap[y][j]&255)!=t || (bmap[y/CELL][j/CELL] && bmap[y/CELL][j/CELL]!=5))
+ break;
+ }
+ if(parts[i].vy>0)
+ r = 1;
+ else
+ r = -1;
+ if(s)
+ for(j=y+r; j>=0 && j<YRES && j>=y-rt && j<x+rt; j+=r)
+ {
+ if(try_move(i, x, y, x, j))
+ {
+ parts[i].y += j-y;
+ break;
+ }
+ if((pmap[j][x]&255)!=t || (bmap[j/CELL][x/CELL] && bmap[j/CELL][x/CELL]!=5))
+ {
+ s = 0;
+ break;
+ }
+ }
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ if(!s)
+ parts[i].flags |= FLAG_STAGNANT;
+ }
+ else
+ {
+ parts[i].flags |= FLAG_STAGNANT;
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ }
+ }
+ else
+ {
+ parts[i].flags |= FLAG_STAGNANT;
+ if(t==PT_NEUT && 100>(rand()%1000))
+ {
+ kill_part(i);
+ continue;
+ }
+ else if(t==PT_NEUT || t==PT_PHOT)
+ {
+ r = pmap[ny][nx];
+
+ /* this should be replaced with a particle type attribute ("photwl" or something) */
+ if((r & 0xFF) == PT_PSCN) parts[i].ctype = 0x00000000;
+ if((r & 0xFF) == PT_NSCN) parts[i].ctype = 0x00000000;
+ if((r & 0xFF) == PT_COAL) parts[i].ctype = 0x00000000;
+ if((r & 0xFF) == PT_BCOL) parts[i].ctype = 0x00000000;
+ if((r & 0xFF) == PT_PLEX) parts[i].ctype &= 0x1F00003E;
+ if((r & 0xFF) == PT_NITR) parts[i].ctype &= 0x0007C000;
+ if((r & 0xFF) == PT_NBLE) parts[i].ctype &= 0x3FFF8000;
+ if((r & 0xFF) == PT_LAVA) parts[i].ctype &= 0x3FF00000;
+ if((r & 0xFF) == PT_ACID) parts[i].ctype &= 0x1FE001FE;
+ if((r & 0xFF) == PT_DUST) parts[i].ctype &= 0x3FFFFFC0;
+ if((r & 0xFF) == PT_SNOW) parts[i].ctype &= 0x03FFFFFF;
+ if((r & 0xFF) == PT_GOO) parts[i].ctype &= 0x3FFAAA00;
+ if((r & 0xFF) == PT_PLNT) parts[i].ctype &= 0x0007C000;
+ if((r & 0xFF) == PT_PLUT) parts[i].ctype &= 0x001FCE00;
+ if((r & 0xFF) == PT_URAN) parts[i].ctype &= 0x003FC000;
+
+ if(get_normal_interp(t, lx, ly, parts[i].vx, parts[i].vy, &nrx, &nry)) {
+ dp = nrx*parts[i].vx + nry*parts[i].vy;
+ parts[i].vx -= 2.0f*dp*nrx;
+ parts[i].vy -= 2.0f*dp*nry;
+ nx = (int)(parts[i].x + parts[i].vx + 0.5f);
+ ny = (int)(parts[i].y + parts[i].vy + 0.5f);
+ if(try_move(i, x, y, nx, ny)) {
+ parts[i].x = (float)nx;
+ parts[i].y = (float)ny;
+ } else {
+ kill_part(i);
+ continue;
+ }
+ } else {
+ kill_part(i);
+ continue;
+ }
+
+ if(!parts[i].ctype) {
+ kill_part(i);
+ continue;
+ }
+ }
+
+ else
+ {
+ if(nx>x+ISTP) nx=x+ISTP;
+ if(nx<x-ISTP) nx=x-ISTP;
+ if(ny>y+ISTP) ny=y+ISTP;
+ if(ny<y-ISTP) ny=y-ISTP;
+ if(try_move(i, x, y, 2*x-nx, ny))
+ {
+ parts[i].x = (float)(2*x-nx);
+ parts[i].y = (float)iy;
+ parts[i].vx *= ptypes[t].collision;
+ }
+ else if(try_move(i, x, y, nx, 2*y-ny))
+ {
+ parts[i].x = (float)ix;
+ parts[i].y = (float)(2*y-ny);
+ parts[i].vy *= ptypes[t].collision;
+ }
+ else
+ {
+ parts[i].vx *= ptypes[t].collision;
+ parts[i].vy *= ptypes[t].collision;
+ }
+ }
+ }
+ }
+ if(nx<CELL || nx>=XRES-CELL || ny<CELL || ny>=YRES-CELL)
+ {
+ kill_part(i);
+ continue;
+ }
+ }
+ if(framerender) {
+ framerender = 0;
+ sys_pause = 1;
+ }
+}
+
+void update_particles(pixel *vid)
+{
+ int i, j, x, y, t, nx, ny, r, cr,cg,cb, l = -1;
+ float lx, ly;
+#ifdef MT
+ int pt = 0, pc = 0;
+ pthread_t *InterThreads;
+#endif
+
+ isplayer = 0; //Needed for player spawning
+ memset(pmap, 0, sizeof(pmap));
+ r = rand()%2;
+ for(j=0; j<NPART; j++)
+ {
+ i = r ? (NPART-1-j) : j;
+ if(parts[i].type)
+ {
+ t = parts[i].type;
+ x = (int)(parts[i].x+0.5f);
+ y = (int)(parts[i].y+0.5f);
+ if(x>=0 && y>=0 && x<XRES && y<YRES && parts[i].type!=PT_PHOT) {
+ if(parts[i].type!=PT_NEUT || (pmap[y][x]&0xFF)!=PT_GLAS)
+ pmap[y][x] = t|(i<<8);
+ }
+ }
+ else
+ {
+ parts[i].life = l;
+ l = i;
+ }
+ }
+ pfree=l;
+ if(cmode==4)
+ {
+ for(y=0; y<YRES/CELL; y++)
+ {
+ for(x=0; x<XRES/CELL; x++)
+ {
+ if(bmap[y][x]==1)
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0x80);
+
+ }
+ if(bmap[y][x]==2)
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0x80);
+ }
+ if(bmap[y][x]==3)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xC0C0C0);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0xC0, 0xC0, 0xC0);
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==4)
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x8080FF);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0xFF);
+ }
+ if(bmap[y][x]==6)
+ {
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xFF8080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0xFF, 0x80, 0x80);
+ }
+ if(emap[y][x])
+ {
+ cr = 255;
+ cg = 32;
+ cb = 8;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==7)
+ {
+ if(emap[y][x])
+ {
+ cr = cg = cb = 128;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(i&j&1)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0x80);
+ }
+ }
+ else
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!(i&j&1))
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0x80);
+ }
+ }
+ }
+ if(bmap[y][x]==8)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xC0C0C0);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0xC0, 0xC0, 0xC0);
+ }
+ else
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x80, 0x80, 0x80);
+ }
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==11)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ //pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xFFFF22);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0xFF, 0xFF, 0x22);
+ }
+
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==13)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x579777);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x57, 0x97, 0x77);
+ }
+ }
+ }
+ if(bmap[y][x]==9)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x3C3C3C);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x3C, 0x3C, 0x3C);
+ }
+ }
+ }
+ if(bmap[y][x]==10)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x575757);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x57, 0x57, 0x57);
+ }
+ }
+ }
+ if(bmap[y][x]==12)
+ {
+ if(emap[y][x])
+ {
+ for(j=0; j<CELL; j++)
+ {
+ for(i=(j)&1; i<CELL; i++)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x242424);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x24, 0x24, 0x24);
+ }
+ }
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x000000);
+ }
+ }
+ }
+ else
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x242424);
+ drawblob(vid, (x*CELL+i), (y*CELL+j), 0x24, 0x24, 0x24);
+ }
+ }
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(emap[y][x] && (!sys_pause||framerender))
+ emap[y][x] --;
+ }
+ }
+ }
+ else
+ {
+ for(y=0; y<YRES/CELL; y++)
+ {
+ for(x=0; x<XRES/CELL; x++)
+ {
+ if(bmap[y][x]==1)
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ }
+ if(bmap[y][x]==2)
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ if(bmap[y][x]==3)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xC0C0C0);
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==4)
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x8080FF);
+ if(bmap[y][x]==6)
+ {
+ for(j=0; j<CELL; j+=2)
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xFF8080);
+ if(emap[y][x])
+ {
+ cr = 255;
+ cg = 32;
+ cb = 8;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==7)
+ {
+ if(emap[y][x])
+ {
+ cr = cg = cb = 128;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(i&j&1)
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ }
+ else
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ if(!(i&j&1))
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ }
+ }
+ if(bmap[y][x]==8)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xC0C0C0);
+ else
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x808080);
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==11)
+ {
+ for(j=0; j<CELL; j++)
+ for(i=0; i<CELL; i++)
+ {
+ //pmap[y*CELL+j][x*CELL+i] = 0x7FFFFFFF;
+ if(!((y*CELL+j)%2) && !((x*CELL+i)%2))
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0xFFFF22);
+
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(bmap[y][x]==9)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x3C3C3C);
+ }
+ }
+ }
+ if(bmap[y][x]==13)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x579777);
+ }
+ }
+ }
+ if(bmap[y][x]==10)
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j>>1)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x575757);
+ }
+ }
+ }
+ if(bmap[y][x]==12)
+ {
+ if(emap[y][x])
+ {
+ for(j=0; j<CELL; j++)
+ {
+ for(i=(j)&1; i<CELL; i++)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x242424);
+ }
+ }
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x000000);
+ }
+ }
+ }
+ else
+ {
+ for(j=0; j<CELL; j+=2)
+ {
+ for(i=(j)&1; i<CELL; i+=2)
+ {
+ vid[(y*CELL+j)*(XRES+BARSIZE)+(x*CELL+i)] = PIXPACK(0x242424);
+ }
+ }
+ }
+ if(emap[y][x])
+ {
+ cr = cg = cb = 16;
+ cr += fire_r[y][x];
+ if(cr > 255) cr = 255;
+ fire_r[y][x] = cr;
+ cg += fire_g[y][x];
+ if(cg > 255) cg = 255;
+ fire_g[y][x] = cg;
+ cb += fire_b[y][x];
+ if(cb > 255) cb = 255;
+ fire_b[y][x] = cb;
+ }
+ }
+ if(emap[y][x] && (!sys_pause||framerender))
+ emap[y][x] --;
+ }
+ }
+ }
+
+ update_particles_i(vid, 0, 1);
+
+ for(y=0; y<YRES/CELL; y++)
+ for(x=0; x<XRES/CELL; x++)
+ if(bmap[y][x]==5)
+ {
+ lx = x*CELL + CELL*0.5f;
+ ly = y*CELL + CELL*0.5f;
+ for(t=0; t<1024; t++)
+ {
+ nx = (int)(lx+0.5f);
+ ny = (int)(ly+0.5f);
+ if(nx<0 || nx>=XRES || ny<0 || ny>=YRES)
+ break;
+ addpixel(vid, nx, ny, 255, 255, 255, 64);
+ i = nx/CELL;
+ j = ny/CELL;
+ lx += vx[j][i]*0.125f;
+ ly += vy[j][i]*0.125f;
+ if(bmap[j][i]==5 && i!=x && j!=y)
+ break;
+ }
+ drawtext(vid, x*CELL, y*CELL-2, "\x8D", 255, 255, 255, 128);
+ }
+
+}
+
+void clear_area(int area_x, int area_y, int area_w, int area_h)
+{
+ int cx = 0;
+ int cy = 0;
+ for(cy=0; cy<area_h; cy++)
+ {
+ for(cx=0; cx<area_w; cx++)
+ {
+ bmap[(cy+area_y)/CELL][(cx+area_x)/CELL] = 0;
+ delete_part(cx+area_x, cy+area_y);
+ }
+ }
+}
+
+void create_box(int x1, int y1, int x2, int y2, int c)
+{
+ int i, j;
+ if(x1>x2)
+ {
+ i = x2;
+ x2 = x1;
+ x1 = i;
+ }
+ if(y1>y2)
+ {
+ j = y2;
+ y2 = y1;
+ y1 = j;
+ }
+ for(j=y1; j<=y2; j++)
+ for(i=x1; i<=x2; i++)
+ create_parts(i, j, 1, c);
+}
+
+int flood_parts(int x, int y, int c, int cm, int bm)
+{
+ int x1, x2, dy = (c<PT_NUM)?1:CELL;
+ int co = c;
+ if(c>=122&&c<=122+UI_WALLCOUNT)
+ {
+ c = c-100;
+ }
+ if(cm==-1)
+ {
+ if(c==0)
+ {
+ cm = pmap[y][x]&0xFF;
+ if(!cm)
+ return 0;
+ }
+ else
+ cm = 0;
+ }
+ if(bm==-1)
+ {
+ if(c==30)
+ {
+ bm = bmap[y/CELL][x/CELL];
+ if(!bm)
+ return 0;
+ if(bm==1)
+ cm = 0xFF;
+ }
+ else
+ bm = 0;
+ }
+
+ if((pmap[y][x]&0xFF)!=cm || bmap[y/CELL][x/CELL]!=bm)
+ return 1;
+
+ // go left as far as possible
+ x1 = x2 = x;
+ while(x1>=CELL)
+ {
+ if((pmap[y][x1-1]&0xFF)!=cm || bmap[y/CELL][(x1-1)/CELL]!=bm)
+ break;
+ x1--;
+ }
+ while(x2<XRES-CELL)
+ {
+ if((pmap[y][x2+1]&0xFF)!=cm || bmap[y/CELL][(x2+1)/CELL]!=bm)
+ break;
+ x2++;
+ }
+
+ // fill span
+ for(x=x1; x<=x2; x++)
+ if(!create_parts(x, y, 0, co))
+ return 0;
+
+ // fill children
+ if(y>=CELL+dy)
+ for(x=x1; x<=x2; x++)
+ if((pmap[y-dy][x]&0xFF)==cm && bmap[(y-dy)/CELL][x/CELL]==bm)
+ if(!flood_parts(x, y-dy, co, cm, bm))
+ return 0;
+ if(y<YRES-CELL-dy)
+ for(x=x1; x<=x2; x++)
+ if((pmap[y+dy][x]&0xFF)==cm && bmap[(y+dy)/CELL][x/CELL]==bm)
+ if(!flood_parts(x, y+dy, co, cm, bm))
+ return 0;
+ return 1;
+}
+
+int create_parts(int x, int y, int r, int c)
+{
+ int i, j, f = 0, u, v, oy, ox, b = 0, dw = 0; //n;
+
+ if(c == 125)
+ {
+ i = x / CELL;
+ j = y / CELL;
+ for(v=-1; v<2; v++)
+ for(u=-1; u<2; u++)
+ if(i+u>=0 && i+u<XRES/CELL &&
+ j+v>=0 && j+v<YRES/CELL &&
+ bmap[j+v][i+u] == 5)
+ return 1;
+ bmap[j][i] = 5;
+ return 1;
+ }
+ //LOLOLOLOLLOLOLOLO
+ if(c == 127)
+ {
+ b = 4;
+ dw = 1;
+ }
+ if(c == 122)
+ {
+ b = 8;
+ dw = 1;
+ }
+ if(c == 123)
+ {
+ b = 7;
+ dw = 1;
+ }
+ if(c == 124)
+ {
+ b = 6;
+ dw = 1;
+ }
+ if(c == 128)
+ {
+ b = 3;
+ dw = 1;
+ }
+ if(c == 129)
+ {
+ b = 2;
+ dw = 1;
+ }
+ if(c == 130)
+ {
+ b = 0;
+ dw = 1;
+ }
+ if(c == 131)
+ {
+ b = 1;
+ dw = 1;
+ }
+ if(c == 132)
+ {
+ b = 9;
+ dw = 1;
+ }
+ if(c == 133)
+ {
+ b = 10;
+ dw = 1;
+ }
+ if(c == 134)
+ {
+ b = 11;
+ dw = 1;
+ }
+ if(c == 135)
+ {
+ b = 12;
+ dw = 1;
+ }
+ if(c == 140)
+ {
+ b = 13;
+ dw = 1;
+ }
+ if(c == 255)
+ {
+ b = 255;
+ dw = 1;
+ }
+ if(dw==1)
+ {
+ r = r/CELL;
+ x = x/CELL;
+ y = y/CELL;
+ x -= r/2;
+ y -= r/2;
+ for (ox=x; ox<=x+r; ox++)
+ {
+ for (oy=y; oy<=y+r; oy++)
+ {
+ if(ox>=0&&ox<XRES/CELL&&oy>=0&&oy<YRES/CELL)
+ {
+ i = ox;
+ j = oy;
+ if(b==4)
+ {
+ fvx[j][i] = 0.0f;
+ fvy[j][i] = 0.0f;
+ }
+ bmap[j][i] = b;
+ }
+ }
+ }
+ return 1;
+ }
+ if(c == SPC_AIR || c == SPC_HEAT || c == SPC_COOL || c == SPC_VACUUM)
+ {
+ for(j=-r; j<=r; j++)
+ for(i=-r; i<=r; i++)
+ if(i*i+j*j<=r*r)
+ create_part(-1, x+i, y+j, c);
+ return 1;
+ }
+
+ if(c == 0)
+ {
+ for(j=-r; j<=r; j++)
+ for(i=-r; i<=r; i++)
+ if(i*i+j*j<=r*r)
+ delete_part(x+i, y+j);
+ return 1;
+ }
+
+ for(j=-r; j<=r; j++)
+ for(i=-r; i<=r; i++)
+ if(i*i+j*j<=r*r)
+ if(create_part(-1, x+i, y+j, c)==-1)
+ f = 1;
+ return !f;
+}
+
+void create_line(int x1, int y1, int x2, int y2, int r, int c)
+{
+ int cp=abs(y2-y1)>abs(x2-x1), x, y, dx, dy, sy;
+ float e, de;
+ if(cp)
+ {
+ y = x1;
+ x1 = y1;
+ y1 = y;
+ y = x2;
+ x2 = y2;
+ y2 = y;
+ }
+ if(x1 > x2)
+ {
+ y = x1;
+ x1 = x2;
+ x2 = y;
+ y = y1;
+ y1 = y2;
+ y2 = y;
+ }
+ dx = x2 - x1;
+ dy = abs(y2 - y1);
+ e = 0.0f;
+ if(dx)
+ de = dy/(float)dx;
+ else
+ de = 0.0f;
+ y = y1;
+ sy = (y1<y2) ? 1 : -1;
+ for(x=x1; x<=x2; x++)
+ {
+ if(cp)
+ create_parts(y, x, r, c);
+ else
+ create_parts(x, y, r, c);
+ e += de;
+ if(e >= 0.5f)
+ {
+ y += sy;
+ if(c==135 || c==140 || c==134 || c==133 || c==132 || c==131 || c==129 || c==128 || c==127 || c==125 || c==124 || c==123 || c==122 || !r)
+ {
+ if(cp)
+ create_parts(y, x, r, c);
+ else
+ create_parts(x, y, r, c);
+ }
+ e -= 1.0f;
+ }
+ }
+}
diff --git a/src/update.c b/src/update.c
new file mode 100644
index 0000000..99b9d1b
--- /dev/null
+++ b/src/update.c
@@ -0,0 +1,201 @@
+/**
+ * Powder Toy - Update Helper
+ *
+ * Copyright (c) 2008 - 2010 Stanislaw Skowronek.
+ * Copyright (c) 2010 Simon Robertshaw
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02111-1301 USA
+ */
+
+#include <stdio.h>
+#ifndef MACOSX
+#include <malloc.h>
+#endif
+#include <string.h>
+
+#ifdef WIN32
+#include <windows.h>
+#else
+#include <unistd.h>
+#include <sys/stat.h>
+#endif
+#ifdef MACOSX
+#include <mach-o/dyld.h>
+#include <errno.h>
+#include <sys/param.h>
+#endif
+
+#include <update.h>
+
+static char *exe_name(void)
+{
+#if defined WIN32
+ char *name= (char *)malloc(64), max=64, res;
+ while((res = (char)GetModuleFileName(NULL, name, max)) >= max)
+ {
+#elif defined MACOSX
+ char *fn=malloc(64),*name=malloc(PATH_MAX), max=64, res;
+ if(_NSGetExecutablePath(fn, &max) != 0)
+ {
+ fn = realloc(fn, max);
+ _NSGetExecutablePath(fn, &max);
+ }
+ if(realpath(fn, name) == NULL)
+ {
+ free(fn);
+ free(name);
+ return NULL;
+ }
+ res = 1;
+#else
+ char fn[64], *name=malloc(64), max=64, res;
+ sprintf(fn, "/proc/self/exe");
+ memset(name, 0, max);
+ while((res = readlink(fn, name, max)) >= max-1)
+ {
+#endif
+#ifndef MACOSX
+ max *= 2;
+ name = realloc(name, max);
+ memset(name, 0, max);
+ }
+#endif
+ if(res <= 0)
+ {
+ free(name);
+ return NULL;
+ }
+ return name;
+}
+
+int update_start(char *data, int len)
+{
+ char *self=exe_name(), *temp;
+#ifdef WIN32
+ char *p;
+#endif
+ FILE *f;
+ int res = 1;
+
+ if(!self)
+ return 1;
+
+#ifdef WIN32
+ temp = malloc(strlen(self)+12);
+ strcpy(temp, self);
+ p = temp + strlen(temp) - 4;
+ if(_stricmp(p, ".exe"))
+ p += 4;
+ strcpy(p, "_update.exe");
+
+ if(!MoveFile(self, temp))
+ goto fail;
+
+ f = fopen(self, "wb");
+ if(!f)
+ goto fail;
+ if(fwrite(data, 1, len, f) != len)
+ {
+ fclose(f);
+ DeleteFile(self);
+ goto fail;
+ }
+ fclose(f);
+
+ if((int)ShellExecute(NULL, "open", self, NULL, NULL, SW_SHOWNORMAL) <= 32)
+ {
+ DeleteFile(self);
+ goto fail;
+ }
+
+ return 0;
+#else
+ temp = malloc(strlen(self)+8);
+ strcpy(temp, self);
+ strcat(temp, "-update");
+
+ f = fopen(temp, "w");
+ if(!f)
+ goto fail;
+ if(fwrite(data, 1, len, f) != len)
+ {
+ fclose(f);
+ unlink(temp);
+ goto fail;
+ }
+ fclose(f);
+
+ if(chmod(temp, 0755))
+ {
+ unlink(temp);
+ goto fail;
+ }
+
+ if(rename(temp, self))
+ {
+ unlink(temp);
+ goto fail;
+ }
+
+ execl(self, "powder-update", NULL);
+#endif
+
+fail:
+ free(temp);
+ free(self);
+ return res;
+}
+
+int update_finish(void)
+{
+#ifdef WIN32
+ char *temp, *self=exe_name(), *p;
+ int timeout = 60, err;
+
+ temp = malloc(strlen(self)+12);
+ strcpy(temp, self);
+ p = temp + strlen(temp) - 4;
+ if(_stricmp(p, ".exe"))
+ p += 4;
+ strcpy(p, "_update.exe");
+
+ while(!DeleteFile(temp))
+ {
+ err = GetLastError();
+ if(err == ERROR_FILE_NOT_FOUND)
+ {
+ // just as well, then
+ free(temp);
+ return 0;
+ }
+ Sleep(500);
+ timeout--;
+ if(timeout <= 0)
+ {
+ free(temp);
+ return 1;
+ }
+ }
+ free(temp);
+#endif
+ return 0;
+}
+
+void update_cleanup(void)
+{
+#ifdef WIN32
+ update_finish();
+#endif
+}