You know Sprite Sheet Packer??

Sprite Sheet Packer is a fully featured tool for combining multiple individual images into a single, efficiently laid out image.

SpriteSheetPacker2LiteC from GSTools creates a script out of the map file generated by the packer.

It's my first attempt with VB.Net.
Needs still some testing. Download

Code:
BMAP* grain1;
BMAP* grain2;
BMAP* grain3;
BMAP* grain4;
function GSTBmap_Extract(){
   BMAP* bmpTemp = "grain.png";
   grain1 = bmap_createblack(512, 512, 32); // create an empty bmap
   bmap_blitpart(grain1, bmpTemp, vector(0,0,0), vector(512,512,0), vector(0,0,0),vector(512,512,0));
   grain2 = bmap_createblack(512, 512, 32); // create an empty bmap
   bmap_blitpart(grain2, bmpTemp, vector(0,0,0), vector(512,512,0), vector(513,0,0),vector(512,512,0));
   grain3 = bmap_createblack(512, 512, 32); // create an empty bmap
   bmap_blitpart(grain3, bmpTemp, vector(0,0,0), vector(512,512,0), vector(1026,0,0),vector(512,512,0));
   grain4 = bmap_createblack(512, 512, 32); // create an empty bmap
   bmap_blitpart(grain4, bmpTemp, vector(0,0,0), vector(512,512,0), vector(0,513,0),vector(512,512,0));
   bmap_purge(bmpTemp);
}


Andreas
GSTools - Home of
GSTScript 0.9.8: lua scripting for A6/7/8
GSTNet 0.7.9.20: network plugin for A6/7/8
GSTsqlite 1.3.7: sql database plugin for A6/7/8
3DGS Codebase: 57 snippets || 3DGS Downloads: 248 files