int i, j, k, l, m;

// вместо этого блока loadimage
// создание большой картинки 77*48, с 6 маленькими 19*19, между картинками расстояние 10 px
int image[77][48];
for(i=0;i<77;i++)
{
for(j=0;j<48;j++)
{
image[i][j]=16777164;
}
}
for(i=0;i<19;i++)
{
for(j=0;j<19;j++)
{
image[i][j]=3401712; image[i+29][j]=255; image[i+58][j]=7065132;
image[i][j+29]=16756239; image[i+29][j+29]=1997041; image[i+58][j+29]=12065654;
}
}
///////////////////////////////////////

// пишем 6 маленьких картинок 19*19 в 3х-мерный массив
int arr[6][19][19]; // количество картинок и их размер x*y
int stepX=29, stepY=29; // шаг между картинками
int sizeX=19, sizeY=19; // размер картинок
int countX=3, countY=2; // количество картинок по X и Y в большой картинке

i=0; // номер картинки в массиве arr
for(j=0;j<countX;j++)
{
for(k=0;k<countY;k++)
{
for(l=0;l<sizeX;l++)
{
for(m=0;m<sizeY;m++)
{
arr[i][l][m]=image[l+j*stepX][m+k*stepY];
}
}
i++;
}
}

// вывод
int posX=800, posY=500;
visualwindow(0, 0, 0, 77, 48, posX, posY, 100, #image[0][0]);
visualwindow(1, 0, 0, 19, 19, posX-100, posY+100, 100, #arr[0][0][0]);
visualwindow(2, 0, 0, 19, 19, posX-50, posY+100, 100, #arr[1][0][0]);
visualwindow(3, 0, 0, 19, 19, posX, posY+100, 100, #arr[2][0][0]);
visualwindow(4, 0, 0, 19, 19, posX+50, posY+100, 100, #arr[3][0][0]);
visualwindow(5, 0, 0, 19, 19, posX+100, posY+100, 100, #arr[4][0][0]);
visualwindow(6, 0, 0, 19, 19, posX+150, posY+100, 100, #arr[5][0][0]);

loop()sleep(100);

int i, j, k, l, m;
int count_image=90; // всего маленьких картинок

int image[539][512];
loadimage(#image[0][0], "C:\Program Files (x86)\Kibor\1111.bmp"); // загружаем картинку

int arr[90][19][19]; // количество картинок и их размер x*y
int stepX=130, stepY=29; // шаг между картинками
int sizeX=19, sizeY=19; // размер картинок
int countX=5, countY=18; // количество картинок по X и Y в большой картинке

i=0;
for(j=0;j<countX;j++)
{
for(k=0;k<countY;k++)
{
for(l=0;l<sizeX;l++)
{
for(m=0;m<sizeY;m++)
{
arr[i][l][m]=image[l+j*stepX][m+k*stepY];
}
}
i++;
}
}

for(i=0;i<count_image;i++) // сохраняем все картинки в папке temp с именами 1.bmp, 2.bmp ...
{
saveimage (#arr[i][0][0], tempfolder()+format(i)+".bmp");
}

start(tempfolder()); // папка с сохранёнными картинками