MYRIAD LITE SKILL CLIENT

This tests listing skills from a region server.

- update for RENDEZVOUS2 region channel.

// Myriad_Lite_Skill_Client-v0.0.0-20111006.lsl
// The Myriad RPG System was designed, written, and illustrated by Ashok Desai
// Myriad RPG licensed under the Creative Commons Attribution 2.0 UK: England and Wales
// http://creativecommons.org/licenses/by/2.0/uk/
// Myriad Lite software Copyright (c) 2011 by Allen Kerensky (OSG/SL)
// Myriad Lite licensed under the
// Creative Commons Attribution-Share Alike-Non-Commercial 3.0 Unported
// http://creativecommons.org/licenses/by-nc-sa/3.0/
 
integer dynchan;
default {
    state_entry() {
        llSetText("Preview 5\nSkills Server\nTest Client",<1,1,1>,1);
        dynchan = (integer)("0x"+llGetSubString((string)llGetKey(),0,6));
        llListen(dynchan,"",NULL_KEY,"");
        llListen(-999,"",NULL_KEY,"");    
        llRegionSay(-999,"LIST_SKILLS");
    }
 
    touch_start(integer touched) {
        touched = 0; // LSLINT
        llRegionSay(-999,"LIST_SKILLS");    
        llRegionSay(-999,"GET_SKILL|Arts and Crafts");
        llRegionSay(-999,"GET_SKILL|Athletics");
        llRegionSay(-999,"GET_SKILL|Close Combat");
        llRegionSay(-999,"GET_SKILL|Deceit");
        llRegionSay(-999,"GET_SKILL|Geography");
        llRegionSay(-999,"GET_SKILL|History");
        llRegionSay(-999,"GET_SKILL|Linguistics");
        llRegionSay(-999,"GET_SKILL|Medic");
        llRegionSay(-999,"GET_SKILL|Perception");
        llRegionSay(-999,"GET_SKILL|Persuasion");
        llRegionSay(-999,"GET_SKILL|Ranged Combat");
        llRegionSay(-999,"GET_SKILL|Stealth");
        llRegionSay(-999,"GET_SKILL|Alchemy");
        llRegionSay(-999,"GET_SKILL|Engineering");
        llRegionSay(-999,"GET_SKILL|Falconry");
        llRegionSay(-999,"GET_SKILL|Ride Land Animals");
        llRegionSay(-999,"GET_SKILL|Computing");
        llRegionSay(-999,"GET_SKILL|Drive (cars and boats)");
        llRegionSay(-999,"GET_SKILL|Electronics");
        llRegionSay(-999,"GET_SKILL|Pilot (aircraft)");
        llRegionSay(-999,"GET_SKILL|Science");
        llRegionSay(-999,"GET_SKILL|Astronavigation");
        llRegionSay(-999,"GET_SKILL|Cybernetics");
        llRegionSay(-999,"GET_SKILL|Pilot (spacecraft)");
        llRegionSay(-999,"GET_SKILL|Robotics");
        llRegionSay(-999,"GET_SKILL|Magical Lore");
        llRegionSay(-999,"GET_SKILL|Ride Flying Animals");
        llRegionSay(-999,"GET_SKILL|Spell Casting");
        llRegionSay(-999,"GET_SKILL|Invent High-Tech Gizmo");
        llRegionSay(-999,"GET_SKILL|Psychic Powers");
        llRegionSay(-999,"GET_SKILL|Faith (any religion)");
        llRegionSay(-999,"GET_SKILL|Occult Lore");
        llRegionSay(-999,"GET_SKILL|Ritualistic Magic");
        llRegionSay(-999,"GET_SKILL|Xyzzy");    
    }
 
    listen(integer channel,string name,key id,string msg) {
        name = ""; // LSLINT
        id = NULL_KEY; // LSLINT
        if ( llSubStringIndex(msg,"SKILL") >= 0 ) {
            llSay(PUBLIC_CHANNEL,(string)channel+": "+msg);
        }
    }
}