www.pudn.com > 3dgprsrc.rar > BICUBIC.DAT

type pixel int 
type bicubic {int pixel int ptr [4][4][4]int ptr ptr} 
type bicubic_object {int int ptr ptr} 
 
var pixel colour 0x007f7f00 
var int texture_size 8 
var ptr texture data/rgb32/mill.pic 
 
var bicubic bicubic_1 
{4 @colour @texture_size @texture 
 [ 
  [[-30 -30 0 0]  [-40 -100 0 0]     [40 -100  0 0]    [30 -30 0 0]] 
  [[-100 -40 0 0] [-550 -550 -950 0] [39 -39 -140 0]   [100 -40 0 0]] 
  [[-100  40 0 0] [-39  39 -140 0]   [550  550 -150 0] [100  40 0 0]] 
  [[-30  30 0 0]  [-40  100 0 0]     [40  100  0 0]    [30  30 0 0]] 
 ] 
 0 0 
} 
var bicubic bicubic_2 
{4 @colour @texture_size @texture 
 [ 
  [[30  -30 0 0] [40 -100 0 0]    [-40 -100  0 0]  [-30 -30 0 0]] 
  [[100 -40 0 0] [550 -550 150 0] [-39 -39  140 0] [-100 -40 0 0]] 
  [[100  40 0 0] [39  39 140 0]   [-550 550 950 0] [-100  40 0 0]] 
  [[30   30 0 0] [40  100 0 0]    [-40  100  0 0]  [-30  30 0 0]] 
 ] 
 0 0 
} 
var [2]ptr bicubics [bicubic_1 bicubic_2] 
var bicubic_object object {2 2 bicubics 0} 
 
export object