Join us in Outworldz at www.outworldz.com:9000 or follow us:

Search dozens of selected web sites for OpenSim and LSL script

New! Script Meta-Search will search thousands of scripts here and at other sites for LSL or Opensim scripts.
Loading

Want to add a script or a project? Upload it and a half million people will see it and your name here this year.

Home   Show All
Category: Contributor: Creator
Skirt Maker Skirt_Maker  

Skirt_Maker

The script

Category: Skirt Maker
By : Ariane Brodie
Created: 2010-01-10 Edited: 2010-01-10
Worlds: Second Life

the Zip file

Download all files for Skirt_Maker
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. Better_Skirt_Maker_2.lsl
Get file # 2. Skirt_Maker_1.lsl
1 //flexi prim skirt generator
2 float a = 0.75; //elipse parameter between 0 (line) and 1 (perfect circle)
3 float b = -0.1; //bending parameter 0 = flat
4 string bead = "skirtpart"; //object to use
5 integer numbeads = 25; //how many beads should the necklace have
6 vector offsetrot = <0,0,180>; //rotation of test bead
7
8 make()
9 {
10 integer n;
11 float t; //parameter
12 float d; //derivitive angle
13 vector p; //position
14 vector re; //rotation in euler
15 rotation rot; //re in rot format
16 for(n = 1;n <= numbeads;n++) {
17 t = TWO_PI * ((float)n/(float)numbeads);
19 p.x = llCos(t);
20 p.y = a * llSin(t);
21 p.z = b * llCos(t)*llCos(t) + 1;
22 p = p + llGetPos();
23 re.x = 0;//-1 llSin(t) + DEG_TO_RAD offsetrot.x;
24 re.y = 0;//llCos(t) + DEG_TO_RAD offsetrot.y;
25 re.z = t + DEG_TO_RAD * offsetrot.z;
26 rot = llEuler2Rot(re);
27 llRezObject(bead, p, ZERO_VECTOR, rot, 0);
28 }
29 }
30
31 default
32 {
34 {
35 llSay(0, "Touch to generate a Skirt");
36 }
37
38 touch_start(integer total_number)
39 {
40 make();
41 }
42 }

Back to the Best Free Tools in Second Life and OpenSim.