Code: Select all
default
{
state_entry()
{
llSay(0, "Script running");
integer link;
integer links;
string linkname;
vector linksize;
vector linkpos;
rotation linkrot;
list linklist=[];
integer i=1;
links = llGetNumberOfPrims();
while (i <= links)
{
linkname = llGetLinkName(i);
linksize = llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_SIZE]),0);
linkpos = llList2Vector(llGetLinkPrimitiveParams(i,[PRIM_POS_LOCAL]),0);
linkrot = llList2Rot(llGetLinkPrimitiveParams(i,[PRIM_ROT_LOCAL]),0);
llSay(0,"Link Number: " + (string)i + " , Link Name: " + linkname + " , Link Size: " + (string)linksize + " , Link Position: " + (string)linkpos + " , Link Rotation: " + (string)linkrot );
linklist = linklist + llParseString2List("Link Number: " + (string)i + " , Link Name: " + linkname + " , Link Size: " + (string)linksize + " , Link Position: " + (string)linkpos + " , Link Rotation: " + (string)linkrot ,"","");
i = i+1;
}
// llSay(0,(string)linklist);
//NOTE: The osMakeNotecard function ONLY works for you if you are running it in an region you are either the estate owner or manager. If that is not the case where you are, simply comment the next line out with the two slashy characters like I did this comment.
osMakeNotecard(llGetLinkName(1),linklist);
llGiveInventory(llGetLinkName(i),llGetOwnerKey(llGetKey()));
}
}
}