default
{
    state_entry()
    {
        llSetText("llGetLinkName test\nTouch to retrieve the name of each prim in the set.", <1,1,1>, 1);
    }
 
    touch_start(integer total_number)
    {
       integer links = 7;
        while (links > -1)
        {
           llSay(0, llGetLinkName(links) + " is link: " + (string)links);
           --links;
        }
    }
}