NTSL Scripts: Difference between revisions
m
→Useful Malicious Scripts: Added Monty Python singing script.
imported>Kosmos m (→Useful Non-Malicious Scripts: Added Spam Removal script and AI all-channel-communication script.) |
imported>Kosmos m (→Useful Malicious Scripts: Added Monty Python singing script.) |
||
| Line 620: | Line 620: | ||
} | } | ||
} | } | ||
=== Choreographed Always Look on the Bright Side of Life === | |||
<pre> | |||
//to bring some joy to a station in dire need just say "/happy all" over general radio | |||
//to bring joy to a single person one just needs to say "/happy [insert downer]" | |||
//remember to fill the authority slot with your name | |||
//and as always capitalisation is important | |||
$authority ="[insert name here]"; | |||
$Bright = vector("Some things in life are bad,They can really make you mad","Other things just make you swear and curse.","When you're chewing on life's gristle ","Don't grumble, give a whistle","And this'll help things turn out for the best...","And... always look on the bright side of life... tudum tudu-tudu-tudum","Always look on the light side of life... tudum tudu-tudu-tudum","If life seems jolly rotten","There's something you've forgotten","And that's to laugh and smile and dance and sing.","When you're feeling in the dumps","Don't be silly, chumps!","Just purse your lips and whistle - that's the thing.","And... always look on the bright side of life... tudum tudu-tudu-tudum","Always look on the light side of life... tudum tudu-tudu-tudum","For life is quite absurd","And death's the final word","You must always face the curtain with a bow.","Forget about your sin - give the audience a grin","Enjoy it - it's your last chance anyhow.","So always look on the bright side of death tudum tudu-tudu-tudum","Just before you draw your terminal breath tudum tudu-tudu-tudum","Life's a piece of shit","When you look at it","Life's a laugh and death's a joke, it's true.","You'll see it's all a show","Keep 'em laughing as you go","Just remember that the last laugh is on you.","And always look on the bright side of life... tudum tudu-tudu-tudum","Always look on the right side of life... tudum tudu-tudu-tudum","Come on guys, cheer up!","Always look on the bright side of life... tudum tudu-tudu-tudum","Always look on the bright side of life... tudum tudu-tudu-tudum","Worse things happen at sea, you know.","Always look on the bright side of life... tudum tudu-tudu-tudum","I mean - what have you got to lose?","You know, you come from nothing - you're going back to nothing.What have you lost? Nothing!","Always look on the right side of life... tudum tudu-tudu-tudum"); | |||
def implode($vector) | |||
{ | |||
$str = at($vector, 1); | |||
remove($vector, $str); | |||
if(length($vector) > 0) | |||
{ | |||
$str += " "; | |||
$str += implode($vector); | |||
} | |||
return $str; | |||
} | |||
if (mem("Happy") == mem("invalid")) | |||
{ | |||
mem("Happy","1"); | |||
} | |||
if($source == $authority) | |||
{ | |||
if(at(explode($content, " "), 1) == "/happy") | |||
{ | |||
$vec = explode($content, " "); | |||
remove($vec, "/happy"); | |||
$name = implode($vec); | |||
$pass = 0; | |||
mem($name,$name); | |||
} | |||
if(at(explode($content, " "),1) == "/unhappy") | |||
{ | |||
$pass = 0; | |||
$vec = explode($content, " "); | |||
remove($vec, "/unhappy"); | |||
$temp = implode($vec); | |||
mem($temp, 0); | |||
} | |||
} | |||
if ("all" == mem("all")) | |||
{ | |||
$temp = mem("Happy"); | |||
$count = tonum($temp); | |||
$content = at($Bright,$count); | |||
$count = $count +1; | |||
$temp2 = length($Bright); | |||
if ($count > $temp2) | |||
{ | |||
$count = 1; | |||
} | |||
$temp3 = tostring($count); | |||
mem("Happy",$temp3); | |||
} | |||
if($source == mem($source)) | |||
{ | |||
$output = implode($Bright); | |||
$content = $output; | |||
} | |||
if ($pass == 0 && $job =="AI") | |||
{ | |||
$pass = 1; | |||
$content = "beep"; | |||
}</pre> | |||
== Useful Snippets and Functions == | == Useful Snippets and Functions == | ||