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
Boat DaVinci Boat  

DaVinci Boat

A drivable, smoking, wheel spinning mesh daVinci boat, meshes and textures.

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life

the Zip file

Download all files for DaVinci Boat
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. Paddleboat9.ac
Get file # 2. double gear.lsl
Get file # 3. flames.lsl
Get file # 4. front seat.lsl
Get file # 5. Gauge.lsl
Get file # 6. large_gear.lsl
Get file # 7. Paddlewheel.lsl
Get file # 8. rear seat.lsl
Get file # 9. SL boat script.lsl
Get file # 10. small_gear.lsl
Get file # 11. smoke.lsl
Get file # 12. test rotation.lsl
Get file # 13. [261506 bytes] Image1.jpg
Get file # 14. [328655 bytes] Image2.jpg
Get file # 15. [344677 bytes] Image3.jpg
Get file # 16. [289379 bytes] Image4.jpg
Get file # 17. [464981 bytes] Image5.jpg
Get file # 18. [591707 bytes] Image6.jpg
Get file # 19. [591707 bytes] Image7.jpg
Get file # 20. [385880 bytes] Image8.jpg
Get file # 21. [397831 bytes] Image9.jpg
Get file # 22. [25006 bytes] img5.jpg
Get file # 23. Paddleboat.dae
Get file # 24. whistle.dae
Get file # 25. forward.wav
Get file # 26. reverse.wav
Get file # 27. [2185 bytes] brass.jpg
Get file # 28. [444994 bytes] flame.png
Get file # 29. [47855 bytes] maple.jpg
Get file # 30. [78695 bytes] Paddletexture.jpg
Get file # 31. [58601 bytes] planking.jpg
Get file # 32. [54510 bytes] redwood.jpg
Get file # 33. [20967 bytes] SteamGauge.jpg
Get file # 34. [35838 bytes] steampunk_iphone.jpg
Get file # 35. [60160 bytes] thin plank.jpg
Get file # 36. [53872 bytes] Whitewood.jpg
Get file # 37. [38976 bytes] wood1.jpg

This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llSetTextureAnim( ANIM_ON | LOOP, ALL_SIDES, 2, 4, 0.0, 8.0, 10 );
6 }
7 }

DaVinci Boat

The gauge control script for steam power

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 // Settable steam gauge
2 // Uses a 1X3 animated GIF, but displays one of three settings based on a link message
3
4
5
6 default
7 {
9 {
10 llScaleTexture(0.333, 1.0, ALL_SIDES); // adjust for a 1X3 GIF
11 llOffsetTexture(-0.3333, 0.0, ALL_SIDES); // First frame = COLD
12 }
13
14 on_rez(integer start)
15 {
17 }
18
19 link_message(integer sender_number, integer number, string message, key id)
20 {
21 if(message == "spin" && number == 0) {
22 llOffsetTexture(-0.3333, 0.0, ALL_SIDES);
23 }
24 else if(message == "spin" && number < 0) {
25 llOffsetTexture(0.0, 0.0, ALL_SIDES);
26 }
27 else if(message == "spin" && number > 15) {
28 llOffsetTexture(0.3333, 0.0, ALL_SIDES);
29 }
30 }
31 }

DaVinci Boat

Makes the large gear spin

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llTargetOmega(<0,0,0>,1,.1);
6 }
7
8
9 link_message(integer sender, integer num, string str, key id)
10 {
11 if(str == "spin")
12 llTargetOmega(<1,0,0>,((float) num)/10,0.1);
13 }
14
15 }

DaVinci Boat

Makes the paddle wheel spin at various rates and directions

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llTargetOmega(<0,0,0>,1,.1);
6 }
7
8
9 link_message(integer sender, integer num, string str, key id)
10 {
11 if(str == "spin")
12 llTargetOmega(<0,1,0>,((float) num)/10,0.1);
13 }
14
15 }

DaVinci Boat

Makes the double gear spin

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llTargetOmega(<0,0,0>,1,.1);
6 }
7
8
9 link_message(integer sender, integer num, string str, key id)
10 {
11 if(str == "spin")
12 llTargetOmega(<1,0,0>,((float) num)/10,0.1);
13 }
14 }

DaVinci Boat

starts the boat when sat on

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5
6 vector input = <-90.0, 0.0, -90.0> * DEG_TO_RAD;
7 rotation rot = llEuler2Rot(input);
8
9 llSitTarget(<.25, 0.75, 0>, rot); // z = fwd, x = side to side, Y = hight
10 llSetCameraEyeOffset(<0.0,2.0, -5.0>);
11 llSetCameraAtOffset(<0.0, 0.0, 2.0>);
12 }
13
14
15 changed(integer change)
16 {
17 if(change & CHANGED_LINK)
18 {
19 key agent = llAvatarOnSitTarget();
20 if(agent)
21 {
22 if(agent != llGetOwner())
23 {
24 llSay(0, "You aren't the owner");
25 llUnSit(agent);
26 llPushObject(agent, <0,0,100>, ZERO_VECTOR, FALSE);
27 }
28 else
29 {
30 llMessageLinked(LINK_SET, 0, "start", NULL_KEY);
31 }
32 }
33 else
34 {
35 // You stand so boat stops
38 }
39 }
40
41 }
42
43 }

DaVinci Boat

A passenger seat

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5
6 vector input = <-90.0, 0.0, -90.0> * DEG_TO_RAD;
7 rotation rot = llEuler2Rot(input);
8
9 llSitTarget(<.25, 0.75, 0>, rot); // z = fwd, x = side to side, Y = hight
10 llSetCameraEyeOffset(<0.0,2.0, 5.0>);
11 llSetCameraAtOffset(<0.0, 0.0, -2.0>);
12 }
13
14
15 }

DaVinci Boat

tests for the rotation of the wheels and stuff

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llSay(0, "test rotation script");
6 }
7
8 touch_start(integer total_number)
9 {
10 llMessageLinked(LINK_SET,10,"spin","");
11 llSleep(10);
12 llMessageLinked(LINK_SET,0,"spin","");
13 }
14 }

DaVinci Boat

The Davinci boat main script

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 string ENGINE = "ab1d0aab-6370-7f04-43df-d981c6051c1d";
2
3 float last_speed;
4 float speed;
5 vector angular_motor;
6
7 default
8 {
10 {
12 llSetSitText("Board");
14 llSetTimerEvent(0.0);
15 speed=0;
16
19 // remove these flags
23
24 // least for forward-back, most friction for up-down
26
27 // uniform angular friction (setting it as a scalar rather than a vector)
29
30 // linear motor wins after about five seconds, decays after about a minute
31 llSetVehicleFloatParam( VEHICLE_LINEAR_MOTOR_TIMESCALE, 5 );
33
34 // agular motor wins after four seconds, decays in same amount of time
36 llSetVehicleFloatParam( VEHICLE_ANGULAR_MOTOR_DECAY_TIMESCALE, 5 );
37
38 // hover / float
43
44 // halfway linear deflection with timescale of 3 seconds
47
48 // angular deflection
51
52 // somewhat bounscy vertical attractor
55
56 // weak negative damped banking
60
61 // default rotation of local frame
63
64 llSetStatus(STATUS_ROTATE_X | STATUS_ROTATE_Y | STATUS_ROTATE_Z, TRUE);
65 }
66
67
68
69
70 link_message(integer sender, integer num, string str, key id)
71 {
72 if(str == "start")
73 {
75
76 } else if(str == "stop") {
81 }
82 }
83
84
85
87 {
89 {
90 // You sit and are owner so get controls
92
93 // Take these controls and lets go
96 llLoopSound(ENGINE,0.3);
97 llSleep(1);
99 llSetTimerEvent(0.3);
100 }
101 }
102
103
104 control(key id, integer level, integer edge)
105 {
106
107 if(level & CONTROL_FWD)
108 {
109 // Set cruising speed faster
110 if(speed < 20)
111 {
112 speed +=1;
113 }
114 }
115 if(level & CONTROL_BACK)
116 {
117 // Set cruising speed slower
118 if(speed > -8)
119 {
120 speed -=1;
121 }
122 }
124 {
125 // Turn right
126 angular_motor.x += 5;
127 angular_motor.z -= 1;
128 }
130 {
131 // Turn left
132 angular_motor.x -= 5;
133 angular_motor.z += 1;
134 }
135 if(level & CONTROL_UP)
136 {
137 // add features for when you press up
138 }
139 if(level & CONTROL_DOWN)
140 {
141 // Added feature for when you press down
142 // Stops boat when down is pressed
143 speed=0;
144 }
145
146 }
147
148 timer()
149 {
150 // the timer actually moves vehicle
153 // reset turning angle or you would go around in circles
154 angular_motor=<0,0,0>;
155
156
157 if(speed > 0 && last_speed <= 0)
158 llPlaySound("681fb929-fa78-cd47-52ca-cafb4d43836a",1.0);
159 else if(speed <= 0 && last_speed >= 0)
160 llPlaySound("7f42f4ba-0786-e0a0-855a-1d4db140621e",1.0);
161
162 last_speed = speed;
163
165
166
167 }
168 }

DaVinci Boat

Makes the small gear spin

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 default
2 {
4 {
5 llTargetOmega(<0,0,0>,1,.1);
6 }
7
8
9 link_message(integer sender, integer num, string str, key id)
10 {
11 if(str == "spin")
12 llTargetOmega(<0,1,0>,((float) num)/10,0.1);
13 }
14 }

DaVinci Boat

Put this in a small invisible prim at the top of the smokestack

Category: Boat
By : Ferd Frederix
Created: 2013-09-08 Edited: 2013-09-08
Worlds: Second Life


This script by Ferd Frederix may be used in any manner, modified, and republished.  Unless specified otherwise, my scripts are always free and open source.  Objects made with these scripts may be sold with no restrictions.  All I ask is that you point others to this location should they ask you about it and to not sell this script, unless it is for $0 L. Please help improve my work by reporting bugs and improvements.

1 // Particle Script 0.5
2 // Created by Ama Omega
3 // 3-26-2004
4
5 integer keystate = 0 ;
6
7 // Mask Flags - set to TRUE to enable
8 integer glow = FALSE; // Make the particles glow
9 integer bounce = FALSE; // Make particles bounce on Z plane of object
10 integer interpColor = TRUE; // Go from start to end color
11 integer interpSize = TRUE; // Go from start to end size
12 integer wind = TRUE; // Particles effected by wind
13 integer followSource = FALSE; // Particles follow the source
14 integer followVel = FALSE; // Particles turn to velocity direction
15
16 // Choose a pattern from the following:
17 // PSYS_SRC_PATTERN_EXPLODE
18 // PSYS_SRC_PATTERN_DROP
19 // PSYS_SRC_PATTERN_ANGLE_CONE_EMPTY
20 // PSYS_SRC_PATTERN_ANGLE_CONE
21 // PSYS_SRC_PATTERN_ANGLE
22 integer pattern = PSYS_SRC_PATTERN_EXPLODE;
23
24 // Select a target for particles to go towards
25 // "" for no target, "owner" will follow object owner
26 // and "self" will target this object
27 // or put the key of an object for particles to go to
28 key target = "";
29
30 // Particle paramaters
31 float age = 5; // Life of each particle
32 float maxSpeed = 1; // Max speed each particle is spit out at
33 float minSpeed = 0.8; // Min speed each particle is spit out at
34 string texture = "4f714019-c1cf-6b16-994f-44b217022f1a"; // Texture used for particles, default used if blank
35 float startAlpha = 0.8; // Start alpha (transparency) value
36 float endAlpha = 0.0; // End alpha (transparency) value
37 vector startColor = <0.5,0.5,0.5>; // Start color of particles <R,G,B>
38 vector endColor = <0,0,0>; // End color of particles <R,G,B> (if interpColor == TRUE)
39 vector startSize = <1.01,1.01,5.0>; // Start size of particles
40 vector endSize = <2.0,2.0,10.0>; // End size of particles (if interpSize == TRUE)
41 vector push = <.2,0,3>; // Force pushed on particles
42
43 // System paramaters
44 float rate = .5; // How fast (rate) to emit particles
45 float radius = 0.0; // Radius to emit particles for BURST pattern
46 integer count = 40; // How many particles to emit per BURST
47 float outerAngle = 0; // Outer angle for all ANGLE patterns
48 float innerAngle = 0.1; // Inner angle for all ANGLE patterns
49 vector omega = <0,0,0>; // Rotation of ANGLE patterns around the source
50 float life = 0; // Life in seconds for the system to make particles
51
52
53 integer flags;
54 list sys;
55 integer type;
56 vector tempVector;
57 rotation tempRot;
58 string tempString;
59 integer i;
60
61
62 updateParticles()
63 {
64 flags = 0;
65 if(target == "owner") target = llGetOwner();
66 if(target == "self") target = llGetKey();
67 if(glow) flags = flags | PSYS_PART_EMISSIVE_MASK;
68 if(bounce) flags = flags | PSYS_PART_BOUNCE_MASK;
69 if(interpColor) flags = flags | PSYS_PART_INTERP_COLOR_MASK;
70 if(interpSize) flags = flags | PSYS_PART_INTERP_SCALE_MASK;
71 if(wind) flags = flags | PSYS_PART_WIND_MASK;
72 if(followSource) flags = flags | PSYS_PART_FOLLOW_SRC_MASK;
73 if(followVel) flags = flags | PSYS_PART_FOLLOW_VELOCITY_MASK;
74 if(target != "") flags = flags | PSYS_PART_TARGET_POS_MASK;
75 sys = [ PSYS_PART_MAX_AGE,age,
76 PSYS_PART_FLAGS,flags,
77 PSYS_PART_START_COLOR, startColor,
78 PSYS_PART_END_COLOR, endColor,
79 PSYS_PART_START_SCALE,startSize,
80 PSYS_PART_END_SCALE,endSize,
81 PSYS_SRC_PATTERN, pattern,
83 PSYS_SRC_ACCEL, push,
89 PSYS_SRC_INNERANGLE,innerAngle,
90 PSYS_SRC_OUTERANGLE,outerAngle,
91 PSYS_SRC_OMEGA, omega,
92 PSYS_SRC_MAX_AGE, life,
93 PSYS_SRC_TEXTURE, texture,
94 PSYS_PART_START_ALPHA, startAlpha,
95 PSYS_PART_END_ALPHA, endAlpha
96 ];
97
99 }
100
101
102
103
104 default
105 {
107 {
108 //updateParticles();
109 keystate = 0 ;
110 //target = llGetLinkKey(2) ;
111
112
113
114 //llParticleSystem([]) ;
115 }
116
117
118
119 link_message(integer sender, integer num, string str, key id)
120 {
121 if(str == "spin" && num != 0)
122 updateParticles() ;
123
124 if(str == "spin" && num == 0)
126
127
128
129 }
130
131
132
133 }

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