Апликация с битмапами

Помогите написать скрипт, который склеивает 2 битмапа в один (пример см. на картинках)
Заранее за помощь спасибо

Более понятный вариант примеров (с белым фоном неудачно получилось)

Сделай новый битмап нужной ширины и наложи свои функцией pasteBitmap

Для чего это ? в общем макс скрипт не предназначен для пост обработки, это задача уже другого софта.

Че-то я не нашел функцию pasteBitmap...
Может имелась ввиду функция copy?

Впрочем можно сделать такой скрипт влоб, перебирая изображения построчно.
Так например:

dir = sysInfo.currentdir
bmp1 = openBitMap (dir + "\bmp1.bmp"😉
bmp2 = openBitMap (dir + "\bmp2.bmp"😉
bmp3 = bitmap (bmp1.width+bmp2.width) bmp1.height filename🙁dir + "\bmp3.bmp"😉
for y=1 to bmp1.height do (
bmp3_line = getPixels bmp1 [0,y-1] bmp1.width
bmp2_line = getPixels bmp2 [0,y-1] bmp2.width
join bmp3_line bmp2_line
setPixels bmp3 [0,y-1] bmp3_line
) -- end for
save bmp3
close bmp1
close bmp2
close bmp3

p.s. Скрипт не проверяет соответствие размеров битмапов.

Denis OmelchenkoЧе-то я не нашел функцию pasteBitmap...
Может имелась ввиду функция copy?

Значит у тебя макс еще младше чем 2008, в этом случае ставим AVG.

Ага, смотрел в справке 7-ого)
в 2008 нашел...

Я уже пытался тож через цикл по пикселю, а нет ли чего-нить попроще? картинки с большим разрешением кушают много времени🙂