test/renders/gymbal2.rad

# RCSid $Id: gymbal2.rad,v 1.1 2024/12/09 00:44:29 greg Exp $
#
# Tests of WGMDfunc material
#

void colorfunc check1
6 if(Check(12),.5,.1) if(Check(12),.1,.7) if(Check(12),.4,.9)
        cylmods.cal -ry 90
0
0

void WGMDfunc wgmd_mat1
19
        void if(Px,.08,0) 0 0
        check1 .2 0 0
        void
        0 0 1
        cylmods.cal -ry 90 -t -4 2.5 1.1
0
9
        .01     .01     .01
        .05     .2      .05
        0       0       0

void texfunc pyramid2
12 Pyramid_dx(13) Pyramid_dy(13) Pyramid_dz(13)
        cylmods.cal -s .9 -rx 90 -t -4 2.5 1.1
0
0

void colorfunc check2
12 if(Check(9),.9,.1) .1 if(Check(9),.3,.1)
        cylmods.cal -s .9 -rx 90 -t -4 2.5 1.1
0
0

void WGMDfunc wgmd_mat2
17
        pyramid2 .08 0 0
        check2 .2 .02 .02
        void
        0 0 0
        . -t -4 2.5 1.1
0
9
        0 0 0
        0 0 0
        0 0 0

void colorfunc check3
10 if(Check(7),.9,.1) .1 if(Check(7),.3,.1)
        cylmods.cal -s .8 -t -4 2.5 1.1
0
0

check3 WGMDfunc wgmd_mat3
17
        void .03 .08*max(Pz,0) .03*max(Pz,0)
        void 0 0 0
        inherit
        0 0 1
        . -t -4 2.5 1.1
0
9
        0 0 0
        .4 .1 .1
        .3 .3 .4


wgmd_mat1 cylinder cyl1
0
0
7
        -4.4    2.5     1.1
        -3.6    2.5     1.1
        1

wgmd_mat2 tube tube2
0
0
7
        -4      2.1     1.1
        -4      2.9     1.1
        .9

wgmd_mat3 cylinder cyl3
0
0
7
        -4      2.5     0.7
        -4      2.5     1.5
        .8
Revision:	1.2
Committed:	Mon Dec 9 03:10:36 2024 UTC (10 months, 2 weeks ago) by greg
Branch:	MAIN
CVS Tags:	rad6R0, HEAD
Changes since 1.1:	+16 -16 lines
Log Message:	test: Improved test for new WGMDfunc material
#	User	Rev	Content
1	greg	1.2	# RCSid $Id: gymbal2.rad,v 1.1 2024/12/09 00:44:29 greg Exp $
2	greg	1.1	#
3			# Tests of WGMDfunc material
4			#
5
6			void colorfunc check1
7			6 if(Check(12),.5,.1) if(Check(12),.1,.7) if(Check(12),.4,.9)
8			cylmods.cal -ry 90
9			0
10			0
11
12			void WGMDfunc wgmd_mat1
13	greg	1.2	19
14			void if(Px,.08,0) 0 0
15	greg	1.1	check1 .2 0 0
16			void
17			0 0 1
18	greg	1.2	cylmods.cal -ry 90 -t -4 2.5 1.1
19	greg	1.1	0
20			9
21	greg	1.2	.01 .01 .01
22	greg	1.1	.05 .2 .05
23			0 0 0
24
25			void texfunc pyramid2
26	greg	1.2	12 Pyramid_dx(13) Pyramid_dy(13) Pyramid_dz(13)
27			cylmods.cal -s .9 -rx 90 -t -4 2.5 1.1
28	greg	1.1	0
29			0
30
31			void colorfunc check2
32	greg	1.2	12 if(Check(9),.9,.1) .1 if(Check(9),.3,.1)
33			cylmods.cal -s .9 -rx 90 -t -4 2.5 1.1
34	greg	1.1	0
35			0
36
37			void WGMDfunc wgmd_mat2
38	greg	1.2	17
39	greg	1.1	pyramid2 .08 0 0
40			check2 .2 .02 .02
41			void
42			0 0 0
43	greg	1.2	. -t -4 2.5 1.1
44	greg	1.1	0
45			9
46			0 0 0
47			0 0 0
48			0 0 0
49
50			void colorfunc check3
51	greg	1.2	10 if(Check(7),.9,.1) .1 if(Check(7),.3,.1)
52			cylmods.cal -s .8 -t -4 2.5 1.1
53	greg	1.1	0
54			0
55
56			check3 WGMDfunc wgmd_mat3
57	greg	1.2	17
58			void .03 .08max(Pz,0) .03max(Pz,0)
59	greg	1.1	void 0 0 0
60			inherit
61			0 0 1
62	greg	1.2	. -t -4 2.5 1.1
63	greg	1.1	0
64			9
65			0 0 0
66			.4 .1 .1
67			.3 .3 .4
68
69
70			wgmd_mat1 cylinder cyl1
71			0
72			0
73			7
74			-4.4 2.5 1.1
75			-3.6 2.5 1.1
76			1
77
78			wgmd_mat2 tube tube2
79			0
80			0
81			7
82			-4 2.1 1.1
83			-4 2.9 1.1
84			.9
85
86			wgmd_mat3 cylinder cyl3
87			0
88			0
89			7
90			-4 2.5 0.7
91			-4 2.5 1.5
92			.8