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
Weapons Weapons-FF_Class_4_script_v2  

Weapons-FF_Class_4_script_v2

F-F Class 4 script (v2).lsl

Category: Weapons
By : Anonymous
Created: 2010-01-10 Edited: 2010-01-10
Worlds: Second Life

the Zip file

Download all files for Weapons-FF_Class_4_script_v2
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. FF_Class_4_script_v2_1.lsl
1
2 integer z = FALSE;
3 integer TRIGGER_CHANNEL = 100;
4 string main="hold_r_pistol";
5 string sound1 ="fire";
6 string bullet="bullet";
7 list weaponmain = ["Attachments","Bullet Type","More....","Credits"];
8 list attac = ["Laser","Back"];
9 list bt = ["Damage","Orbit","Back"];
10 list more=["Help File","Back"];
11 integer velocity=100;
12 integer sil;
13 integer newvel;
14 integer w;
15
16 stopall()
17 {
18 llStopAnimation("hold_r_bazooka");
19 llStopAnimation("hold_r_handgun");
20 llStopAnimation("hold_r_rifle");
21 llStopAnimation("aim_r_bazooka");
22 llStopAnimation("aim_r_handgun");
23 llStopAnimation("aim_r_rifle");
24 }
25 string owner;
26
27 checkown()
28 {
30 w=llListen(0,"",owner=llGetOwner(),"");
31 }
32
33 default
34 {
36 {
37 checkown();
38 llSay(0,"For help on how to use this weapon , click me!");
39 }
41 {
42 checkown();
43 }
44 attach(key a)
45 {
46 if(a == NULL_KEY)
47 {
48 z=FALSE;
49 llStopAnimation(main);
51 }
52 else
53 {
54 checkown();
56 }
57 }
59 {
60 if(a > 0)
61 {
62 llStartAnimation(main);
64 }
65 }
66 control(key a, integer b, integer c)
67 {
69 {
70 llSleep(0.2);
71 if(sil==TRUE)
73 else if(sil==FALSE)
75 }
76 }
77 listen(integer c, string n, key id, string m)
78 {
79 if(llGetSubString(m,0,1)=="/v")
80 {
81 string mess=llGetSubString(m,3,-1);
82 velocity-=velocity;
83 velocity=(integer)mess;
84 velocity/=50;
85 newvel=velocity*50;
86 llInstantMessage(owner,"The Velocity of your weapon is now "+(string)newvel);
87 }
88 else if(m=="/?v")
89 {
90 llSay(0,"The velocity of your weapon is currently " + (string)velocity);
91 }
92 else if(m=="las")
93 {
95 }
96 else if(m=="/na")
97 {
98 stopall();
99 }
100 else if(m=="/ap")
101 {
102 stopall();
103 llStartAnimation("aim_r_handgun");
104 }
105 else if(m=="/hp")
106 {
107 stopall();
108 llStartAnimation("hold_r_handgun");
109
110 }
111 else if(m=="/ab")
112 {
113 stopall();
114 llStartAnimation("aim_r_bazooka");
115 }
116 else if(m=="/ar")
117 {
118 stopall();
119 llStartAnimation("aim_r_rifle");
120 }
121 else if(m=="/hr")
122 {
123 stopall();
124 llStartAnimation("hold_r_rifle");
125 }
126 else if(m=="/hb")
127 {
128 stopall();
129 llStartAnimation("hold_r_bazooka");
130 }
131
132 if(m=="/r")
133 {
135 }
136 if(m=="silencer")
137 {
138 sil=TRUE;
139 llSay(0,"silencer on");
140 }
141 if(m=="silencer_off")
142 {
143 sil=FALSE;
144 llSay(0,"silencer off");
145 }
146 if(m=="laser")
147 {
149 }
150 if(m=="scope")
151 {
153 }
154 if(m=="silencer")
155 {
157 }
158 if(m=="laser_off")
159 {
160 llMessageLinked(LINK_SET,0,"laser_off",NULL_KEY);
161 }
162 if(m=="scope_off")
163 {
164 llMessageLinked(LINK_SET,0,"scope_off",NULL_KEY);
165 }
166 if(m=="silencer_off")
167 {
169 }
170 if(m=="stock_off")
171 {
172 llMessageLinked(LINK_SET,0,"stock_off",NULL_KEY);
173 }
174 if(m=="stock")
175 {
177 }
178 if(m=="one_clip")
179 {
181 }
182 if(m=="muiltple_clips")
183 {
185 }
186 }
188 {
189 llGiveInventory(owner,"help");
190 }
191 }
192
193
194
195 // END //

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