vector initial;
vector current;
vector delta;
integer theFace;
key theTex;

setTextUV()
{
    llSetLinkPrimitiveParamsFast(LINK_THIS, [PRIM_TEXTURE, theFace, theTex, <1.0,1.0,0.0>, <0.5,0.5,0.0>-current, 0.0]);
}

parseTouch(integer total_number)
{
    integer i;

    for (i = 0; i < total_number; i++) {
        integer touchedFace = llDetectedTouchFace(i);
        vector touchedUV = llDetectedTouchUV(i);
        vector touchedST = llDetectedTouchST(i);

        if (touchedFace == -1) {
        }
        else {
            current = touchedST;
            setTextUV();
        } // if ...
    } // for ...

    vector touch_pos = llDetectedTouchPos(0);
    string display1 = "X = " + (string)touch_pos.x;
    string display2 = "Y = " + (string)touch_pos.y;

    vector offset = touch_pos - llGetRootPosition();
    rotation offset_rot = llList2Rot(llGetLinkPrimitiveParams(5, [PRIM_ROT_LOCAL]), 0);
    offset *= offset_rot;

    llSetLinkPrimitiveParamsFast(5, [PRIM_POS_LOCAL, offset]);
    llSay(0,(string)offset);
    llMessageLinked(2, 0, display1, "DISPLAY");
    llMessageLinked(3, 0, display2, "DISPLAY");
}

default
{
    state_entry()
    {
        llSay(0, "Hello, Avatar!");
    }

    touch_start(integer total_number)
    {
        integer i;
        for (i = 0; i < total_number; i++) {
            integer touchedFace = llDetectedTouchFace(i);
            vector touchedUV = llDetectedTouchUV(i);
            vector touchedST = llDetectedTouchST(i);

            if (touchedFace == -1) {
            }
            else {
                initial = touchedST;
                theFace = touchedFace;
                theTex = llGetTexture(theFace);
                parseTouch(total_number);
            } // if ...
        } // for ...
     }

    touch(integer total_number)
    {
        parseTouch(total_number);
    }

    touch_end(integer total_number)
    {
    }
}