Line 8:
Line 8:
<source lang="">Dim $ImageOutput[4072]
<source lang="">Dim $ImageOutput[4072]
for $x=0 to 46 step 1
for $x=0 to 46 step 1
−
{
for $y=0 to 7 step 1
for $y=0 to 7 step 1
−
{
for $z=0 To 7 Step 1
for $z=0 To 7 Step 1
−
{
ImageOutput[($x*64)+(16*$y)+(4*$z)] = RawImage[($x*64)+(32*$z)+(4*$y)]
ImageOutput[($x*64)+(16*$y)+(4*$z)] = RawImage[($x*64)+(32*$z)+(4*$y)]
ImageOutput[($x*64)+(16*$y)+(4*$z)+1] = RawImage[($x*64)+(32*$z)+(4*$y)+1]
ImageOutput[($x*64)+(16*$y)+(4*$z)+1] = RawImage[($x*64)+(32*$z)+(4*$y)+1]
ImageOutput[($x*64)+(16*$y)+(4*$z)+2] = RawImage[($x*64)+(32*$z)+(4*$y)+2]
ImageOutput[($x*64)+(16*$y)+(4*$z)+2] = RawImage[($x*64)+(32*$z)+(4*$y)+2]
ImageOutput[($x*64)+(16*$y)+(4*$z)+3] = RawImage[($x*64)+(32*$z)+(4*$y)+3]
ImageOutput[($x*64)+(16*$y)+(4*$z)+3] = RawImage[($x*64)+(32*$z)+(4*$y)+3]
−
}
+
Next
−
}
+
Next
−
}</source>
+
Next</source>
Output: [[Image:Test2.png]]
Output: [[Image:Test2.png]]