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
Browser SL_Browser_launch  

SL_Browser_launch

Create a notecard 'bookmarks' with a list of URLS

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

the Zip file

Download all files for SL_Browser_launch
Contents are in zip format, with .LSL (text) source code and LSLEdit (text + Solution) formats.
Get file # 1. SL_Browser_launch_1.lsl
1 string card="bookmarks";
2 integer i=0;
3 integer pointer=0;
4 list URLs;
5 list Hover;
6 key owner;
7 integer listenID;
8
9 default
10 {
12 {
13 llSetText("Loading bookmarks", <1,1,1>, 1.0);
14 llGetNotecardLine(card, i);
15 owner=llGetOwner();
16 }
17 touch_start(integer times)
18 {
19 key who=llDetectedKey(0);
20 if(who==owner)
21 {
22 llDialog(owner, "Open URL or select new target?", ["Open", "Prev", "Next"], 1001);
23 llListenRemove(listenID);
24 listenID=llListen(1001, "", owner, "");
25 } else {
26 llLoadURL(llDetectedKey(0), "Load "+llList2String(Hover, pointer), llList2String(URLs, pointer));
27 }
28 }
29 dataserver(key query, string data)
30 {
31 if(data!=EOF)
32 {
33 list temp=llCSV2List(data);
34 Hover+=llList2String(temp, 0);
35 URLs+=llList2String(temp, 1);
36 i++;
37 llGetNotecardLine(card, i);
38 } else {
39 llSetText(llList2String(Hover, pointer), <1,1,1>, 1.0);
40 }
41 }
42 listen(integer channel, string name, key ID, string message)
43 {
45 if(message=="Open")
46 {
47 llLoadURL(llGetOwner(), "Load "+llList2String(Hover, pointer), llList2String(URLs, pointer));
48 } else if(message=="Prev")
49 {
50 pointer++;
51 if(pointer==llGetListLength(Hover))
52 {
53 pointer=0;
54 }
55 } else if(message=="Next")
56 {
57 pointer--;
58 if(pointer<0)
59 {
60 pointer=llGetListLength(Hover);
61 pointer--;
62 }
63 }
64 llSetText(llList2String(Hover, pointer), <1,1,1>, 1.0);
65 llListenRemove(listenID);
66 }
67 changed(integer change)
68 {
69 if(change & CHANGED_INVENTORY)
70 {
72 }
73 }
74 timer()
75 {
76 llListenRemove(listenID);
77 }
78 }

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