/tg/Station 13

Code: Select all

//recursive implode function, takes a vector and
//combines each member into a string with a space to separate
//by perogi
def implode($vector)
{
   $str = at($vector, 1);
   remove($vector, $str);
   if(length($vector) > 0) 
   {
      $str += " ";
      $str += implode($vector);
   }
   return $str;
}
//mute and unmute function
//use: type /mute or /unmute then the name of the person exactly as it is spelled
//by perogi

$exp = explode($content, " ");

if($source == "YOUR NAME HERE") //only the name in this line can use script
{

   if(at($exp, 1) == "/mute")
   {
      remove($exp, "/mute");
      $name = implode($exp);
      $pass = 0;
      mem($name,$name);
   }
   
   if(at($exp,1) == "/unmute")
   {
      $pass = 0;
      remove($exp, "/unmute");
      $muteremove = implode($exp);
      mem($muteremove, 0);
   }
}
//checks if source is muted
//possible to get around mute by taking off ID and being unknown, hence why unknowns are all blocked
if($source == mem($source) || $source == "Unknown")
{
   $pass = 0;
}