I was just wondering if there's any way to do a 'get image' command and take pixels from outside the screen. Im making a long row of images that will be saved to a bitmap, but there's always an error if the get image is out of the screen. Does anyone know if there's an easy way to get around this. Basically i just want to join all the images together and use it as a matrix texture set.
Here's the code:
sync on
textures=4
dim p(textures)
p(1)=RGB(152,114,63)
p(2)=RGB(31,216,27)
p(3)=RGB(19,129,16)
p(4)=RGB(186,128,20)
if file exist("Reference.txt")=1 then delete file "Reference.txt"
open to write 1,"Reference.txt"
write string 1,"Texture types = "+str$(textures)
write string 1,"All transitions = "+str$(textures^4)
dim reference(textures,textures,textures,textures)
for p1=1 to textures
for p2=1 to textures
for p3=1 to textures
for p4=1 to textures
inc refnum
addx=refnum*64-64
ink p(p1),0
box 1+addx,0,31+addx,31
ink p(p2),0
box 1+addx,32,31+addx,64
ink p(p3),0
box 32+addx,32,63+addx,64
ink p(p4),0
box 32+addx,0,63+addx,31
reference(p1,p2,p3,p4)=refnum
write string 1,str$(p1)+":"+str$(p2)+":"+str$(p3)+":"+str$(p4)+" = "+str$(reference(p1,p2,p3,p4))
sync
next p4
next p3
next p2
next p1
close file 1
ink rgb(255,255,255),0
text 0,128,"All transitions = "+str$(refnum)
sync
wait 200
get image 1,0,0,addx+64,2
if file exist("Textures.bmp")=1 then delete file "Textures.bmp"
save image "Textures.bmp",1
.........what's the point of reading this?
