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
Texture SL_Image_Presenter  

SL_Image_Presenter

the Script

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

the Zip file

Download all files for SL_Image_Presenter
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. SL_Image_Presenter_1.lsl
1 //
2
3 integer numberPicture = 0;
4 integer totalPictures = 0;
5 string nameObject = "blank";
6 //integer scan = 0;
7 string message = "";
8 // Scan to be counter number of displays
9
10 forward()
11 {
12 numberPicture++;
13 if(numberPicture >= totalPictures) numberPicture = 0;
14 nameObject = llGetInventoryName(INVENTORY_TEXTURE, numberPicture);
15 llSetTexture(nameObject, 2);
16 llSetObjectDesc(nameObject);
17 llSetText(nameObject, < 1, 1, 1 >, 1.0 );
18
19 }
20
21
22 back()
23 {
24 numberPicture = numberPicture - 1;
25 if(numberPicture < 0) numberPicture = 0;
26 if(numberPicture >= totalPictures) numberPicture = 0;
27 nameObject = llGetInventoryName(INVENTORY_TEXTURE, numberPicture);
28 llSetTexture(nameObject, 2);
29 llSetObjectDesc(nameObject);
30 llSetText(nameObject, < 1, 1, 1 >, 1.0 );
31
32 }
33
34 jumpTo( string message )
35 {
36 //llSay(0,message);
37 numberPicture = (integer)message;
38 if(numberPicture >= totalPictures)
39 {
40 //numberPicture = 0;
41 llSay(0,"Picture doesn't exist");
42 }
43 else
44 {
45 nameObject = llGetInventoryName(INVENTORY_TEXTURE, numberPicture);
46 llSetTexture(nameObject, 2);
47 llSetObjectDesc(nameObject);
48 llSetText(nameObject, < 1, 1, 1 >, 1.0 );
49 }
50
51 }
52
53 default
54 {
56 {
58
59 //llListen(0, "", "", "" );
60 llListen(14142, "", "", "" );
61 numberPicture = 0;
62 //llSay(0, (string)numberPicture);
63 nameObject = llGetInventoryName(INVENTORY_TEXTURE, numberPicture);
64 llSetTexture(nameObject, 2);
65 llSetObjectDesc(nameObject);
66 llSetText(nameObject, < 1, 1, 1 >, 1.0 );
67
68 }
69
70 on_rez(integer startParam)
71 {
73 //numberPicture = 0;
74
75
76 }
77
79 {
80 forward();
81 }
82
83
84
85 listen(integer channel, string name, key id, string message)
86 {
87 if(message == "next" )
88 {
89 forward();
90 }
91 else if(message == "back")
92 {
93 back();
94 }
95 else if( ((integer)message >= 0) && ((integer)message < 111))
96 {
97 //llSay(0,message);
98 jumpTo( message );
99 }
100
101 }
102
103 changed(integer change)
104 {
105 if(change & CHANGED_INVENTORY)
107 }
108 }

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