string Title = "llAbs";

integer channel = 1;

integer runFunctionTest()
{
    return 4 == llAbs(-4);
}

default
{
    state_entry()
    {
        // listen on channel zero for any chat spoken by the object owner.
        llSetObjectName(Title);
        llSetText(Title, <1.0,1.0,1.0>,1.0);
        llListen(channel,"","","");
    }

    listen(integer channel, string name, key id, string message)
    {
        if (llToLower(message) == "test")
        {
            integer results = runFunctionTest();
            if (results)
                llSetText("Good " + Title, <0.0,1.0,0.0>,1.0);
            else
                llSetText("Bad " + Title, <0.0,1.0,0.0>,1.0);

            llShout(channel + 1, (string)results);
        }
    }
}