| Revision: | 1.2 |
| Committed: | Wed Jul 29 23:38:22 2020 UTC (4 years, 9 months ago) by greg |
| Branch: | MAIN |
| CVS Tags: | rad5R4, rad5R3, HEAD |
| Changes since 1.1: | +2 -2 lines |
| Log Message: | test: fix for Windows, which doesn't like single-quotes in commands |
| # | Content |
|---|---|
| 1 | # RCSid $Id: torus.rad,v 1.1 2018/11/17 22:09:12 greg Exp $ |
| 2 | # A green metal torus with glowing red stripes |
| 3 | |
| 4 | void metal green_metal |
| 5 | 0 |
| 6 | 0 |
| 7 | 5 .1 .8 .1 .6 .08 |
| 8 | |
| 9 | void glow red_glow |
| 10 | 0 |
| 11 | 0 |
| 12 | 4 .8 .02 .01 0 |
| 13 | |
| 14 | void mixfunc striped |
| 15 | 4 green_metal red_glow "if(mod(atan2(Py-A2,Px-A1),PI/10) - PI/20, 1, 0)" . |
| 16 | 0 |
| 17 | 3 -4 2.5 1.5 |
| 18 | |
| 19 | !genrev striped torus "sin(2*PI*t)" "2+cos(2*PI*t)" 32 -s \ |
| 20 | | xform -ry 52 -s .2 -t -4 2.5 1.5 |