Wouldnt be hard wo write your own
this is out of my head but should point you in the right place:
this is out of my head but should point you in the right place:
tilesize=50 created=createimage(tilesize*10,tilesize*10) row =1 column =1 repeat loaded=loadimage (could get filenames data file or simple 'data' statements) if loaded copyrect 0,0,tilesize,tilesize,tilesize*column,tilesize*row,imagebuffer(loaded),imagebuffer(created) column=column+1 if column no=10 then column no=0:row=row+1 endif freeimage loaded until nomoreimages savebuffer "out.bmp",imagebuffer(created)