string parcel;
vector pos;
default
{
    state_entry()
    {
       list parc=llGetParcelDetails(llGetPos(), [PARCEL_DETAILS_NAME ] );
       pos=llGetPos();
       parcel=llList2String(parc,0);
       llSetTimerEvent(1);
    }

    touch_start(integer total_number)
    {
        llSay(0, (string)parcel);
    }
    timer()
    {
        list parc=llGetParcelDetails(llGetPos(), [PARCEL_DETAILS_NAME ] );
         string parcel2=llList2String(parc,0);

        if (parcel2!=parcel)
        {
            llSetRegionPos (pos);
             llSay(0, (string)parcel+"   "+(string)parcel2);
        }
    }

}