//////////////////////////////////////////////////////////
//     WaS (c) grimore.org - 2012, License: GPLv3              //
// Please see: http://www.gnu.org/licenses/gpl.html     //
// for legal details, rights of fair usage and          //
// the disclaimer and warranty conditions.              //
//////////////////////////////////////////////////////////

default
{
    state_entry() {
        integer comChannel = ((integer)("0x"+llGetSubString((string)llGetOwner(),-8,-1)) & 0x3FFFFFFF) ^ 0xBFFFFFFF;
        llListen(comChannel, "", "", "");
    }

    listen(integer chan, string name, key id, string mes) {
        if(mes == "EAT," + llGetObjectDesc()) jump die;
        if(mes == "CLR") jump die;
        return;
@die;
        llDie();
    }
    on_rez(integer param) {
        llSetObjectDesc((string)param);
        llResetScript();
    }
}