Changes

Jump to navigation Jump to search
No change in size ,  22:11, 28 December 2009
no edit summary
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]]
  
104

edits

Navigation menu