#include
int update_GBOB(UPDATE_FUNC_ARGS) {
int r,rx,ry;
for (rx=-2; rx<3; rx++)
for (ry=-2; ry<3; ry++)
if (x+rx>=0 && y+ry>0 && x+rx<XRES && y+ry<YRES && (rx || ry))
{
r = pmap[y+ry][x+rx];
if ((r>>8)>=NPART || !r)
continue;
if ((r&0xFF)!=PT_GBOB)
{
pv[x/CELL][y/CELL]+=1.5;
parts[i].type=PT_HSLF;
}
}
return 0;
}
&update_GBOB
to the end of the GBOB line in the ptypes array (in powder.h). pv[y/CELL][x/CELL]
. part_change_type(i, x, y, PT_HSLF);
to change a particle's type.