User:Allen Kerensky/Myriad Lite Preview 5/Template Client
From OpenSimulator
< User:Allen Kerensky | Myriad Lite Preview 5(Redirected from User:Allen Kerensky:Myriad Lite Preview 5:Template Client)
Myriad Lite Template Client
Myriad_Lite_Template_Client-v0.0.0-20120116.lsl
// Myriad_Lite_Template_Client-v0.0.0-20120116.lsl // Copyright (c) 2012 By Allen Kerensky (OSG/SL) // 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-2012 by Allen Kerensky (OSG/SL) // Baroun's Adventure Machine Copyright (c) 2008-2011 by Baroun Tardis (SL) // Myriad Lite and Baroun's Adventure Machine licensed under the // Creative Commons Attribution-Share Alike-Non-Commercial 3.0 Unported // http://creativecommons.org/licenses/by-nc-sa/3.0/ // You must agree to the terms of this license before making any use of this software. // If you do not agree to this license, simply delete these materials. // There is no warranty, express or implied, for your use of these materials. integer dynchan; default { state_entry() { llSetText("Client: Templates",<1,1,1>,1); dynchan = (integer)("0x"+llGetSubString((string)llGetKey(),0,6)); llListen(dynchan,"",NULL_KEY,""); llListen(-999,"",NULL_KEY,""); llRegionSay(-999,"LIST_TEMPLATES"); } touch_start(integer touched) { touched = 0; // LSLINT llRegionSay(-999,"LIST_TEMPLATES"); // species first representing genetics llRegionSay(-999,"GET_TEMPLATE|Dragon Folk"); llRegionSay(-999,"GET_TEMPLATE|Dwarf"); llRegionSay(-999,"GET_TEMPLATE|Elf"); llRegionSay(-999,"GET_TEMPLATE|Human"); llRegionSay(-999,"GET_TEMPLATE|Leonine"); llRegionSay(-999,"GET_TEMPLATE|Magma Dweller"); llRegionSay(-999,"GET_TEMPLATE|Naga"); llRegionSay(-999,"GET_TEMPLATE|Ogre"); llRegionSay(-999,"GET_TEMPLATE|Robot"); llRegionSay(-999,"GET_TEMPLATE|Tonjala"); llRegionSay(-999,"GET_TEMPLATE|Vampire"); llRegionSay(-999,"GET_TEMPLATE|Werewolf"); // next backgrounds representing childhoods llRegionSay(-999,"GET_TEMPLATE|Apprentice"); llRegionSay(-999,"GET_TEMPLATE|Average Joe"); llRegionSay(-999,"GET_TEMPLATE|Cadet Driver"); llRegionSay(-999,"GET_TEMPLATE|Cadet Pilot"); llRegionSay(-999,"GET_TEMPLATE|Cadet Spacecraft Pilot"); llRegionSay(-999,"GET_TEMPLATE|Magician's Apprentice"); llRegionSay(-999,"GET_TEMPLATE|Noble Lineage"); llRegionSay(-999,"GET_TEMPLATE|Peasant Stock"); llRegionSay(-999,"GET_TEMPLATE|Rich Family (Deceitful)"); llRegionSay(-999,"GET_TEMPLATE|Rich Family (Persuasive)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Computing)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Electronics)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Engineering)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Faith)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Geography)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (History)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Linguistics)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Medic)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Occult Law)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Robotics)"); llRegionSay(-999,"GET_TEMPLATE|Scholar (Science)"); llRegionSay(-999,"GET_TEMPLATE|Spacer"); llRegionSay(-999,"GET_TEMPLATE|Street Rat"); llRegionSay(-999,"GET_TEMPLATE|Wastelander"); llRegionSay(-999,"GET_TEMPLATE|Wilderness Child (Graceful)"); llRegionSay(-999,"GET_TEMPLATE|Wilderness Child (Strong)"); // finally careers representing current job llRegionSay(-999,"GET_TEMPLATE|Cop"); llRegionSay(-999,"GET_TEMPLATE|Doctor"); llRegionSay(-999,"GET_TEMPLATE|Healer"); llRegionSay(-999,"GET_TEMPLATE|Mage"); llRegionSay(-999,"GET_TEMPLATE|Parapsychologist"); llRegionSay(-999,"GET_TEMPLATE|Pilot"); llRegionSay(-999,"GET_TEMPLATE|Private Investigator"); llRegionSay(-999,"GET_TEMPLATE|Rogue"); llRegionSay(-999,"GET_TEMPLATE|Scientist"); llRegionSay(-999,"GET_TEMPLATE|Soldier"); llRegionSay(-999,"GET_TEMPLATE|Spaceship Pilot"); llRegionSay(-999,"GET_TEMPLATE|Warrior"); // bogus name to test error reporting too llRegionSay(-999,"GET_TEMPLATE|Xyzzy"); } listen(integer channel,string name,key id,string msg) { name = ""; // LSLINT id = NULL_KEY; // LSLINT if ( llSubStringIndex(msg,"TEMPLATE") >= 0 ) { llSay(PUBLIC_CHANNEL,(string)channel+": "+msg); } } }