User:Allen Kerensky/Myriad Lite Preview 5/Point Pools Client
From OpenSimulator
< User:Allen Kerensky | Myriad Lite Preview 5(Redirected from User:Allen Kerensky:Myriad Lite Preview 5:Point Pools Client)
Myriad Lite Point Pools Client
Myriad_Lite_Point_Pools_Client-v0.0.0-20110928.lsl
// Myriad_Lite_Point_Pools_Client-v0.0.0-20110928.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("Client: Point Pools",<1,1,1>,1); dynchan = (integer)("0x"+llGetSubString((string)llGetKey(),0,6)); llListen(dynchan,"",NULL_KEY,""); llListen(-999,"",NULL_KEY,""); llRegionSay(-999,"LIST_POINT_POOLS"); } touch_start(integer touched) { touched = 0; // LSLINT llRegionSay(-999,"LIST_POINT_POOLS"); llRegionSay(-999,"GET_POINT_POOL|Mundane"); llRegionSay(-999,"GET_POINT_POOL|Heroic"); llRegionSay(-999,"GET_POINT_POOL|Godlike"); llRegionSay(-999,"GET_POINT_POOL|Xyzzy"); } listen(integer channel,string name,key id,string msg) { name = ""; // LSLINT id = NULL_KEY; // LSLINT if ( llSubStringIndex(msg,"POINT_POOL") >= 0 ) { llSay(PUBLIC_CHANNEL,(string)channel+": "+msg); } } }