?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Import images: add file handler
[blender-addons.git] / render_povray / model_curve_topology.py
blob38061083dacc803019d0a09983a41ee0bd948585
1 # SPDX-FileCopyrightText: 2022 Blender Foundation
2 #
3 # SPDX-License-Identifier: GPL-2.0-or-later
4
5 """Translate to POV the control point compounded geometries like polygon
6
7 meshes or curve based shapes.
8 """
9
10 import bpy
11
12
13 # -------- LOFT, ETC.
14
15
16 def export_curves(file, ob, tab_write):
17 """write all curves based POV primitives to exported file
18
19 Args:
20 file: The POV file being written
21 ob: The current curve object to export from Blender
22 string_strip_hyphen: Function to clean up names
23 tab_write: Function to write to POV file
24 """
25 from .shading import write_object_material_interior
26 from .render import string_strip_hyphen
27
28 # name_orig = "OB" + ob.name # XXX Unused, check instantiation
29 dataname_orig = "DATA" + ob.data.name
30
31 # name = string_strip_hyphen(bpy.path.clean_name(name_orig)) # XXX Unused, check instantiation
32 dataname = string_strip_hyphen(bpy.path.clean_name(dataname_orig))
33
34 # matrix = global_matrix @ ob.matrix_world # XXX Unused, check instantiation
35 bezier_sweep = False
36 if ob.pov.curveshape == "sphere_sweep":
37 # TODO: Check radius ; shorten lines, may use tab_write() ? > fstrings since py 2.9
38 # inlined spheresweep macro, which itself calls Shapes.inc:
39 file.write(' #include "shapes.inc"\n')
40
41 file.write(
42 " #macro Shape_Bezierpoints_Sphere_Sweep(_merge_shape, _resolution, _points_array, _radius_array)\n"
43 )
44 file.write(" //input adjusting and inspection\n")
45 file.write(" #if(_resolution <= 1)\n")
46 file.write(" #local res = 1;\n")
47 file.write(" #else\n")
48 file.write(" #local res = int(_resolution);\n")
49 file.write(" #end\n")
50 file.write(" #if(dimensions(_points_array) != 1 | dimensions(_radius_array) != 1)\n")
51 file.write(' #error ""\n')
52 file.write(
53 " #elseif(div(dimension_size(_points_array,1),4) - dimension_size(_points_array,1)/4 != 0)\n"
54 )
55 file.write(' #error ""\n')
56 file.write(
57 " #elseif(dimension_size(_points_array,1) != dimension_size(_radius_array,1))\n"
58 )
59 file.write(' #error ""\n')
60 file.write(" #else\n")
61 file.write(" #local n_of_seg = div(dimension_size(_points_array,1), 4);\n")
62 file.write(" #local ctrl_pts_array = array[n_of_seg]\n")
63 file.write(" #local ctrl_rs_array = array[n_of_seg]\n")
64 file.write(" #for(i, 0, n_of_seg-1)\n")
65 file.write(
66 " #local ctrl_pts_array[i] = array[4] {_points_array[4*i], _points_array[4*i+1], _points_array[4*i+2], _points_array[4*i+3]}\n"
67 )
68 file.write(
69 " #local ctrl_rs_array[i] = array[4] {abs(_radius_array[4*i]), abs(_radius_array[4*i+1]), abs(_radius_array[4*i+2]), abs(_radius_array[4*i+3])}\n"
70 )
71 file.write(" #end\n")
72 file.write(" #end\n")
73
74 file.write(" //drawing\n")
75 file.write(" #local mockup1 =\n")
76 file.write(" #if(_merge_shape) merge{ #else union{ #end\n")
77 file.write(" #for(i, 0, n_of_seg-1)\n")
78 file.write(" #local has_head = true;\n")
79 file.write(" #if(i = 0)\n")
80 file.write(
81 " #if(vlength(ctrl_pts_array[i][0]-ctrl_pts_array[n_of_seg-1][3]) = 0 & ctrl_rs_array[i][0]-ctrl_rs_array[n_of_seg-1][3] <= 0)\n"
82 )
83 file.write(" #local has_head = false;\n")
84 file.write(" #end\n")
85 file.write(" #else\n")
86 file.write(
87 " #if(vlength(ctrl_pts_array[i][0]-ctrl_pts_array[i-1][3]) = 0 & ctrl_rs_array[i][0]-ctrl_rs_array[i-1][3] <= 0)\n"
88 )
89 file.write(" #local has_head = false;\n")
90 file.write(" #end\n")
91 file.write(" #end\n")
92 file.write(" #if(has_head = true)\n")
93 file.write(" sphere{\n")
94 file.write(" ctrl_pts_array[i][0], ctrl_rs_array[i][0]\n")
95 file.write(" }\n")
96 file.write(" #end\n")
97 file.write(" #local para_t = (1/2)/res;\n")
98 file.write(
99 " #local this_point = ctrl_pts_array[i][0]*pow(1-para_t,3) + ctrl_pts_array[i][1]*3*pow(1-para_t,2)*para_t + ctrl_pts_array[i][2]*3*(1-para_t)*pow(para_t,2) + ctrl_pts_array[i][3]*pow(para_t,3);\n"
100 )
101 file.write(
102 " #local this_radius = ctrl_rs_array[i][0]*pow(1-para_t,3) + ctrl_rs_array[i][1]*3*pow(1-para_t,2)*para_t + ctrl_rs_array[i][2]*3*(1-para_t)*pow(para_t,2) + ctrl_rs_array[i][3]*pow(para_t,3);\n"
103 )
104 file.write(
105 " #if(vlength(this_point-ctrl_pts_array[i][0]) > abs(this_radius-ctrl_rs_array[i][0]))\n"
106 )
107 file.write(" object{\n")
108 file.write(
109 " Connect_Spheres(ctrl_pts_array[i][0], ctrl_rs_array[i][0], this_point, this_radius)\n"
110 )
111 file.write(" }\n")
112 file.write(" #end\n")
113 file.write(" sphere{\n")
114 file.write(" this_point, this_radius\n")
115 file.write(" }\n")
116 file.write(" #for(j, 1, res-1)\n")
117 file.write(" #local last_point = this_point;\n")
118 file.write(" #local last_radius = this_radius;\n")
119 file.write(" #local para_t = (1/2+j)/res;\n")
120 file.write(
121 " #local this_point = ctrl_pts_array[i][0]*pow(1-para_t,3) + ctrl_pts_array[i][1]*3*pow(1-para_t,2)*para_t + ctrl_pts_array[i][2]*3*(1-para_t)*pow(para_t,2) + ctrl_pts_array[i][3]*pow(para_t,3);\n"
122 )
123 file.write(
124 " #local this_radius = ctrl_rs_array[i][0]*pow(1-para_t,3) + ctrl_rs_array[i][1]*3*pow(1-para_t,2)*para_t + ctrl_rs_array[i][2]*3*(1-para_t)*pow(para_t,2) + ctrl_rs_array[i][3]*pow(para_t,3);\n"
125 )
126 file.write(
127 " #if(vlength(this_point-last_point) > abs(this_radius-last_radius))\n"
128 )
129 file.write(" object{\n")
130 file.write(
131 " Connect_Spheres(last_point, last_radius, this_point, this_radius)\n"
132 )
133 file.write(" }\n")
134 file.write(" #end\n")
135 file.write(" sphere{\n")
136 file.write(" this_point, this_radius\n")
137 file.write(" }\n")
138 file.write(" #end\n")
139 file.write(" #local last_point = this_point;\n")
140 file.write(" #local last_radius = this_radius;\n")
141 file.write(" #local this_point = ctrl_pts_array[i][3];\n")
142 file.write(" #local this_radius = ctrl_rs_array[i][3];\n")
143 file.write(
144 " #if(vlength(this_point-last_point) > abs(this_radius-last_radius))\n"
145 )
146 file.write(" object{\n")
147 file.write(
148 " Connect_Spheres(last_point, last_radius, this_point, this_radius)\n"
149 )
150 file.write(" }\n")
151 file.write(" #end\n")
152 file.write(" sphere{\n")
153 file.write(" this_point, this_radius\n")
154 file.write(" }\n")
155 file.write(" #end\n")
156 file.write(" }\n")
157 file.write(" mockup1\n")
158 file.write(" #end\n")
159
160 for spl in ob.data.splines:
161 if spl.type == "BEZIER":
162 bezier_sweep = True
163 if ob.pov.curveshape in ("loft", "birail"):
164 n = 0
165 for spline in ob.data.splines:
166 n += 1
167 tab_write(file, "#declare %s%s=spline {\n" % (dataname, n))
168 tab_write(file, "cubic_spline\n")
169 lp = len(spline.points)
170 delta = 1 / lp
171 d = -delta
172 point = spline.points[lp - 1]
173 x, y, z, w = point.co[:]
174 tab_write(file, "%.6f, <%.6f,%.6f,%.6f>\n" % (d, x, y, z))
175 d += delta
176 for point in spline.points:
177 x, y, z, w = point.co[:]
178 tab_write(file, "%.6f, <%.6f,%.6f,%.6f>\n" % (d, x, y, z))
179 d += delta
180 for i in range(2):
181 point = spline.points[i]
182 x, y, z, w = point.co[:]
183 tab_write(file, "%.6f, <%.6f,%.6f,%.6f>\n" % (d, x, y, z))
184 d += delta
185 tab_write(file, "}\n")
186 if ob.pov.curveshape == "loft":
187 n = len(ob.data.splines)
188 tab_write(file, "#declare %s = array[%s]{\n" % (dataname, (n + 3)))
189 tab_write(file, "spline{%s%s},\n" % (dataname, n))
190 for i in range(n):
191 tab_write(file, "spline{%s%s},\n" % (dataname, (i + 1)))
192 tab_write(file, "spline{%s1},\n" % dataname)
193 tab_write(file, "spline{%s2}\n" % dataname)
194 tab_write(file, "}\n")
195 # Use some of the Meshmaker.inc macro, here inlined
196 file.write("#macro CheckFileName(FileName)\n")
197 file.write(" #local Len=strlen(FileName);\n")
198 file.write(" #if(Len>0)\n")
199 file.write(" #if(file_exists(FileName))\n")
200 file.write(" #if(Len>=4)\n")
201 file.write(" #local Ext=strlwr(substr(FileName,Len-3,4))\n")
202 file.write(
203 ' #if (strcmp(Ext,".obj")=0 | strcmp(Ext,".pcm")=0 | strcmp(Ext,".arr")=0)\n'
204 )
205 file.write(" #local Return=99;\n")
206 file.write(" #else\n")
207 file.write(" #local Return=0;\n")
208 file.write(" #end\n")
209 file.write(" #else\n")
210 file.write(" #local Return=0;\n")
211 file.write(" #end\n")
212 file.write(" #else\n")
213 file.write(" #if(Len>=4)\n")
214 file.write(" #local Ext=strlwr(substr(FileName,Len-3,4))\n")
215 file.write(
216 ' #if (strcmp(Ext,".obj")=0 | strcmp(Ext,".pcm")=0 | strcmp(Ext,".arr")=0)\n'
217 )
218 file.write(' #if (strcmp(Ext,".obj")=0)\n')
219 file.write(" #local Return=2;\n")
220 file.write(" #end\n")
221 file.write(' #if (strcmp(Ext,".pcm")=0)\n')
222 file.write(" #local Return=3;\n")
223 file.write(" #end\n")
224 file.write(' #if (strcmp(Ext,".arr")=0)\n')
225 file.write(" #local Return=4;\n")
226 file.write(" #end\n")
227 file.write(" #else\n")
228 file.write(" #local Return=1;\n")
229 file.write(" #end\n")
230 file.write(" #else\n")
231 file.write(" #local Return=1;\n")
232 file.write(" #end\n")
233 file.write(" #end\n")
234 file.write(" #else\n")
235 file.write(" #local Return=1;\n")
236 file.write(" #end\n")
237 file.write(" (Return)\n")
238 file.write("#end\n")
239
240 file.write("#macro BuildSpline(Arr, SplType)\n")
241 file.write(" #local Ds=dimension_size(Arr,1);\n")
242 file.write(" #local Asc=asc(strupr(SplType));\n")
243 file.write(" #if(Asc!=67 & Asc!=76 & Asc!=81) \n")
244 file.write(" #local Asc=76;\n")
245 file.write(
246 ' #debug "\nWrong spline type defined (C/c/L/l/N/n/Q/q), using default linear_spline\\n"\n'
247 )
248 file.write(" #end\n")
249 file.write(" spline {\n")
250 file.write(" #switch (Asc)\n")
251 file.write(" #case (67) //C cubic_spline\n")
252 file.write(" cubic_spline\n")
253 file.write(" #break\n")
254 file.write(" #case (76) //L linear_spline\n")
255 file.write(" linear_spline\n")
256 file.write(" #break\n")
257 file.write(" #case (78) //N linear_spline\n")
258 file.write(" natural_spline\n")
259 file.write(" #break\n")
260 file.write(" #case (81) //Q Quadratic_spline\n")
261 file.write(" quadratic_spline\n")
262 file.write(" #break\n")
263 file.write(" #end\n")
264 file.write(" #local Add=1/((Ds-2)-1);\n")
265 file.write(" #local J=0-Add;\n")
266 file.write(" #local I=0;\n")
267 file.write(" #while (I<Ds)\n")
268 file.write(" J\n")
269 file.write(" Arr[I]\n")
270 file.write(" #local I=I+1;\n")
271 file.write(" #local J=J+Add;\n")
272 file.write(" #end\n")
273 file.write(" }\n")
274 file.write("#end\n")
275
276 file.write("#macro BuildWriteMesh2(VecArr, NormArr, UVArr, U, V, FileName)\n")
277 # suppressed some file checking from original macro because no more separate files
278 file.write(" #local Write=0;\n")
279 file.write(' #debug concat("\\n\\n Building mesh2: \\n - vertex_vectors\\n")\n')
280 file.write(" #local NumVertices=dimension_size(VecArr,1);\n")
281 file.write(" #switch (Write)\n")
282 file.write(" #case(1)\n")
283 file.write(" #write(\n")
284 file.write(" MeshFile,\n")
285 file.write(' " vertex_vectors {\\n",\n')
286 file.write(' " ", str(NumVertices,0,0),"\\n "\n')
287 file.write(" )\n")
288 file.write(" #break\n")
289 file.write(" #case(2)\n")
290 file.write(" #write(\n")
291 file.write(" MeshFile,\n")
292 file.write(' "# Vertices: ",str(NumVertices,0,0),"\\n"\n')
293 file.write(" )\n")
294 file.write(" #break\n")
295 file.write(" #case(3)\n")
296 file.write(" #write(\n")
297 file.write(" MeshFile,\n")
298 file.write(' str(2*NumVertices,0,0),",\\n"\n')
299 file.write(" )\n")
300 file.write(" #break\n")
301 file.write(" #case(4)\n")
302 file.write(" #write(\n")
303 file.write(" MeshFile,\n")
304 file.write(' "#declare VertexVectors= array[",str(NumVertices,0,0),"] {\\n "\n')
305 file.write(" )\n")
306 file.write(" #break\n")
307 file.write(" #end\n")
308 file.write(" mesh2 {\n")
309 file.write(" vertex_vectors {\n")
310 file.write(" NumVertices\n")
311 file.write(" #local I=0;\n")
312 file.write(" #while (I<NumVertices)\n")
313 file.write(" VecArr[I]\n")
314 file.write(" #switch(Write)\n")
315 file.write(" #case(1)\n")
316 file.write(" #write(MeshFile, VecArr[I])\n")
317 file.write(" #break\n")
318 file.write(" #case(2)\n")
319 file.write(" #write(\n")
320 file.write(" MeshFile,\n")
321 file.write(
322 ' "v ", VecArr[I].x," ", VecArr[I].y," ", VecArr[I].z,"\\n"\n'
323 )
324 file.write(" )\n")
325 file.write(" #break\n")
326 file.write(" #case(3)\n")
327 file.write(" #write(\n")
328 file.write(" MeshFile,\n")
329 file.write(' VecArr[I].x,",", VecArr[I].y,",", VecArr[I].z,",\\n"\n')
330 file.write(" )\n")
331 file.write(" #break\n")
332 file.write(" #case(4)\n")
333 file.write(" #write(MeshFile, VecArr[I])\n")
334 file.write(" #break\n")
335 file.write(" #end\n")
336 file.write(" #local I=I+1;\n")
337 file.write(" #if(Write=1 | Write=4)\n")
338 file.write(" #if(mod(I,3)=0)\n")
339 file.write(' #write(MeshFile,"\\n ")\n')
340 file.write(" #end\n")
341 file.write(" #end \n")
342 file.write(" #end\n")
343 file.write(" #switch(Write)\n")
344 file.write(" #case(1)\n")
345 file.write(' #write(MeshFile,"\\n }\\n")\n')
346 file.write(" #break\n")
347 file.write(" #case(2)\n")
348 file.write(' #write(MeshFile,"\\n")\n')
349 file.write(" #break\n")
350 file.write(" #case(3)\n")
351 file.write(" // do nothing\n")
352 file.write(" #break\n")
353 file.write(" #case(4) \n")
354 file.write(' #write(MeshFile,"\\n}\\n")\n')
355 file.write(" #break\n")
356 file.write(" #end\n")
357 file.write(" }\n")
358
359 file.write(' #debug concat(" - normal_vectors\\n") \n')
360 file.write(" #local NumVertices=dimension_size(NormArr,1);\n")
361 file.write(" #switch(Write)\n")
362 file.write(" #case(1)\n")
363 file.write(" #write(\n")
364 file.write(" MeshFile,\n")
365 file.write(' " normal_vectors {\\n",\n')
366 file.write(' " ", str(NumVertices,0,0),"\\n "\n')
367 file.write(" )\n")
368 file.write(" #break\n")
369 file.write(" #case(2)\n")
370 file.write(" #write(\n")
371 file.write(" MeshFile,\n")
372 file.write(' "# Normals: ",str(NumVertices,0,0),"\\n"\n')
373 file.write(" )\n")
374 file.write(" #break\n")
375 file.write(" #case(3)\n")
376 file.write(" // do nothing\n")
377 file.write(" #break\n")
378 file.write(" #case(4)\n")
379 file.write(" #write(\n")
380 file.write(" MeshFile,\n")
381 file.write(
382 ' "#declare NormalVectors= array[",str(NumVertices,0,0),"] {\\n "\n'
383 )
384 file.write(" )\n")
385 file.write(" #break\n")
386 file.write(" #end\n")
387 file.write(" normal_vectors {\n")
388 file.write(" NumVertices\n")
389 file.write(" #local I=0;\n")
390 file.write(" #while (I<NumVertices)\n")
391 file.write(" NormArr[I]\n")
392 file.write(" #switch(Write)\n")
393 file.write(" #case(1)\n")
394 file.write(" #write(MeshFile NormArr[I])\n")
395 file.write(" #break\n")
396 file.write(" #case(2)\n")
397 file.write(" #write(\n")
398 file.write(" MeshFile,\n")
399 file.write(
400 ' "vn ", NormArr[I].x," ", NormArr[I].y," ", NormArr[I].z,"\\n"\n'
401 )
402 file.write(" )\n")
403 file.write(" #break\n")
404 file.write(" #case(3)\n")
405 file.write(" #write(\n")
406 file.write(" MeshFile,\n")
407 file.write(' NormArr[I].x,",", NormArr[I].y,",", NormArr[I].z,",\\n"\n')
408 file.write(" )\n")
409 file.write(" #break\n")
410 file.write(" #case(4)\n")
411 file.write(" #write(MeshFile NormArr[I])\n")
412 file.write(" #break\n")
413 file.write(" #end\n")
414 file.write(" #local I=I+1;\n")
415 file.write(" #if(Write=1 | Write=4) \n")
416 file.write(" #if(mod(I,3)=0)\n")
417 file.write(' #write(MeshFile,"\\n ")\n')
418 file.write(" #end\n")
419 file.write(" #end\n")
420 file.write(" #end\n")
421 file.write(" #switch(Write)\n")
422 file.write(" #case(1)\n")
423 file.write(' #write(MeshFile,"\\n }\\n")\n')
424 file.write(" #break\n")
425 file.write(" #case(2)\n")
426 file.write(' #write(MeshFile,"\\n")\n')
427 file.write(" #break\n")
428 file.write(" #case(3)\n")
429 file.write(" //do nothing\n")
430 file.write(" #break\n")
431 file.write(" #case(4)\n")
432 file.write(' #write(MeshFile,"\\n}\\n")\n')
433 file.write(" #break\n")
434 file.write(" #end\n")
435 file.write(" }\n")
436
437 file.write(' #debug concat(" - uv_vectors\\n") \n')
438 file.write(" #local NumVertices=dimension_size(UVArr,1);\n")
439 file.write(" #switch(Write)\n")
440 file.write(" #case(1)\n")
441 file.write(" #write(\n")
442 file.write(" MeshFile, \n")
443 file.write(' " uv_vectors {\\n",\n')
444 file.write(' " ", str(NumVertices,0,0),"\\n "\n')
445 file.write(" )\n")
446 file.write(" #break\n")
447 file.write(" #case(2)\n")
448 file.write(" #write(\n")
449 file.write(" MeshFile,\n")
450 file.write(' "# UV-vectors: ",str(NumVertices,0,0),"\\n"\n')
451 file.write(" )\n")
452 file.write(" #break\n")
453 file.write(" #case(3)\n")
454 file.write(" // do nothing, *.pcm does not support uv-vectors\n")
455 file.write(" #break\n")
456 file.write(" #case(4)\n")
457 file.write(" #write(\n")
458 file.write(" MeshFile,\n")
459 file.write(' "#declare UVVectors= array[",str(NumVertices,0,0),"] {\\n "\n')
460 file.write(" )\n")
461 file.write(" #break\n")
462 file.write(" #end\n")
463 file.write(" uv_vectors {\n")
464 file.write(" NumVertices\n")
465 file.write(" #local I=0;\n")
466 file.write(" #while (I<NumVertices)\n")
467 file.write(" UVArr[I]\n")
468 file.write(" #switch(Write)\n")
469 file.write(" #case(1)\n")
470 file.write(" #write(MeshFile UVArr[I])\n")
471 file.write(" #break\n")
472 file.write(" #case(2)\n")
473 file.write(" #write(\n")
474 file.write(" MeshFile,\n")
475 file.write(' "vt ", UVArr[I].u," ", UVArr[I].v,"\\n"\n')
476 file.write(" )\n")
477 file.write(" #break\n")
478 file.write(" #case(3)\n")
479 file.write(" //do nothing\n")
480 file.write(" #break\n")
481 file.write(" #case(4)\n")
482 file.write(" #write(MeshFile UVArr[I])\n")
483 file.write(" #break\n")
484 file.write(" #end\n")
485 file.write(" #local I=I+1; \n")
486 file.write(" #if(Write=1 | Write=4)\n")
487 file.write(" #if(mod(I,3)=0)\n")
488 file.write(' #write(MeshFile,"\\n ")\n')
489 file.write(" #end \n")
490 file.write(" #end\n")
491 file.write(" #end \n")
492 file.write(" #switch(Write)\n")
493 file.write(" #case(1)\n")
494 file.write(' #write(MeshFile,"\\n }\\n")\n')
495 file.write(" #break\n")
496 file.write(" #case(2)\n")
497 file.write(' #write(MeshFile,"\\n")\n')
498 file.write(" #break\n")
499 file.write(" #case(3)\n")
500 file.write(" //do nothing\n")
501 file.write(" #break\n")
502 file.write(" #case(4)\n")
503 file.write(' #write(MeshFile,"\\n}\\n")\n')
504 file.write(" #break\n")
505 file.write(" #end\n")
506 file.write(" }\n")
507 file.write("\n")
508 file.write(' #debug concat(" - face_indices\\n") \n')
509 file.write(" #declare NumFaces=U*V*2;\n")
510 file.write(" #switch(Write)\n")
511 file.write(" #case(1)\n")
512 file.write(" #write(\n")
513 file.write(" MeshFile,\n")
514 file.write(' " face_indices {\\n"\n')
515 file.write(' " ", str(NumFaces,0,0),"\\n "\n')
516 file.write(" )\n")
517 file.write(" #break\n")
518 file.write(" #case(2)\n")
519 file.write(" #write (\n")
520 file.write(" MeshFile,\n")
521 file.write(' "# faces: ",str(NumFaces,0,0),"\\n"\n')
522 file.write(" )\n")
523 file.write(" #break\n")
524 file.write(" #case(3)\n")
525 file.write(" #write (\n")
526 file.write(" MeshFile,\n")
527 file.write(' "0,",str(NumFaces,0,0),",\\n"\n')
528 file.write(" )\n")
529 file.write(" #break\n")
530 file.write(" #case(4)\n")
531 file.write(" #write(\n")
532 file.write(" MeshFile,\n")
533 file.write(' "#declare FaceIndices= array[",str(NumFaces,0,0),"] {\\n "\n')
534 file.write(" )\n")
535 file.write(" #break\n")
536 file.write(" #end\n")
537 file.write(" face_indices {\n")
538 file.write(" NumFaces\n")
539 file.write(" #local I=0;\n")
540 file.write(" #local H=0;\n")
541 file.write(" #local NumVertices=dimension_size(VecArr,1);\n")
542 file.write(" #while (I<V)\n")
543 file.write(" #local J=0;\n")
544 file.write(" #while (J<U)\n")
545 file.write(" #local Ind=(I*U)+I+J;\n")
546 file.write(" <Ind, Ind+1, Ind+U+2>, <Ind, Ind+U+1, Ind+U+2>\n")
547 file.write(" #switch(Write)\n")
548 file.write(" #case(1)\n")
549 file.write(" #write(\n")
550 file.write(" MeshFile,\n")
551 file.write(" <Ind, Ind+1, Ind+U+2>, <Ind, Ind+U+1, Ind+U+2>\n")
552 file.write(" )\n")
553 file.write(" #break\n")
554 file.write(" #case(2)\n")
555 file.write(" #write(\n")
556 file.write(" MeshFile,\n")
557 file.write(
558 ' "f ",Ind+1,"/",Ind+1,"/",Ind+1," ",Ind+1+1,"/",Ind+1+1,"/",Ind+1+1," ",Ind+U+2+1,"/",Ind+U+2+1,"/",Ind+U+2+1,"\\n",\n'
559 )
560 file.write(
561 ' "f ",Ind+U+1+1,"/",Ind+U+1+1,"/",Ind+U+1+1," ",Ind+1,"/",Ind+1,"/",Ind+1," ",Ind+U+2+1,"/",Ind+U+2+1,"/",Ind+U+2+1,"\\n"\n'
562 )
563 file.write(" )\n")
564 file.write(" #break\n")
565 file.write(" #case(3)\n")
566 file.write(" #write(\n")
567 file.write(" MeshFile,\n")
568 file.write(
569 ' Ind,",",Ind+NumVertices,",",Ind+1,",",Ind+1+NumVertices,",",Ind+U+2,",",Ind+U+2+NumVertices,",\\n"\n'
570 )
571 file.write(
572 ' Ind+U+1,",",Ind+U+1+NumVertices,",",Ind,",",Ind+NumVertices,",",Ind+U+2,",",Ind+U+2+NumVertices,",\\n"\n'
573 )
574 file.write(" )\n")
575 file.write(" #break\n")
576 file.write(" #case(4)\n")
577 file.write(" #write(\n")
578 file.write(" MeshFile,\n")
579 file.write(" <Ind, Ind+1, Ind+U+2>, <Ind, Ind+U+1, Ind+U+2>\n")
580 file.write(" )\n")
581 file.write(" #break\n")
582 file.write(" #end\n")
583 file.write(" #local J=J+1;\n")
584 file.write(" #local H=H+1;\n")
585 file.write(" #if(Write=1 | Write=4)\n")
586 file.write(" #if(mod(H,3)=0)\n")
587 file.write(' #write(MeshFile,"\\n ")\n')
588 file.write(" #end \n")
589 file.write(" #end\n")
590 file.write(" #end\n")
591 file.write(" #local I=I+1;\n")
592 file.write(" #end\n")
593 file.write(" }\n")
594 file.write(" #switch(Write)\n")
595 file.write(" #case(1)\n")
596 file.write(' #write(MeshFile, "\\n }\\n}")\n')
597 file.write(" #fclose MeshFile\n")
598 file.write(' #debug concat(" Done writing\\n")\n')
599 file.write(" #break\n")
600 file.write(" #case(2)\n")
601 file.write(" #fclose MeshFile\n")
602 file.write(' #debug concat(" Done writing\\n")\n')
603 file.write(" #break\n")
604 file.write(" #case(3)\n")
605 file.write(" #fclose MeshFile\n")
606 file.write(' #debug concat(" Done writing\\n")\n')
607 file.write(" #break\n")
608 file.write(" #case(4)\n")
609 file.write(' #write(MeshFile, "\\n}\\n}")\n')
610 file.write(" #fclose MeshFile\n")
611 file.write(' #debug concat(" Done writing\\n")\n')
612 file.write(" #break\n")
613 file.write(" #end\n")
614 file.write(" }\n")
615 file.write("#end\n")
616
617 file.write("#macro MSM(SplineArray, SplRes, Interp_type, InterpRes, FileName)\n")
618 file.write(" #declare Build=CheckFileName(FileName);\n")
619 file.write(" #if(Build=0)\n")
620 file.write(' #debug concat("\\n Parsing mesh2 from file: ", FileName, "\\n")\n')
621 file.write(" #include FileName\n")
622 file.write(" object{Surface}\n")
623 file.write(" #else\n")
624 file.write(" #local NumVertices=(SplRes+1)*(InterpRes+1);\n")
625 file.write(" #local NumFaces=SplRes*InterpRes*2;\n")
626 file.write(
627 ' #debug concat("\\n Calculating ",str(NumVertices,0,0)," vertices for ", str(NumFaces,0,0)," triangles\\n\\n")\n'
628 )
629 file.write(" #local VecArr=array[NumVertices]\n")
630 file.write(" #local NormArr=array[NumVertices]\n")
631 file.write(" #local UVArr=array[NumVertices]\n")
632 file.write(" #local N=dimension_size(SplineArray,1);\n")
633 file.write(" #local TempSplArr0=array[N];\n")
634 file.write(" #local TempSplArr1=array[N];\n")
635 file.write(" #local TempSplArr2=array[N];\n")
636 file.write(" #local PosStep=1/SplRes;\n")
637 file.write(" #local InterpStep=1/InterpRes;\n")
638 file.write(" #local Count=0;\n")
639 file.write(" #local Pos=0;\n")
640 file.write(" #while(Pos<=1)\n")
641 file.write(" #local I=0;\n")
642 file.write(" #if (Pos=0)\n")
643 file.write(" #while (I<N)\n")
644 file.write(" #local Spl=spline{SplineArray[I]}\n")
645 file.write(" #local TempSplArr0[I]=<0,0,0>+Spl(Pos);\n")
646 file.write(" #local TempSplArr1[I]=<0,0,0>+Spl(Pos+PosStep);\n")
647 file.write(" #local TempSplArr2[I]=<0,0,0>+Spl(Pos-PosStep);\n")
648 file.write(" #local I=I+1;\n")
649 file.write(" #end\n")
650 file.write(" #local S0=BuildSpline(TempSplArr0, Interp_type)\n")
651 file.write(" #local S1=BuildSpline(TempSplArr1, Interp_type)\n")
652 file.write(" #local S2=BuildSpline(TempSplArr2, Interp_type)\n")
653 file.write(" #else\n")
654 file.write(" #while (I<N)\n")
655 file.write(" #local Spl=spline{SplineArray[I]}\n")
656 file.write(" #local TempSplArr1[I]=<0,0,0>+Spl(Pos+PosStep);\n")
657 file.write(" #local I=I+1;\n")
658 file.write(" #end\n")
659 file.write(" #local S1=BuildSpline(TempSplArr1, Interp_type)\n")
660 file.write(" #end\n")
661 file.write(" #local J=0;\n")
662 file.write(" #while (J<=1)\n")
663 file.write(" #local P0=<0,0,0>+S0(J);\n")
664 file.write(" #local P1=<0,0,0>+S1(J);\n")
665 file.write(" #local P2=<0,0,0>+S2(J);\n")
666 file.write(" #local P3=<0,0,0>+S0(J+InterpStep);\n")
667 file.write(" #local P4=<0,0,0>+S0(J-InterpStep);\n")
668 file.write(" #local B1=P4-P0;\n")
669 file.write(" #local B2=P2-P0;\n")
670 file.write(" #local B3=P3-P0;\n")
671 file.write(" #local B4=P1-P0;\n")
672 file.write(" #local N1=vcross(B1,B2);\n")
673 file.write(" #local N2=vcross(B2,B3);\n")
674 file.write(" #local N3=vcross(B3,B4);\n")
675 file.write(" #local N4=vcross(B4,B1);\n")
676 file.write(" #local Norm=vnormalize((N1+N2+N3+N4));\n")
677 file.write(" #local VecArr[Count]=P0;\n")
678 file.write(" #local NormArr[Count]=Norm;\n")
679 file.write(" #local UVArr[Count]=<J,Pos>;\n")
680 file.write(" #local J=J+InterpStep;\n")
681 file.write(" #local Count=Count+1;\n")
682 file.write(" #end\n")
683 file.write(" #local S2=spline{S0}\n")
684 file.write(" #local S0=spline{S1}\n")
685 file.write(
686 ' #debug concat("\\r Done ", str(Count,0,0)," vertices : ", str(100*Count/NumVertices,0,2)," %")\n'
687 )
688 file.write(" #local Pos=Pos+PosStep;\n")
689 file.write(" #end\n")
690 file.write(' BuildWriteMesh2(VecArr, NormArr, UVArr, InterpRes, SplRes, "")\n')
691 file.write(" #end\n")
692 file.write("#end\n\n")
693
694 file.write("#macro Coons(Spl1, Spl2, Spl3, Spl4, Iter_U, Iter_V, FileName)\n")
695 file.write(" #declare Build=CheckFileName(FileName);\n")
696 file.write(" #if(Build=0)\n")
697 file.write(' #debug concat("\\n Parsing mesh2 from file: ", FileName, "\\n")\n')
698 file.write(" #include FileName\n")
699 file.write(" object{Surface}\n")
700 file.write(" #else\n")
701 file.write(" #local NumVertices=(Iter_U+1)*(Iter_V+1);\n")
702 file.write(" #local NumFaces=Iter_U*Iter_V*2;\n")
703 file.write(
704 ' #debug concat("\\n Calculating ", str(NumVertices,0,0), " vertices for ",str(NumFaces,0,0), " triangles\\n\\n")\n'
705 )
706 file.write(" #declare VecArr=array[NumVertices] \n")
707 file.write(" #declare NormArr=array[NumVertices] \n")
708 file.write(" #local UVArr=array[NumVertices] \n")
709 file.write(" #local Spl1_0=Spl1(0);\n")
710 file.write(" #local Spl2_0=Spl2(0);\n")
711 file.write(" #local Spl3_0=Spl3(0);\n")
712 file.write(" #local Spl4_0=Spl4(0);\n")
713 file.write(" #local UStep=1/Iter_U;\n")
714 file.write(" #local VStep=1/Iter_V;\n")
715 file.write(" #local Count=0;\n")
716 file.write(" #local I=0;\n")
717 file.write(" #while (I<=1)\n")
718 file.write(" #local Im=1-I;\n")
719 file.write(" #local J=0;\n")
720 file.write(" #while (J<=1)\n")
721 file.write(" #local Jm=1-J;\n")
722 file.write(
723 " #local C0=Im*Jm*(Spl1_0)+Im*J*(Spl2_0)+I*J*(Spl3_0)+I*Jm*(Spl4_0);\n"
724 )
725 file.write(" #local P0=LInterpolate(I, Spl1(J), Spl3(Jm)) + \n")
726 file.write(" LInterpolate(Jm, Spl2(I), Spl4(Im))-C0;\n")
727 file.write(" #declare VecArr[Count]=P0;\n")
728 file.write(" #local UVArr[Count]=<J,I>;\n")
729 file.write(" #local J=J+UStep;\n")
730 file.write(" #local Count=Count+1;\n")
731 file.write(" #end\n")
732 file.write(" #debug concat(\n")
733 file.write(' "\r Done ", str(Count,0,0)," vertices : ",\n')
734 file.write(' str(100*Count/NumVertices,0,2)," %"\n')
735 file.write(" )\n")
736 file.write(" #local I=I+VStep;\n")
737 file.write(" #end\n")
738 file.write(' #debug "\r Normals "\n')
739 file.write(" #local Count=0;\n")
740 file.write(" #local I=0;\n")
741 file.write(" #while (I<=Iter_V)\n")
742 file.write(" #local J=0;\n")
743 file.write(" #while (J<=Iter_U)\n")
744 file.write(" #local Ind=(I*Iter_U)+I+J;\n")
745 file.write(" #local P0=VecArr[Ind];\n")
746 file.write(" #if(J=0)\n")
747 file.write(" #local P1=P0+(P0-VecArr[Ind+1]);\n")
748 file.write(" #else\n")
749 file.write(" #local P1=VecArr[Ind-1];\n")
750 file.write(" #end\n")
751 file.write(" #if (J=Iter_U)\n")
752 file.write(" #local P2=P0+(P0-VecArr[Ind-1]);\n")
753 file.write(" #else\n")
754 file.write(" #local P2=VecArr[Ind+1];\n")
755 file.write(" #end\n")
756 file.write(" #if (I=0)\n")
757 file.write(" #local P3=P0+(P0-VecArr[Ind+Iter_U+1]);\n")
758 file.write(" #else\n")
759 file.write(" #local P3=VecArr[Ind-Iter_U-1];\n")
760 file.write(" #end\n")
761 file.write(" #if (I=Iter_V)\n")
762 file.write(" #local P4=P0+(P0-VecArr[Ind-Iter_U-1]);\n")
763 file.write(" #else\n")
764 file.write(" #local P4=VecArr[Ind+Iter_U+1];\n")
765 file.write(" #end\n")
766 file.write(" #local B1=P4-P0;\n")
767 file.write(" #local B2=P2-P0;\n")
768 file.write(" #local B3=P3-P0;\n")
769 file.write(" #local B4=P1-P0;\n")
770 file.write(" #local N1=vcross(B1,B2);\n")
771 file.write(" #local N2=vcross(B2,B3);\n")
772 file.write(" #local N3=vcross(B3,B4);\n")
773 file.write(" #local N4=vcross(B4,B1);\n")
774 file.write(" #local Norm=vnormalize((N1+N2+N3+N4));\n")
775 file.write(" #declare NormArr[Count]=Norm;\n")
776 file.write(" #local J=J+1;\n")
777 file.write(" #local Count=Count+1;\n")
778 file.write(" #end\n")
779 file.write(
780 ' #debug concat("\r Done ", str(Count,0,0)," normals : ",str(100*Count/NumVertices,0,2), " %")\n'
781 )
782 file.write(" #local I=I+1;\n")
783 file.write(" #end\n")
784 file.write(" BuildWriteMesh2(VecArr, NormArr, UVArr, Iter_U, Iter_V, FileName)\n")
785 file.write(" #end\n")
786 file.write("#end\n\n")
787 # Empty curves
788 if len(ob.data.splines) == 0:
789 tab_write(file, "\n//dummy sphere to represent empty curve location\n")
790 tab_write(file, "#declare %s =\n" % dataname)
791 tab_write(
792 file,
793 "sphere {<%.6g, %.6g, %.6g>,0 pigment{rgbt 1} "
794 "no_image no_reflection no_radiosity "
795 "photons{pass_through collect off} hollow}\n\n"
796 % (ob.location.x, ob.location.y, ob.location.z),
797 ) # ob.name > povdataname)
798 # And non empty curves
799 else:
800 if not bezier_sweep:
801 tab_write(file, "#declare %s =\n" % dataname)
802 if ob.pov.curveshape == "sphere_sweep" and not bezier_sweep:
803 tab_write(file, "union {\n")
804 for spl in ob.data.splines:
805 if spl.type != "BEZIER":
806 spl_type = "linear"
807 if spl.type == "NURBS":
808 spl_type = "cubic"
809 points = spl.points
810 num_points = len(points)
811 if spl.use_cyclic_u:
812 num_points += 3
813
814 tab_write(file, "sphere_sweep { %s_spline %s,\n" % (spl_type, num_points))
815 if spl.use_cyclic_u:
816 pt1 = points[len(points) - 1]
817 wpt1 = pt1.co
818 tab_write(
819 file,
820 "<%.4g,%.4g,%.4g>,%.4g\n"
821 % (
822 wpt1[0],
823 wpt1[1],
824 wpt1[2],
825 pt1.radius * ob.data.bevel_depth,
826 ),
827 )
828 for pt in points:
829 wpt = pt.co
830 tab_write(
831 file,
832 "<%.4g,%.4g,%.4g>,%.4g\n"
833 % (wpt[0], wpt[1], wpt[2], pt.radius * ob.data.bevel_depth),
834 )
835 if spl.use_cyclic_u:
836 for i in range(0, 2):
837 end_pt = points[i]
838 wpt = end_pt.co
839 tab_write(
840 file,
841 "<%.4g,%.4g,%.4g>,%.4g\n"
842 % (
843 wpt[0],
844 wpt[1],
845 wpt[2],
846 end_pt.radius * ob.data.bevel_depth,
847 ),
848 )
849
850 tab_write(file, "}\n")
851 # below not used yet?
852 if ob.pov.curveshape == "sor":
853 for spl in ob.data.splines:
854 if spl.type in ("POLY", "NURBS"):
855 points = spl.points
856 num_points = len(points)
857 tab_write(file, "sor { %s,\n" % num_points)
858 for pt in points:
859 wpt = pt.co
860 tab_write(file, "<%.4g,%.4g>\n" % (wpt[0], wpt[1]))
861 else:
862 tab_write(file, "box { 0,0\n")
863 if ob.pov.curveshape in ("lathe", "prism"):
864 spl = ob.data.splines[0]
865 if spl.type == "BEZIER":
866 points = spl.bezier_points
867 len_cur = len(points) - 1
868 len_pts = len_cur * 4
869 ifprism = ""
870 if ob.pov.curveshape == "prism":
871 height = ob.data.extrude
872 ifprism = "-%s, %s," % (height, height)
873 len_cur += 1
874 len_pts += 4
875 tab_write(
876 file, "%s { bezier_spline %s %s,\n" % (ob.pov.curveshape, ifprism, len_pts)
877 )
878 for i in range(0, len_cur):
879 p1 = points[i].co
880 pR = points[i].handle_right
881 end = i + 1
882 if i == len_cur - 1 and ob.pov.curveshape == "prism":
883 end = 0
884 pL = points[end].handle_left
885 p2 = points[end].co
886 line = "<%.4g,%.4g>" % (p1[0], p1[1])
887 line += "<%.4g,%.4g>" % (pR[0], pR[1])
888 line += "<%.4g,%.4g>" % (pL[0], pL[1])
889 line += "<%.4g,%.4g>" % (p2[0], p2[1])
890 tab_write(file, "%s\n" % line)
891 else:
892 points = spl.points
893 len_cur = len(points)
894 len_pts = len_cur
895 ifprism = ""
896 if ob.pov.curveshape == "prism":
897 height = ob.data.extrude
898 ifprism = "-%s, %s," % (height, height)
899 len_pts += 3
900 spl_type = "quadratic"
901 if spl.type == "POLY":
902 spl_type = "linear"
903 tab_write(
904 file,
905 "%s { %s_spline %s %s,\n" % (ob.pov.curveshape, spl_type, ifprism, len_pts),
906 )
907 if ob.pov.curveshape == "prism":
908 pt = points[len(points) - 1]
909 wpt = pt.co
910 tab_write(file, "<%.4g,%.4g>\n" % (wpt[0], wpt[1]))
911 for pt in points:
912 wpt = pt.co
913 tab_write(file, "<%.4g,%.4g>\n" % (wpt[0], wpt[1]))
914 if ob.pov.curveshape == "prism":
915 for i in range(2):
916 pt = points[i]
917 wpt = pt.co
918 tab_write(file, "<%.4g,%.4g>\n" % (wpt[0], wpt[1]))
919 if bezier_sweep:
920 for p, spl in enumerate(ob.data.splines, start=1):
921 br = []
922 depth = ob.data.bevel_depth
923 points = spl.bezier_points
924 len_cur = len(points) - 1
925 num_points = len_cur * 4
926 if spl.use_cyclic_u:
927 len_cur += 1
928 num_points += 4
929 tab_write(file, "#declare %s_points_%s = array[%s]{\n" % (dataname, p, num_points))
930 for i in range(len_cur):
931 p1 = points[i].co
932 pR = points[i].handle_right
933 end = i + 1
934 if spl.use_cyclic_u and i == (len_cur - 1):
935 end = 0
936 pL = points[end].handle_left
937 p2 = points[end].co
938 r3 = points[end].radius * depth
939 r0 = points[i].radius * depth
940 r1 = 2 / 3 * r0 + 1 / 3 * r3
941 r2 = 1 / 3 * r0 + 2 / 3 * r3
942 br.append((r0, r1, r2, r3))
943 line = "<%.4g,%.4g,%.4f>" % (p1[0], p1[1], p1[2])
944 line += "<%.4g,%.4g,%.4f>" % (pR[0], pR[1], pR[2])
945 line += "<%.4g,%.4g,%.4f>" % (pL[0], pL[1], pL[2])
946 line += "<%.4g,%.4g,%.4f>" % (p2[0], p2[1], p2[2])
947 tab_write(file, "%s\n" % line)
948 tab_write(file, "}\n")
949 tab_write(file, "#declare %s_radii_%s = array[%s]{\n" % (dataname, p, len(br) * 4))
950 for rad_tuple in br:
951 tab_write(
952 file,
953 "%.4f,%.4f,%.4f,%.4f\n"
954 % (rad_tuple[0], rad_tuple[1], rad_tuple[2], rad_tuple[3]),
955 )
956 tab_write(file, "}\n")
957 if len(ob.data.splines) == 1:
958 p = 1
959 tab_write(file, "#declare %s = object{\n" % dataname)
960 tab_write(
961 file,
962 " Shape_Bezierpoints_Sphere_Sweep(yes,%s, %s_points_%s, %s_radii_%s) \n"
963 % (ob.data.resolution_u, dataname, p, dataname, p),
964 )
965 else:
966 tab_write(file, "#declare %s = union{\n" % dataname)
967 for p, spl in enumerate(ob.data.splines, start=1):
968 tab_write(
969 file,
970 " object{Shape_Bezierpoints_Sphere_Sweep(yes,%s, %s_points_%s, %s_radii_%s)} \n"
971 % (ob.data.resolution_u, dataname, p, dataname, p),
972 )
973 # tab_write(file, '#include "bezier_spheresweep.inc"\n') #now inlined
974 # tab_write(file, '#declare %s = object{Shape_Bezierpoints_Sphere_Sweep(yes,%s, %s_bezier_points, %.4f) \n'%(dataname,ob.data.resolution_u,dataname,ob.data.bevel_depth))
975 if ob.pov.curveshape == "loft":
976 tab_write(
977 file, 'object {MSM(%s,%s,"c",%s,"")\n' % (dataname, ob.pov.res_u, ob.pov.res_v)
978 )
979 if ob.pov.curveshape == "birail":
980 splines = "%s1,%s2,%s3,%s4" % (dataname, dataname, dataname, dataname)
981 tab_write(
982 file, 'object {Coons(%s, %s, %s, "")\n' % (splines, ob.pov.res_u, ob.pov.res_v)
983 )
984 # pov_mat_name = "Default_texture" # XXX! Unused, check instantiation
985 if ob.active_material:
986 # pov_mat_name = string_strip_hyphen(bpy.path.clean_name(ob.active_material.name))
987 try:
988 material = ob.active_material
989 write_object_material_interior(file, material, ob, tab_write)
990 except IndexError:
991 print(ob.data)
992 # tab_write(file, "texture {%s}\n"%pov_mat_name)
993 if ob.pov.curveshape == "prism":
994 tab_write(file, "rotate <90,0,0>\n")
995 tab_write(file, "scale y*-1\n")
996 tab_write(file, "}\n")
Central repository of Blender addons