[Any Mod's Please move this in the Scripts section.] Hey people ive scripted this with some lists and a few arrays which im not very good with arrays much. I was just wondering if some one with good scripting skills to simplize this for me. Now in Mono this haves over 300+ lines of code and packed with alot of DATA , if i even add more lines of code it will give me Script run-time errors & Stack-Heap Errors eventhough the script is fine. What it does: Its only 1 script that controls 1 prime object which has 26 childprims. Its controlled by touching and it goes in states for selections and such on. [CODE] string data;string info;integer i;key owner;integer LH;integer Core;integer TEST =FALSE;
integer LenRcv =-7;integer FrameRcv =-8;integer SidesRcv =-9;integer FullSetRCV = -10;
integer Size =-11;integer Tint =-12;
//////[Lists of Varibles]////////
list HomeLoc =[PRIM_POSITION,<0.00070,0.20304,0.06592>];list MinLoc =[PRIM_POSITION,<0.00070,0.24507,0.06592>];
list GlaLoc =[PRIM_POSITION,<0.00070,-0.00810,-0.04470>];list SupLoc =[PRIM_POSITION,<0.00070,-0.17790,-0.07380>];
list SetLoc =[PRIM_POSITION,<0.00070,0.15430,-0.07189>];list ArwLeftLoc =[PRIM_POSITION,<0.00066,-0.26796,-0.04224>];
list ArwRightLoc =[PRIM_POSITION,<0.00070,0.25336,-0.04297>];list PutAwayLoc = [PRIM_POSITION,<0.00070,-0.68881,-0.46596>];
list InfoBox =[PRIM_POSITION,<0.00070,-0.22505,0.00850>,PRIM_SIZE,<0.01000,0.15788,0.02332>];
list InfoTex =[PRIM_POSITION,<0.00070,-0.22505,0.00850>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"387d5f9e-f644-090b-22ea-a0c0f45f1b3f",<1,1,0>,<0,0,0>,0];
list InfoSet =[PRIM_POSITION,<0.00070,-0.22505,0.00850>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"12a769ca-2dd9-ad2c-e8a9-de47979d4c7d",<1,1,0>,<0,0,0>,0];
list InfoSup =[PRIM_POSITION,<0.00070,-0.22505,0.00850>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"a05e136b-c2f5-5989-80ca-71d54206c706",<1,1,0>,<0,0,0>,0];
list LenInfo =[PRIM_POSITION,<0.00070,-0.28084,0.03854>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"207e84fb-cf3b-0dbf-e9f0-35269c81d179",<1,1,0>,<0,0,0>,0];
list SdsInfo =[PRIM_POSITION,<0.00070,-0.28084,0.03854>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"b845548c-7662-42f9-5120-64b19dff106d",<1,1,0>,<0,0,0>,0];
list FrmInfo =[PRIM_POSITION,<0.00070,-0.28084, 0.03854>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"3ec892ae-f7b0-3af7-1bf9-0173ad52fa54",<1,1,0>,<0,0,0>,0];
list GlsInfo =[PRIM_POSITION,<0.00070,-0.28084,0.03854>,PRIM_SIZE,<0.01000,0.15788,0.02332>,PRIM_TEXTURE,2,"d879a554-91f3-842e-1f39-44726d1d8974",<1,1,0>,<0,0,0>,0];
list BaseLoc =[PRIM_POSITION,<0.00000,-0.40508,0.30073>,PRIM_SIZE,<0.01000,0.68174,0.31290>,PRIM_TEXTURE, 2, "36ee1a86-c778-18fe-f8b7-72b69b7792db",<1,1,0>,<0,0,0>,0];
list BtmNavLoc =[PRIM_POSITION,<-0.00600,-0.00780,-0.16197>,PRIM_SIZE,<0.01000,0.62930,0.05470>];
///////////////[END]/////////////
DefaultLoc(){
PutAway2();
llSetLinkPrimitiveParamsFast(8, InfoBox + InfoTex);
llSetLinkPrimitiveParamsFast(2, HomeLoc);llSetLinkPrimitiveParamsFast(4, MinLoc);
llSetLinkPrimitiveParamsFast(16, GlaLoc);llSetLinkPrimitiveParamsFast(14, SupLoc);
llSetLinkPrimitiveParamsFast(15, SetLoc);llSetLinkPrimitiveParamsFast(1, BaseLoc);
llSetLinkPrimitiveParamsFast(12, ArwLeftLoc);llSetLinkAlpha(12,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(13, ArwRightLoc);llSetLinkAlpha(13,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(17, BtmNavLoc);llResetScript();}
////[Hiding]/////
Minimise(){
list BaseMin =[PRIM_POSITION,<0.00000,-0.34888,0.11584>,PRIM_SIZE,<0.01000,0.68174,0.31290>,PRIM_TEXTURE,2,"29ea51c3-42c4-abcf-3c0e-b5fe156b355c",<1,1,0>,<0,0,0>,0];
list BtmNavMin =[PRIM_POSITION,<-0.00600,-0.00713,-0.00160>,PRIM_SIZE,<0.01000,0.62930, 0.05470>];
llSetLinkPrimitiveParamsFast(1,BaseMin);llSetLinkPrimitiveParamsFast(2, HomeLoc);
llSetLinkPrimitiveParamsFast(4,MinLoc);llSetLinkPrimitiveParamsFast(17,BtmNavMin);
llSetLinkPrimitiveParamsFast(16,PutAwayLoc);llSetLinkPrimitiveParamsFast(15,PutAwayLoc);
llSetLinkPrimitiveParamsFast(14,PutAwayLoc);llSetLinkPrimitiveParamsFast(13,PutAwayLoc);
llSetLinkPrimitiveParamsFast(12,PutAwayLoc);llSetLinkPrimitiveParamsFast(11,PutAwayLoc);
llSetLinkPrimitiveParamsFast(10,PutAwayLoc);llSetLinkPrimitiveParamsFast(9,PutAwayLoc);
llSetLinkPrimitiveParamsFast(8,PutAwayLoc);llSetLinkPrimitiveParamsFast(5,PutAwayLoc);
llSetLinkPrimitiveParamsFast(27,PutAwayLoc);llSetLinkPrimitiveParamsFast(26,PutAwayLoc);
llSetLinkPrimitiveParamsFast(25,PutAwayLoc);llSetLinkPrimitiveParamsFast(24,PutAwayLoc);
llSetLinkPrimitiveParamsFast(23,PutAwayLoc);llSetLinkPrimitiveParamsFast(22,PutAwayLoc);
llSetLinkPrimitiveParamsFast(21,PutAwayLoc);llSetLinkPrimitiveParamsFast(20,PutAwayLoc);
llSetLinkPrimitiveParamsFast(19,PutAwayLoc);llSetLinkPrimitiveParamsFast(18,PutAwayLoc);}
PutAway1(){
llSetLinkPrimitiveParamsFast(16,PutAwayLoc);llSetLinkPrimitiveParamsFast(14,PutAwayLoc);llSetLinkPrimitiveParamsFast(15,PutAwayLoc);}
PutAway2(){
llSetLinkPrimitiveParamsFast(27,PutAwayLoc);llSetLinkPrimitiveParamsFast(26,PutAwayLoc);
llSetLinkPrimitiveParamsFast(25,PutAwayLoc);llSetLinkPrimitiveParamsFast(24,PutAwayLoc);
llSetLinkPrimitiveParamsFast(23,PutAwayLoc);llSetLinkPrimitiveParamsFast(22,PutAwayLoc);
llSetLinkPrimitiveParamsFast(21,PutAwayLoc);llSetLinkPrimitiveParamsFast(20,PutAwayLoc);
llSetLinkPrimitiveParamsFast(19,PutAwayLoc);llSetLinkPrimitiveParamsFast(18,PutAwayLoc);
llSetLinkPrimitiveParamsFast(16,PutAwayLoc);llSetLinkPrimitiveParamsFast(9,PutAwayLoc);
llSetLinkPrimitiveParamsFast(10,PutAwayLoc);llSetLinkPrimitiveParamsFast(11,PutAwayLoc);
llSetLinkPrimitiveParamsFast(7,PutAwayLoc);llSetLinkPrimitiveParamsFast(6,PutAwayLoc);
llSetLinkPrimitiveParamsFast(5,PutAwayLoc);}
ArwLeftClick(){
list GlaArwLeft =[PRIM_POSITION,<0.00070, -0.14540, -0.03931>];list SupArwLeft =[PRIM_POSITION, <0.00070, 0.01673, -0.06006>];
llSetLinkPrimitiveParamsFast(8, InfoSup);llSetLinkPrimitiveParamsFast(16, GlaArwLeft);llSetLinkPrimitiveParamsFast(14, SupArwLeft);llSleep(2);DefaultLoc();}
ArwRightClick(){
list GlaArwRight =[PRIM_POSITION,<0.00070, 0.12634, -0.03931>];list SetArwRight =[PRIM_POSITION,<0.00070, -0.04327, -0.06006>];
llSetLinkPrimitiveParamsFast(8, InfoSet);llSetLinkPrimitiveParamsFast(16, GlaArwRight);llSetLinkPrimitiveParamsFast(15, SetArwRight);llSleep(2);DefaultLoc();}
MatPge1(){TEST =TRUE;
list Mat1=[PRIM_POSITION,<0.00070,-0.27504,-0.10517>,PRIM_TEXTURE,2,"2db8af2c-6775-ff77-003e-685dc67876f7",<1,1,0>,<0,0,0>,0];
list Mat2=[PRIM_POSITION,<0.00070,-0.21651,-0.10517>,PRIM_TEXTURE,2,"83fc671b-6e13-d991-86b0-da1e489ab418",<1,1,0>,<0,0,0>,0];
list Mat3=[PRIM_POSITION,<0.00070,-0.15710,-0.10517>,PRIM_TEXTURE,2,"33c65133-d521-4d60-bc37-79e90bf1bad6",<1,1,0>,<0,0,0>,0];
list Mat4=[PRIM_POSITION,<0.00070,-0.09844,-0.10517>,PRIM_TEXTURE,2,"62d002a7-8ddf-944f-d02a-60e315aab374",<1,1,0>,<0,0,0>,0];
list Mat5=[PRIM_POSITION,<0.00070,-0.03848,-0.10517>,PRIM_TEXTURE,2,"f61604ca-9bf4-d40f-f5c9-5cfee97c55d7",<1,1,0>,<0,0,0>,0];
list Mat6=[PRIM_POSITION,<0.00070,0.02035,-0.10517>,PRIM_TEXTURE,2,"71ce6ee2-15ae-9cd1-3d90-862beef24dbf",<1,1,0>,<0,0,0>,0];
list Mat7=[PRIM_POSITION,<0.00070,0.08031,-0.10517>,PRIM_TEXTURE,2,"f5f8da83-99ee-357c-cd4a-d033a3133c5d",<1,1,0>,<0,0,0>,0];
list Mat8=[PRIM_POSITION,<0.00070,0.14107,-0.10517>,PRIM_TEXTURE,2,"a697cc06-5fd1-f07e-8a24-be58ba3724f8",<1,1,0>,<0,0,0>,0];
list Mat9=[PRIM_POSITION,<0.00070,0.20113,-0.10517>,PRIM_TEXTURE,2,"d2007209-df1b-4c47-1ffe-db69c8d0e8e1",<1,1,0>,<0,0,0>,0];
list Mat10=[PRIM_POSITION,<0.00070,0.26119,-0.10517>,PRIM_TEXTURE,2,"ea4e6d6a-9715-a6f4-82bc-dde905dde70f",<1,1,0>,<0,0,0>,0];
llSetLinkAlpha(12,0.15,ALL_SIDES);llSetLinkAlpha(13,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(27,Mat1);llSetLinkPrimitiveParamsFast(26,Mat2);
llSetLinkPrimitiveParamsFast(25,Mat3);llSetLinkPrimitiveParamsFast(24,Mat4);
llSetLinkPrimitiveParamsFast(23,Mat5);llSetLinkPrimitiveParamsFast(22,Mat6);
llSetLinkPrimitiveParamsFast(21,Mat7);llSetLinkPrimitiveParamsFast(20,Mat8);
llSetLinkPrimitiveParamsFast(19,Mat9);llSetLinkPrimitiveParamsFast(18,Mat10);}
MatPge2(){TEST =FALSE;
list Mat11=[PRIM_POSITION,<0.00070,-0.27504,-0.10517>,PRIM_TEXTURE,2,"e0c1eae9-6da1-2026-532d-b78be84750f9",<1,1,0>,<0,0,0>,0];
list Mat12=[PRIM_POSITION,<0.00070,-0.21651,-0.10517>,PRIM_TEXTURE,2,"1edb35e6-c288-6faa-6813-653ddc854bbc",<1,1,0>,<0,0,0>,0];
list Mat13=[PRIM_POSITION,<0.00070,-0.15710,-0.10517>,PRIM_TEXTURE,2,"bcc92f6f-f623-5c8c-c14f-c40d7dd80c67",<1,1,0>,<0,0,0>,0];
list Mat14=[PRIM_POSITION,<0.00070,-0.09844,-0.10517>,PRIM_TEXTURE,2,"31267165-acdf-cd12-6e26-f43e7b9742df",<1,1,0>,<0,0,0>,0];
list Mat15=[PRIM_POSITION,<0.00070,-0.03848,-0.10517>,PRIM_TEXTURE,2,"968914b6-9670-b587-19e5-97aa6258eb58",<1,1,0>,<0,0,0>,0];
list Mat16=[PRIM_POSITION,<0.00070,0.02035,-0.10517>,PRIM_TEXTURE,2,"ba5853a7-04e6-d1bb-a101-0be9a876f23d",<1,1,0>,<0,0,0>,0];
list Mat17=[PRIM_POSITION,<0.00070,0.08031,-0.10517>,PRIM_TEXTURE,2,"1264e7b6-ce9f-7d42-2621-0ee049f754c8",<1,1,0>,<0,0,0>,0];
list Mat18=[PRIM_POSITION,<0.00070,0.14107,-0.10517>,PRIM_TEXTURE,2,"975a06c7-9126-5b1e-0f85-da01d4fff930",<1,1,0>,<0,0,0>,0];
list Mat19=[PRIM_POSITION,<0.00070,0.20113,-0.10517>,PRIM_TEXTURE,2,"d2843c95-e47f-bb9e-3118-23b2c89692e3",<1,1,0>,<0,0,0>,0];
list Mat20=[PRIM_POSITION,<0.00070,0.26119,-0.10517>,PRIM_TEXTURE,2,"eefac5a4-2a84-92f2-1513-c66df7ed4184",<1,1,0>,<0,0,0>,0];
llSetLinkAlpha(12,1,ALL_SIDES);llSetLinkAlpha(13,0.15,ALL_SIDES);
llSetLinkPrimitiveParamsFast(27,Mat11);llSetLinkPrimitiveParamsFast(26,Mat12);
llSetLinkPrimitiveParamsFast(25,Mat13);llSetLinkPrimitiveParamsFast(24,Mat14);
llSetLinkPrimitiveParamsFast(23,Mat15);llSetLinkPrimitiveParamsFast(22,Mat16);
llSetLinkPrimitiveParamsFast(21,Mat17);llSetLinkPrimitiveParamsFast(20,Mat18);
llSetLinkPrimitiveParamsFast(19,Mat19);llSetLinkPrimitiveParamsFast(18,Mat20);}
LensPge(){
list FrameLoc =[PRIM_POSITION,<0.00070,-0.19664,-0.04680>];list LensLoc =[PRIM_POSITION,<0.00070,-0.06864,-0.04721>];list SidesLoc =[PRIM_POSITION,<0.00070,0.05911,-0.04721>];list FullSetLoc =[PRIM_POSITION,<0.00070,0.18793,-0.04770>];
list BaseSelect =[PRIM_POSITION,<0.00000, -0.40508, 0.30073>,PRIM_SIZE,<0.01000, 0.79650, 0.38965>,PRIM_TEXTURE, 2,"8c828f3b-9f3a-5605-97a0-17e58c494d28",<1,1,0>, <0,0,0>,0];
llSetLinkPrimitiveParamsFast(1, BaseSelect);llSetLinkPrimitiveParamsFast(11,FrameLoc);
llSetLinkPrimitiveParamsFast(10,SidesLoc);llSetLinkPrimitiveParamsFast(9,LensLoc);
llSetLinkPrimitiveParamsFast(5,FullSetLoc);
llSetLinkAlpha(9,1,ALL_SIDES);llSetLinkAlpha(10,0.15,ALL_SIDES);
llSetLinkAlpha(11,0.15,ALL_SIDES);llSetLinkAlpha(5,0.15,ALL_SIDES);}
FramePge(){
list FrameLoc =[PRIM_POSITION,<0.00070,-0.19664,-0.04680>];list LensLoc =[PRIM_POSITION,<0.00070,-0.06864,-0.04721>];list SidesLoc =[PRIM_POSITION,<0.00070,0.05911,-0.04721>];list FullSetLoc =[PRIM_POSITION,<0.00070,0.18793,-0.04770>];
list BaseSelect =[PRIM_POSITION,<0.00000, -0.40508, 0.30073>,PRIM_SIZE,<0.01000, 0.79650, 0.38965>,PRIM_TEXTURE, 2,"8c828f3b-9f3a-5605-97a0-17e58c494d28",<1,1,0>, <0,0,0>,0];
llSetLinkPrimitiveParamsFast(1, BaseSelect);llSetLinkPrimitiveParamsFast(11,FrameLoc);
llSetLinkPrimitiveParamsFast(10,SidesLoc);llSetLinkPrimitiveParamsFast(9,LensLoc);
llSetLinkPrimitiveParamsFast(5,FullSetLoc);llSetLinkAlpha(10,0.15,ALL_SIDES);
llSetLinkAlpha(11,1,ALL_SIDES);llSetLinkAlpha(9,0.15,ALL_SIDES);
llSetLinkAlpha(8,1,ALL_SIDES);llSetLinkAlpha(5,0.15,ALL_SIDES);}
SidesPge(){
list FrameLoc =[PRIM_POSITION,<0.00070,-0.19664,-0.04680>];list LensLoc =[PRIM_POSITION,<0.00070,-0.06864,-0.04721>];list SidesLoc =[PRIM_POSITION,<0.00070,0.05911,-0.04721>];list FullSetLoc =[PRIM_POSITION,<0.00070,0.18793,-0.04770>];
list BaseSelect =[PRIM_POSITION,<0.00000, -0.40508, 0.30073>,PRIM_SIZE,<0.01000, 0.79650, 0.38965>,PRIM_TEXTURE, 2,"8c828f3b-9f3a-5605-97a0-17e58c494d28",<1,1,0>, <0,0,0>,0];
llSetLinkPrimitiveParamsFast(1, BaseSelect);llSetLinkPrimitiveParamsFast(11,FrameLoc);
llSetLinkPrimitiveParamsFast(10,SidesLoc);llSetLinkPrimitiveParamsFast(9,LensLoc);
llSetLinkPrimitiveParamsFast(5,FullSetLoc);
llSetLinkAlpha(10,1,ALL_SIDES);llSetLinkAlpha(11,0.15,ALL_SIDES);
llSetLinkAlpha(5,0.15,ALL_SIDES);llSetLinkAlpha(9,0.15,ALL_SIDES);}
FullSetPge(){
list FrameLoc =[PRIM_POSITION,<0.00070,-0.19664,-0.04680>];list LensLoc =[PRIM_POSITION,<0.00070,-0.06864,-0.04721>];list SidesLoc =[PRIM_POSITION,<0.00070,0.05911,-0.04721>];list FullSetLoc =[PRIM_POSITION,<0.00070,0.18793,-0.04770>];
list BaseSelect =[PRIM_POSITION,<0.00000, -0.40508, 0.30073>,PRIM_SIZE,<0.01000, 0.79650, 0.38965>,PRIM_TEXTURE, 2,"8c828f3b-9f3a-5605-97a0-17e58c494d28",<1,1,0>, <0,0,0>,0];
llSetLinkPrimitiveParamsFast(1, BaseSelect);llSetLinkPrimitiveParamsFast(11,FrameLoc);
llSetLinkPrimitiveParamsFast(10,SidesLoc);llSetLinkPrimitiveParamsFast(9,LensLoc);
llSetLinkPrimitiveParamsFast(5,FullSetLoc);
llSetLinkAlpha(5,1,ALL_SIDES);llSetLinkAlpha(11,0.15,ALL_SIDES);
llSetLinkAlpha(10,0.15,ALL_SIDES);llSetLinkAlpha(9,0.15,ALL_SIDES);}
SetOpt(){
list ResizeLoc =[PRIM_POSITION,<0.00070,-0.14708,-0.04633>];list TintLoc =[PRIM_POSITION,<0.00070,0.12397,-0.04631>];
llSetLinkPrimitiveParamsFast(8,InfoSet);
llSetLinkPrimitiveParamsFast(6,ResizeLoc);llSetLinkPrimitiveParamsFast(7,TintLoc);
llSetLinkPrimitiveParamsFast(27,PutAwayLoc);llSetLinkPrimitiveParamsFast(26,PutAwayLoc);
llSetLinkPrimitiveParamsFast(25,PutAwayLoc);llSetLinkPrimitiveParamsFast(24,PutAwayLoc);
llSetLinkPrimitiveParamsFast(23,PutAwayLoc);llSetLinkPrimitiveParamsFast(22,PutAwayLoc);
llSetLinkPrimitiveParamsFast(21,PutAwayLoc);llSetLinkPrimitiveParamsFast(20,PutAwayLoc);
llSetLinkPrimitiveParamsFast(19,PutAwayLoc);llSetLinkPrimitiveParamsFast(18,PutAwayLoc);
llSetLinkPrimitiveParamsFast(14,PutAwayLoc);llSetLinkPrimitiveParamsFast(15,PutAwayLoc);
llSetLinkPrimitiveParamsFast(16,PutAwayLoc);llSetLinkPrimitiveParamsFast(10,PutAwayLoc);
llSetLinkPrimitiveParamsFast(11,PutAwayLoc);llSetLinkPrimitiveParamsFast(12,PutAwayLoc);
llSetLinkPrimitiveParamsFast(13,PutAwayLoc);llSetLinkPrimitiveParamsFast(9,PutAwayLoc);
llSetLinkPrimitiveParamsFast(5,PutAwayLoc);}
///////[Matieral Select Opt]////
GlsOpt(){
list BaseLoc =[PRIM_POSITION,<0.00000,-0.40508,0.30073>,PRIM_SIZE,<0.01000,0.79650,0.38965>,PRIM_TEXTURE,2,"90402542-8e60-410f-c296-046361b12f17",<1,1,0>,<0,0,0>,0];list BtmNavLoc =[PRIM_POSITION,<-0.00600,-0.00860,-0.20420>,PRIM_SIZE,<0.01000, 0.73198, 0.05470>];
list HomeLoc2 =[PRIM_POSITION,<0.00070,0.23747,0.10753>];list MinLoc2 =[PRIM_POSITION,<0.00070,0.27950,0.10753>];
list FrameLoc =[PRIM_POSITION,<0.00070,-0.19664,-0.08267>];list LensLoc =[PRIM_POSITION,<0.00070,-0.06864,-0.08308>];
list SidesLoc =[PRIM_POSITION,<0.00070,0.05911,-0.08308>];list FullSetLoc =[PRIM_POSITION,<0.00070,0.18793,-0.08357>];
list ArwLeftLoc =[PRIM_POSITION,<0.00070,-0.32540,-0.07350>];list ArwRightLoc =[PRIM_POSITION,<0.00070,0.30946,-0.07430>];
list InfoBoxLoc =[PRIM_POSITION, <0.00070,-0.03124,-0.01157>,PRIM_SIZE,<0.01000,0.36244,0.02332>,PRIM_TEXTURE, 2,"4a7bf763-5e57-6f17-33af-ab6c08ca59d3",<1,1,0>,<0,0,0>,0];
llSetLinkPrimitiveParamsFast(2,HomeLoc2);llSetLinkPrimitiveParamsFast(4,MinLoc2);
llSetLinkPrimitiveParamsFast(1,BaseLoc);llSetLinkPrimitiveParamsFast(8,InfoBoxLoc);
llSetLinkPrimitiveParamsFast(17,BtmNavLoc);
llSetLinkPrimitiveParamsFast(12,ArwLeftLoc);llSetLinkAlpha(12,0.15,ALL_SIDES);
llSetLinkPrimitiveParamsFast(13,ArwRightLoc);llSetLinkAlpha(13,0.15,ALL_SIDES);
llSetLinkPrimitiveParamsFast(9,LensLoc);llSetLinkAlpha(9,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(10,SidesLoc);llSetLinkAlpha(10,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(11,FrameLoc);llSetLinkAlpha(11,1,ALL_SIDES);
llSetLinkPrimitiveParamsFast(5,FullSetLoc);llSetLinkAlpha(5,1,ALL_SIDES);}
string SetSlction(string name){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Resizer"){llRegionSay(Size,"ResMenu");}
if(comp == ".Tinting"){llRegionSay(Tint,"TintMenu");}return data;}
string OptSlction(string name){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Frames"){llSetLinkPrimitiveParamsFast(8,FrmInfo);state FrameMatState;}
if(comp == ".Sides"){llSetLinkPrimitiveParamsFast(8,SdsInfo);state SidesMatState;}
if(comp == ".GlsSets"){llSetLinkPrimitiveParamsFast(8,GlsInfo);state FullSetMatState;}
if(comp == ".Lens"){llSetLinkPrimitiveParamsFast(8,LenInfo);state LensMatState;}return data;}
string LensMat(string name){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Lens"){llSetLinkPrimitiveParamsFast(8,LenInfo);state LensMatState;}
if(comp == ".Sides"){llSetLinkPrimitiveParamsFast(8,SdsInfo);state SidesMatState;}
if(comp == ".Frames"){llSetLinkPrimitiveParamsFast(8,FrmInfo);state FrameMatState;}
if(comp == ".GlsSets"){llSetLinkPrimitiveParamsFast(8,GlsInfo);state FullSetMatState;}
if(comp == ".LeftArrow"){MatPge1();}
if(comp == ".RightArrow"){MatPge2();}return data;}
string SidesMat(string name){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Sides"){llSetLinkPrimitiveParamsFast(8,SdsInfo);state SidesMatState;}
if(comp == ".Lens"){llSetLinkPrimitiveParamsFast(8,LenInfo);state LensMatState;}
if(comp == ".Frames"){llSetLinkPrimitiveParamsFast(8,FrmInfo);state FrameMatState;}
if(comp == ".GlsSets"){llSetLinkPrimitiveParamsFast(8,GlsInfo);state FullSetMatState;}
if(comp == ".LeftArrow"){MatPge1();}
if(comp == ".RightArrow"){MatPge2();}
if(TEST == TRUE){
if(comp == ".Mat1"){llRegionSay(SidesRcv,"SdsMat1");}if(comp == ".Mat2"){llRegionSay(SidesRcv,"SdsMat2");}
if(comp == ".Mat3"){llRegionSay(SidesRcv,"SdsMat3");}if(comp == ".Mat4"){llRegionSay(SidesRcv,"SdsMat4");}
if(comp == ".Mat5"){llRegionSay(SidesRcv,"SdsMat5");}if(comp == ".Mat6"){llRegionSay(SidesRcv,"SdsMat6");}
if(comp == ".Mat7"){llRegionSay(SidesRcv,"SdsMat7");}if(comp == ".Mat8"){llRegionSay(SidesRcv,"SdsMat8");}
if(comp == ".Mat9"){llRegionSay(SidesRcv,"SdsMat9");}if(comp == ".Mat10"){llRegionSay(SidesRcv,"SdsMat10");}}
if(TEST == FALSE){
if(comp == ".Mat1"){llRegionSay(SidesRcv,"SdsMat11");}if(comp == ".Mat2"){llRegionSay(SidesRcv,"SdsMat12");}
if(comp == ".Mat3"){llRegionSay(SidesRcv,"SdsMat13");}if(comp == ".Mat4"){llRegionSay(SidesRcv,"SdsMat14");}
if(comp == ".Mat5"){llRegionSay(SidesRcv,"SdsMat15");}if(comp == ".Mat6"){llRegionSay(SidesRcv,"SdsMat16");}
if(comp == ".Mat7"){llRegionSay(SidesRcv,"SdsMat17");}if(comp == ".Mat8"){llRegionSay(SidesRcv,"SdsMat18");}
if(comp == ".Mat9"){llRegionSay(SidesRcv,"SdsMat19");}if(comp == ".Mat10"){llRegionSay(SidesRcv,"SdsMat20");}}return data;}
string FrameMat(string name){
string i;integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Frames"){llSetLinkPrimitiveParamsFast(8,FrmInfo);state FrameMatState;}
if(comp == ".Lens"){llSetLinkPrimitiveParamsFast(8,LenInfo);state LensMatState;}
if(comp == ".Sides"){llSetLinkPrimitiveParamsFast(8,SdsInfo);state SidesMatState;}
if(comp == ".GlsSets"){llSetLinkPrimitiveParamsFast(8,GlsInfo);state FullSetMatState;;}
if(comp == ".LeftArrow"){MatPge1();}
if(comp == ".RightArrow"){MatPge2();}
if(TEST == TRUE){
if(comp == ".Mat1"){llRegionSay(LenRcv,"FrmMat1");}if(comp == ".Mat2"){llRegionSay(LenRcv,"FrmMat2");}
if(comp == ".Mat3"){llRegionSay(LenRcv,"FrmMat3");}if(comp == ".Mat4"){llRegionSay(LenRcv,"FrmMat4");}
if(comp == ".Mat5"){llRegionSay(LenRcv,"FrmMat5");}if(comp == ".Mat6"){llRegionSay(LenRcv,"FrmMat6");}
if(comp == ".Mat7"){llRegionSay(LenRcv,"FrmMat7");}if(comp == ".Mat8"){llRegionSay(LenRcv,"FrmMat8");}
if(comp == ".Mat9"){llRegionSay(LenRcv,"FrmMat9");}if(comp == ".Mat10"){llRegionSay(LenRcv,"FrmMat10");}}
if(TEST == FALSE){
if(comp == ".Mat1"){llRegionSay(LenRcv,"FrmMat11");}if(comp == ".Mat2"){llRegionSay(LenRcv,"FrmMat12");}
if(comp == ".Mat3"){llRegionSay(LenRcv,"FrmMat13");}if(comp == ".Mat4"){llRegionSay(LenRcv,"FrmMat14");}
if(comp == ".Mat5"){llRegionSay(LenRcv,"FrmMat15");}if(comp == ".Mat6"){llRegionSay(LenRcv,"FrmMat16");}
if(comp == ".Mat7"){llRegionSay(LenRcv,"FrmMat17");}if(comp == ".Mat8"){llRegionSay(LenRcv,"FrmMat18");}
if(comp == ".Mat9"){llRegionSay(LenRcv,"FrmMat19");}if(comp == ".Mat10"){llRegionSay(LenRcv,"FrmMat20");}}return i;}
string FullSetMat(string name){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".GlsSets"){llSetLinkPrimitiveParamsFast(8,GlsInfo);state FullSetMatState;}
if(comp == ".Lens"){llSetLinkPrimitiveParamsFast(8,LenInfo);state LensMatState;}
if(comp == ".Frames"){llSetLinkPrimitiveParamsFast(8,FrmInfo);state FrameMatState;}
if(comp == ".Sides"){llSetLinkPrimitiveParamsFast(8,SdsInfo);state SidesMatState;}
if(comp == ".LeftArrow"){MatPge1();}
if(comp == ".RightArrow"){MatPge2();}
if(TEST == TRUE){
if(comp == ".Mat1"){llRegionSay(FullSetRCV,"FullMat1");}if(comp == ".Mat2"){llRegionSay(FullSetRCV,"FullMat2");}
if(comp == ".Mat3"){llRegionSay(FullSetRCV,"FullMat3");}if(comp == ".Mat4"){llRegionSay(FullSetRCV,"FullMat4");}
if(comp == ".Mat5"){llRegionSay(FullSetRCV,"FullMat5");}if(comp == ".Mat6"){llRegionSay(FullSetRCV,"FullMat6");}
if(comp == ".Mat7"){llRegionSay(FullSetRCV,"FullMat7");}if(comp == ".Mat8"){llRegionSay(FullSetRCV,"FullMat8");}
if(comp == ".Mat9"){llRegionSay(FullSetRCV,"FullMat9");}if(comp == ".Mat10"){llRegionSay(FullSetRCV,"FullMat10");}}
if(TEST == FALSE){
if(comp == ".Mat1"){llRegionSay(FullSetRCV,"FullMat11");}if(comp == ".Mat2"){llRegionSay(FullSetRCV,"FullMat12");}
if(comp == ".Mat3"){llRegionSay(FullSetRCV,"FullMat13");}if(comp == ".Mat4"){llRegionSay(FullSetRCV,"FullMat14");}
if(comp == ".Mat5"){llRegionSay(FullSetRCV,"FullMat15");}if(comp == ".Mat6"){llRegionSay(FullSetRCV,"FullMat16");}
if(comp == ".Mat7"){llRegionSay(FullSetRCV,"FullMat17");}if(comp == ".Mat8"){llRegionSay(FullSetRCV,"FullMat18");}
if(comp == ".Mat9"){llRegionSay(FullSetRCV,"FullMat19");}if(comp == ".Mat10"){llRegionSay(FullSetRCV,"FullMat20");}}return data;}
/////[Evereything Starts Here]///////
default
{
state_entry()
{
owner = llGetOwner();
Core = llRound(llFrand(10000000)) + 10;
LH = llListen(Core, "",owner,"");
llRequestPermissions(llGetOwner(), PERMISSION_TAKE_CONTROLS);}
run_time_permissions(integer perms){llTakeControls(CONTROL_FWD,TRUE,TRUE);}
attach(key attached){if (attached == llGetOwner()){DefaultLoc();}}
changed(integer ch){if(ch & CHANGED_INVENTORY){DefaultLoc();}}
touch_start(integer num_detected){
integer num = llDetectedLinkNumber(0);
string comp = llGetLinkName(num);
string ObjName = llGetObjectName();
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}
if(comp == ".Glasses"){GlsOpt();PutAway1();state OptsState;}
if(comp == ".Settings"){state SettingState;}
if(comp == ".Support"){llSay(0,"Sup");}
if(comp == ".LeftArrow"){ArwLeftClick();}
if(comp == ".RightArrow"){ArwRightClick();}}}
////////////[Ends ere!]////////////
state SettingState
{
state_entry(){SetOpt();}
changed(integer ch){if(ch & CHANGED_INVENTORY){DefaultLoc();}}
attach(key attached){if(attached == llGetOwner()){DefaultLoc();}}
touch_start(integer b){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
info = llGetLinkName(llDetectedLinkNumber(i)) +SetSlction(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}
state OptsState
{
attach(key attached){if (attached == llGetOwner()){DefaultLoc();}}
touch_start(integer b){
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
info = llGetLinkName(llDetectedLinkNumber(i)) +OptSlction(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}
state LensMatState
{
state_entry(){LensPge();MatPge1();}
attach(key attached){if (attached == llGetOwner()){DefaultLoc();}}
touch_start(integer b)
{
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
string ObjName = llGetObjectName();
info = llGetLinkName(llDetectedLinkNumber(i)) +LensMat(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}
state FrameMatState
{
state_entry(){FramePge();MatPge1();}
attach(key attached){if (attached == llGetOwner()){DefaultLoc();}}
changed(integer ch){if(ch & CHANGED_INVENTORY){DefaultLoc();}}
touch_start(integer b)
{
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
string ObjName = llGetObjectName();
info = llGetLinkName(llDetectedLinkNumber(i)) +FrameMat(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}
state SidesMatState
{
state_entry(){SidesPge();MatPge1();}
attach(key attached){if (attached == llGetOwner()){DefaultLoc();}}
changed(integer ch){if(ch & CHANGED_INVENTORY){DefaultLoc();}}
touch_start(integer b)
{
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
string ObjName = llGetObjectName();
info = llGetLinkName(llDetectedLinkNumber(i)) +SidesMat(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}
state FullSetMatState
{
state_entry(){FullSetPge();MatPge1();}
attach(key attached){if(attached == llGetOwner()){DefaultLoc();}}
changed(integer ch){if(ch & CHANGED_INVENTORY){DefaultLoc();}}
touch_start(integer b)
{
integer num = llDetectedLinkNumber(0);string comp = llGetLinkName(num);
string ObjName = llGetObjectName();
info = llGetLinkName(llDetectedLinkNumber(i)) +FullSetMat(info);
if(comp == ".Home"){DefaultLoc();}
if(comp == ".Min"){Minimise();}}}Would be really greatful if some one can help me out on this. Thanks