// Myriad_Lite_Region_Settings_Client-v0.0.3-20120810.lsl
// Copyright (c) 2012 by Allen Kerensky (OSG/SL) All Rights Reserved.
// This work is dual-licensed under
// Creative Commons Attribution (CC BY) 3.0 Unported
// http://creativecommons.org/licenses/by/3.0/
// - or -
// Modified BSD License (3-clause)
// Redistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are met:
// * Redistributions of source code must retain the above copyright notice, 
//   this list of conditions and the following disclaimer.
// * Redistributions in binary form must reproduce the above copyright notice,
//   this list of conditions and the following disclaimer in the documentation
//   and/or other materials provided with the distribution.
// * Neither the name of Myriad Lite nor the names of its contributors may be
//   used to endorse or promote products derived from this software without
//   specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY THE DEVELOPERS ``AS IS'' AND ANY EXPRESS OR
// IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
// OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN
// NO EVENT SHALL THE CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT,
// INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
// NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
// THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
//
// The Myriad RPG System was designed, written, and illustrated by Ashok Desai
// Myriad RPG System licensed under:
// Creative Commons Attribution (CC BY) 2.0 UK: England and Wales
// http://creativecommons.org/licenses/by/2.0/uk/
 
string  VERSION = "0.0.3"; // version number
string  VERDATE = "20120810"; // version date
 
integer dynchan;
 
default {
    state_entry() {
        llSetText("Client: Region",<1,1,1>,1);
        dynchan = (integer)("0x"+llGetSubString((string)llGetKey(),0,6));
        llListen(dynchan,"",NULL_KEY,"");
        llListen(-999,"",NULL_KEY,"");    
        llRegionSay(-999,"LIST_REGION_SETTINGS");
    }
 
    touch_start(integer touched) {
        touched = 0; // LSLINT
        llRegionSay(-999,"LIST_REGION_SETTINGS");    
        llRegionSay(-999,"GET_REGION_SETTING|SETTINGS");
        llRegionSay(-999,"GET_REGION_SETTING|ESTATE");
        llRegionSay(-999,"GET_REGION_SETTING|ESTATEOWNER");
        llRegionSay(-999,"GET_REGION_SETTING|DEATHPOINT");
        llRegionSay(-999,"GET_REGION_SETTING|RESPAWNPOINT");
        llRegionSay(-999,"GET_REGION_SETTING|GENERATORS");
        llRegionSay(-999,"GET_REGION_SETTING|PROGRESSION");
        llRegionSay(-999,"GET_REGION_SETTING|POINT_POOLS");
        llRegionSay(-999,"GET_REGION_SETTING|STATISTICS");
        llRegionSay(-999,"GET_REGION_SETTING|RESILIENCES");
        llRegionSay(-999,"GET_REGION_SETTING|SKILLS");
        llRegionSay(-999,"GET_REGION_SETTING|GENRES");
        llRegionSay(-999,"GET_REGION_SETTING|BOONS");
        llRegionSay(-999,"GET_REGION_SETTING|SPECIES_BOONS");
        llRegionSay(-999,"GET_REGION_SETTING|FLAWS");
        llRegionSay(-999,"GET_REGION_SETTING|SPECIES_FLAWS");
        llRegionSay(-999,"GET_REGION_SETTING|MORTAL_EFFECTS");
        llRegionSay(-999,"GET_REGION_SETTING|SOCIAL_EFFECTS");
        llRegionSay(-999,"GET_REGION_SETTING|MAGIC_EFFECTS");
        llRegionSay(-999,"GET_REGION_SETTING|VEHICLE_EFFECTS");
        llRegionSay(-999,"GET_REGION_SETTING|SPECIES");
        llRegionSay(-999,"GET_REGION_SETTING|BACKGROUNDS");
        llRegionSay(-999,"GET_REGION_SETTING|CAREERS");
        llRegionSay(-999,"GET_REGION_SETTING|EQUIPMENT");        
        llRegionSay(-999,"GET_REGION_SETTING|Xyzzy");
    }
 
    listen(integer channel,string name,key id,string msg) {
        name = ""; // LSLINT
        id = NULL_KEY; // LSLINT
        if ( llSubStringIndex(msg,"REGION_SETTING") >= 0 ) {
            llSay(PUBLIC_CHANNEL,(string)channel+": "+msg);
        }
    }
}