LlGetParcelFlags

De DigiWiki.

Version du 5 novembre 2013 à 14:10

// llGetParcelFlags v0.1 by djphil (BY-BC-SA)
 
default
{
    touch_start(integer total_number)
    {
        string TEXT;
        integer PARCEL_FLAGS = llGetParcelFlags(llGetPos());
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_FLY)
             TEXT += "\nPARCEL_FLAG_ALLOW_FLY > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_FLY > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_SCRIPTS)
             TEXT += "\nPARCEL_FLAG_ALLOW_SCRIPTS > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_SCRIPTS > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_LANDMARK)
             TEXT += "\nPARCEL_FLAG_ALLOW_LANDMARK > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_LANDMARK > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_TERRAFORM)
             TEXT += "\nPARCEL_FLAG_ALLOW_TERRAFORM > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_TERRAFORM > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_DAMAGE)
             TEXT += "\nPARCEL_FLAG_ALLOW_DAMAGE > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_DAMAGE > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_CREATE_OBJECTS)
              TEXT += "\nPARCEL_FLAG_ALLOW_CREATE_OBJECTS > YES";
        else  TEXT += "\nPARCEL_FLAG_ALLOW_CREATE_OBJECTS > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_USE_ACCESS_GROUP)
             TEXT += "\nPARCEL_FLAG_USE_ACCESS_GROUP > YES";
        else TEXT += "\nPARCEL_FLAG_USE_ACCESS_GROUP > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_USE_ACCESS_LIST)
             TEXT += "\nPARCEL_FLAG_USE_ACCESS_LIST > YES";
        else TEXT += "\nPARCEL_FLAG_USE_ACCESS_LIST > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_USE_BAN_LIST)
             TEXT += "\nPARCEL_FLAG_USE_BAN_LIST > YES";
        else TEXT += "\nPARCEL_FLAG_USE_BAN_LIST > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_USE_LAND_PASS_LIST)
             TEXT += "\nPARCEL_FLAG_USE_LAND_PASS_LIST > YES";
        else TEXT += "\nPARCEL_FLAG_USE_LAND_PASS_LIST > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_LOCAL_SOUND_ONLY)
             TEXT += "\nPARCEL_FLAG_LOCAL_SOUND_ONLY > YES";
        else TEXT += "\nPARCEL_FLAG_LOCAL_SOUND_ONLY > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_RESTRICT_PUSHOBJECT)
             TEXT += "\nPARCEL_FLAG_RESTRICT_PUSHOBJECT > YES";
        else TEXT += "\nPARCEL_FLAG_RESTRICT_PUSHOBJECT > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_GROUP_SCRIPTS)
             TEXT += "\nPARCEL_FLAG_ALLOW_GROUP_SCRIPTS > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_GROUP_SCRIPTS > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_CREATE_GROUP_OBJECTS)
             TEXT += "\nPARCEL_FLAG_ALLOW_CREATE_GROUP_OBJECTS > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_CREATE_GROUP_OBJECTS > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_ALL_OBJECT_ENTRY)
             TEXT += "\nPARCEL_FLAG_ALLOW_ALL_OBJECT_ENTRY > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_ALL_OBJECT_ENTRY > NO";
 
        if (PARCEL_FLAGS & PARCEL_FLAG_ALLOW_GROUP_OBJECT_ENTRY)
             TEXT += "\nPARCEL_FLAG_ALLOW_GROUP_OBJECT_ENTRY > YES";
        else TEXT += "\nPARCEL_FLAG_ALLOW_GROUP_OBJECT_ENTRY > NO";
        llOwnerSay(TEXT);
    }
}

if (!(llGetParcelFlags(llGetPos()) & PARCEL_FLAG_ALLOW_FLY))
    llSay(0,"You are not allowed to fly here!, Sorry!.");