After you Subscribe email your username
and receipt to
goonsquad.me@gmail.com
Membership Options
Pay With Bitcoin
  • 35 Vote(s) - 3.17 Average
  • 5
  • 4
  • 3
  • 2
  • 1
Thread Modes

Teleporter_Anywhere
nigrajim Offline
Goonsquad Member
******
Goonsquad

Posts: 209
Threads: 203
Joined: May 2016
Reputation: 317
Setup:
  1. Rez the Zx Teleporter on your land where you want your first location and up it to 1 meter above the floor. And click on it to open the menu.
  2. Choose in the menu the "Save Dest 1" Button (to save the first destination coordinate).
  3. Reopen the menu and choose the "Dest name 1" Button and type the name of the first destination.
  4. Take it in your inventory, and go to the second destination of your choice, rez it and up it to 1 meter above the floor. And use the menu to save the coordinate of the second destination and to set the name of the destination ("Save Dest 2" and "Dest Name 2").
  5. Take it in your inventory and Rez the Teleporter where you want on your land. Click on it to open the Menu and choose the "Ready" Button and the setup is finish.
Now if someone click on it, he will can choose one of the 2 links to teleport him at the first or at the second destination.
[list=square]
[*]Ready Button:
[/list]
Lock the Admin menu: the Admin menu will be unavailable until the next rez. So if you need to access at the Admin menu: Take it in your inventory and rez it.
[list=square]
[*]Important:
[/list]
To allow users to teleport anywhere in your land: you need to allow it in your Land Settings (Options tab and Teleport routing): Anywhere (teleports may arrive at any location on the parcel). If your land is "Group owned", you can allow it just for this group: to disallow it in the Land Settings and to allow it for the Group: Group Profile -> "Roles" section -> "Abilities" tab... 
PHP Code:
//////////////////////////////////////////////////////////////////////////////
//                      Zx Teleporter Anywhere v5.1                         //
//                                                                          //
//    Copyright (C) 2016 Luxen - Zonyx Technology                           //
//    This program is free software: you can redistribute it and/or modify  //
//    it under the terms of the GNU General Public License version 3, as    //
//    published by the Free Software Foundation.                            //
//                                                                          //
//    This program is distributed in the hope that it will be useful,       //
//    but WITHOUT ANY WARRANTY; without even the implied warranty of        //
//    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         //
//    GNU General Public License for more details.                          //
//                                                                          //
//   You should have received a copy of the GNU General Public License      //
//    along with this program.  If not, see <http://www.gnu.org/licenses/>  //
//////////////////////////////////////////////////////////////////////////////
 
key owner NULL_KEY;
integer New_Key TRUE;
integer Ready TRUE;
integer Zchan = -58846;
integer CTimer FALSE;
integer ZxMenu FALSE;
integer ZxText1 FALSE;
integer ZxText2 FALSE;
integer TOwner FALSE;
integer TMember FALSE;
string TDest1 "Banyan/70/79/96";
string MDest1 "Gadgets:";
string TDest2 "Banyan/70/79/96";
string MDest2 "Freebies:";
integer listenHandle;
 
FCTimer()
{
    if (
CTimer
    {
        
llSetTimerEvent(0.0);
        
CTimer FALSE;
    }
}
ChangeColor(vector Tcolor)
{
    
vector SColor llGetColor(2);
    if (
SColor != TcolorllSetColor(Tcolor2);
}
string SetDest(vector VDest)
{
    return 
llEscapeURL(llGetRegionName()) + "/" + (string)llRound(VDest.x) + "/" + (string)llRound(VDest.y) + "/" + (string)llRound(VDest.z);
}
 
default

 
    
state_entry()
    {
        if (
owner)  ;
        else 
        {
            
owner llGetOwner();
            
ChangeColor(<0.2390.6000.439>);
        }
        if (
New_Key
        {
            
New_Key FALSE;
            
Ready TRUE;
            
Zchan 0x80000000 | (integer)("0x"+(string)llGetKey());
        }
        
FCTimer();
        
ZxMenu FALSE;
        
ZxText1 FALSE;
        
ZxText2 FALSE;
    }
 
    
on_rez(integer start_param)
    {
        if (
owner != llGetOwner()) llResetScript();
        else 
        {
            
New_Key TRUE;
            
state restart_scr;
        }
    }
 
    
changed(integer change)
    {
        if (
change CHANGED_REGION_START)
        {
            
llSleep(5.0);
            
state restart_scr;
        }
    }
 
    
touch_start(integer num_detected)
    {
        
key ZTouch llDetectedKey(0);
        
integer Zpass FALSE;
        if (
TOwner)
        {
            if (
ZTouch == ownerZpass TRUE;
        }
        else if (
TMember)
        {
            
integer ObjectGroup FALSE;
            list 
details llGetObjectDetails(llGetKey(),[OBJECT_GROUP]);
            if (
llList2Key(details0)) ObjectGroup TRUE;
            if (
llSameGroup(ZTouch) && ObjectGroupZpass TRUE;
            else if (
ZTouch == ownerZpass TRUE;
        }
        else 
Zpass TRUE;
 
        if (
Zpass)
        {
            
string Dest "\n " "\n " MDest1
                      
"\n " "secondlife:///app/teleport/" TDest1
                      
"\n " "\n " MDest2
                      
"\n " "secondlife:///app/teleport/" TDest2;
            if (
Ready)
            {
                if (
ZTouch == owner)
                {
                    
Dest "- Click on the links below -"
                    
"\n (Buttons are only visible to the Owner)" Dest;
                    
llListenRemove(listenHandle);
                    
llSetTimerEvent(120.0);
                    
CTimer TRUE;
                    list 
Teleport_Tab = ["Public""Member Only""Owner Only""Dest Name 1""Save Dest 2""Dest Name 2""Reset""Ready""Save Dest 1""Close"];
                    
llDialog(ZTouchDestTeleport_Tab Zchan);
                    
listenHandle llListen(Zchan""owner"");
                    
ZxMenu TRUE;
                    return;
                }
            }
            
Dest "- Click on the links below -" Dest;
            
llDialog(ZTouchDest, ["Close"], -5958);
        }
    }
 
    
listen(integer channelstring namekey idstring msg)
    {
        if (
ZxMenu)
        {
            if(
channel == Zchan && id == owner)
            {
                
integer Tmsg llStringLength(msg);
                if (
Tmsg 50)
                {
                    if (
msg == "Public")
                    {
                        
TOwner FALSE;
                        
TMember FALSE;
                        
ChangeColor(<0.2390.6000.439>);
                    }
                    else if (
msg == "Member Only")
                    {
                        
TOwner FALSE;
                        
TMember TRUE;
                        
ChangeColor(<0.0000.4550.851>);
                    }
                    else if (
msg == "Owner Only")
                    {
                        
TOwner TRUE;
                        
TMember FALSE;
                        
ChangeColor(<1.0000.2550.212>);
                    }
                    else if (
msg == "Reset")
                    {
                        
llSleep(0.5);
                        
llResetScript();
                    }
                    else if (
msg == "Ready"Ready FALSE;
                    else if (
msg == "Close")  ;
                    else if (
msg == "Save Dest 2")
                    {
                        
vector VDest2 llGetPos();
                        
TDest2 SetDest(VDest2);
                    }
                    else if (
msg == "Dest Name 2")
                    {
                        
llTextBox(owner"Type the name of the destination 2... (Max: 50)"Zchan);
                        
ZxText2 TRUE;
                        
ZxText1 FALSE;
                        return;
                    }
                    else if (
msg == "Save Dest 1")
                    {
                        
vector VDest1 llGetPos();
                        
TDest1 SetDest(VDest1);
                    }
                    else if (
msg == "Dest Name 1")
                    {
                        
llTextBox(owner"Type the name of the destination 1... (Max: 50)"Zchan);
                        
ZxText1 TRUE;
                        
ZxText2 FALSE;
                        return;
                    }
                    else if (
ZxText1)
                    {
                        
msg llStringTrim(msgSTRING_TRIM);
                        if (
msgMDest1 msg;
                    }
                    else if (
ZxText2)
                    {
                        
msg llStringTrim(msgSTRING_TRIM);
                        if (
msgMDest2 msg;
                    }
                    else return;
                    
llListenRemove(listenHandle);
                    
state restart_scr;
                }
            }
        }
    }
 
    
timer()
    {
        
llWhisper(0,"Resetting listen...\nMenu Off");
        
state restart_scr;
    }
}
 
state restart_scr
{
    
state_entry()
    {
        
state default;
    }
 
    
on_rez(integer start_param)
    {
        if (
owner != llGetOwner()) llResetScript();
        else 
        {
            
New_Key TRUE;
            
state default;
        }
    }


Summer Offline
Administrator
****************
Administrators

Posts: 2,224
Threads: 1,153
Joined: Mar 2013
Reputation: 3,391
Thanks, great shareWink
Yes, I stole your shit!!! And What!!!???
[Image: anime_girl_sig_by_gameriuxlt-d64aqnz.png]

CyberHenk Offline
Beginner
Registered

Posts: 3
Threads: 1
Joined: Oct 2016
Reputation: 0
Great share Thanks alot !

hafiz_nagib Offline
Beginner
Registered

Posts: 14
Threads: 1
Joined: Oct 2016
Reputation: 0
After I creat the prim , can i wear it as a hud for my own LM's ???






Users browsing this thread: 1 Guest(s)

Color Skins

Change Color:

Background Patterns:

Background Images:

Background Header:

Setting Panel

Main Options: