surface.dat

《3D图形编程指南》一书的原码

type pixel byte
type cell { int pixel pixel int int int int int int ptr }
type surface { ptr int int int ptr ptr ptr}
type light {int [4]int int int int}
type application { ptr int ptr }

var int opt 0x2
var pixel colour 0xe0
var ptr texture data/rgb8/buble.pic

var [30][120]int vertices
[
 [ 0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  0 0 0 0  ]
 [ 233 0 0 0  154 0 0 0  -28 0 0 0  -192 0 0 0  -226 0 0 0  -106 0 0 0  85 0 0 0  219 0 0 0  205 0 0 0  52 0 0 0  -135 0 0 0  -232 0 0 0  -171 0 0 0  4 0 0 0  178 0 0 0  231 0 0 0  127 0 0 0  -62 0 0 0  -210 0 0 0  -215 0 0 0  -75 0 0 0  115 0 0 0  228 0 0 0  187 0 0 0  18 0 0 0  -162 0 0 0  -233 0 0 0  -147 0 0 0  38 0 0 0  198 0 0 0  ]
 [ 293 0 0 0  193 0 0 0  -36 0 0 0  -242 0 0 0  -284 0 0 0  -134 0 0 0  106 0 0 0  275 0 0 0  257 0 0 0  65 0 0 0  -170 0 0 0  -291 0 0 0  -215 0 0 0  6 0 0 0  223 0 0 0  290 0 0 0  160 0 0 0  -78 0 0 0  -263 0 0 0  -270 0 0 0  -94 0 0 0  145 0 0 0  286 0 0 0  234 0 0 0  23 0 0 0  -203 0 0 0  -292 0 0 0  -184 0 0 0  48 0 0 0  248 0 0 0  ]
 [ 133 0 0 0  88 0 0 0  -16 0 0 0  -110 0 0 0  -129 0 0 0  -61 0 0 0  48 0 0 0  125 0 0 0  117 0 0 0  30 0 0 0  -77 0 0 0  -133 0 0 0  -98 0 0 0  2 0 0 0  102 0 0 0  132 0 0 0  73 0 0 0  -35 0 0 0  -120 0 0 0  -123 0 0 0  -43 0 0 0  66 0 0 0  131 0 0 0  107 0 0 0  10 0 0 0  -92 0 0 0  -133 0 0 0  -84 0 0 0  22 0 0 0  113 0 0 0  ]
 [ -125 0 0 0  -82 0 0 0  15 0 0 0  103 0 0 0  121 0 0 0  57 0 0 0  -45 0 0 0  -117 0 0 0  -109 0 0 0  -28 0 0 0  72 0 0 0  124 0 0 0  91 0 0 0  -2 0 0 0  -95 0 0 0  -123 0 0 0  -68 0 0 0  33 0 0 0  112 0 0 0  115 0 0 0  40 0 0 0  -61 0 0 0  -122 0 0 0  -100 0 0 0  -10 0 0 0  86 0 0 0  124 0 0 0  78 0 0 0  -20 0 0 0  -106 0 0 0  ]
 [ -290 0 0 0  -192 0 0 0  36 0 0 0  240 0 0 0  281 0 0 0  133 0 0 0  -105 0 0 0  -273 0 0 0  -255 0 0 0  -65 0 0 0  169 0 0 0  289 0 0 0  213 0 0 0  -6 0 0 0  -222 0 0 0  -287 0 0 0  -158 0 0 0  77 0 0 0  261 0 0 0  268 0 0 0  94 0 0 0  -143 0 0 0  -284 0 0 0  -232 0 0 0  -23 0 0 0  201 0 0 0  290 0 0 0  182 0 0 0  -48 0 0 0  -246 0 0 0  ]
 [ -239 0 0 0  -158 0 0 0  29 0 0 0  197 0 0 0  232 0 0 0  109 0 0 0  -87 0 0 0  -225 0 0 0  -210 0 0 0  -53 0 0 0  139 0 0 0  238 0 0 0  176 0 0 0  -5 0 0 0  -183 0 0 0  -237 0 0 0  -130 0 0 0  63 0 0 0  215 0 0 0  221 0 0 0  77 0 0 0  -118 0 0 0  -234 0 0 0  -192 0 0 0  -19 0 0 0  166 0 0 0  239 0 0 0  150 0 0 0  -39 0 0 0  -203 0 0 0  ]
 [ -9 0 0 0  -6 0 0 0  1 0 0 0  8 0 0 0  9 0 0 0  4 0 0 0  -3 0 0 0  -9 0 0 0  -8 0 0 0  -2 0 0 0  5 0 0 0  9 0 0 0  7 0 0 0  0 0 0 0  -7 0 0 0  -9 0 0 0  -5 0 0 0  2 0 0 0  8 0 0 0  9 0 0 0  3 0 0 0  -4 0 0 0  -9 0 0 0  -7 0 0 0  0 0 0 0  6 0 0 0  9 0 0 0  6 0 0 0  -1 0 0 0  -8 0 0 0  ]
 [ 227 0 0 0  150 0 0 0  -28 0 0 0  -187 0 0 0  -220 0 0 0  -103 0 0 0  82 0 0 0  213 0 0 0  199 0 0 0  51 0 0 0  -132 0 0 0  -226 0 0 0  -167 0 0 0  4 0 0 0  173 0 0 0  224 0 0 0  124 0 0 0  -60 0 0 0  -204 0 0 0  -209 0 0 0  -73 0 0 0  112 0 0 0  222 0 0 0  182 0 0 0  18 0 0 0  -157 0 0 0  -227 0 0 0  -143 0 0 0  37 0 0 0  192 0 0 0  ]
 [ 295 0 0 0  195 0 0 0  -36 0 0 0  -243 0 0 0  -286 0 0 0  -134 0 0 0  107 0 0 0  277 0 0 0  259 0 0 0  66 0 0 0  -171 0 0 0  -293 0 0 0  -216 0 0 0  6 0 0 0  225 0 0 0  291 0 0 0  161 0 0 0  -78 0 0 0  -265 0 0 0  -272 0 0 0  -95 0 0 0  146 0 0 0  288 0 0 0  236 0 0 0  23 0 0 0  -204 0 0 0  -294 0 0 0  -185 0 0 0  49 0 0 0  250 0 0 0  ]