string sym=" !\"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`abcdefghijklmnopqrstuvwxyz{|}~";
default
{
    state_entry()
    {
        llSay(0, "Hello, Avatar!");
    }

    link_message(integer sender_num, integer num, string message, key id)
    {
        integer link=2;
        integer x;
        integer face;
       // string message="Hello World, This is a t";
        do
        {

           integer index1=llSubStringIndex(sym,llGetSubString(message,x,x));
        integer trow1=(index1 / 10);
         integer tcol1 = index1 - (trow1 * 10);
         float trowo1=.45-(.1*trow1);
         float tcolo1=-.45+(.1*tcol1);


        llSetLinkPrimitiveParamsFast(link,[PRIM_TEXTURE,face,"67bc74fe-78e3-5840-432f-8bd1325fd5ca",<.1,.1,0>,<tcolo1,trowo1,0>,0]);
        x=x+1;
        face=face+1;
        if (face==8)
        {
            face=0;
            link=link+1;
        }

    }while (x<llStringLength(message));
    face=0;
    link=1;
    }
}