Like

Get the F out

Platform:  mIRC
Published  Mar 30, 2009
Updated  Mar 30, 2009
425  6
someone gave me a WB script(this part is the menu) on irc and I created this...if the wb was someone on here's I'll be glad to give credit...its another simple random script that can be fun...gtfo is my response to stupid spammy wb's

for the on part, %parts.list is just the chans u want thise active on. On quit does the same in a quit msg

and thx for the suggestions, I edited a bit





Menu nicklist {
Get The fark Out:
.Add User:writeini GTFO.SYS.ini $1 Talk On | writeini GTFO.SYS.ini $1 GET_OUT $?="Enter GTFO Message"
.$iif(!$readini(gtfo.sys.ini, $1, get_out), $style(2)) Change GTFO for $1:writeini GTFO.SYS.ini $1 Get_Out $?="Enter New GTFO Message"
.$iif(!$readini(gtfo.sys.ini, $1, get_out), $style(2)) Remove GTFO for $1:$iif($?!"Are you sure you wan't to remove $1?" == $true,remini gtfo.sys.ini $1)
}

on *:part:#:{
if ($nick != $me)
if ( $chan isin %parts.list ) {
if ($readini(gtfo.sys.ini,$nick,Get_Out)) msg $chan 4*GTFO*1 $readini(gtfo.sys.ini, $nick, get_out) 4*GTFO*
else {
set %gtfo $r(1,20) {
if (%gtfo == 1) { msg $chan good riddens, $nick really freaks me right the fock out... }
if (%gtfo == 2) { msg $chan I'm gonna miss that guy... bye $nick $+ ... }
if (%gtfo == 3) { msg $chan It's a dark day when even $nick leaves us... }
if (%gtfo == 4) { msg $chan OMG, $nick is finally gone...come on out guys... }
if (%gtfo == 5) { msg $chan Damn, and I was gonna confess my love to $nick today...oh well... }
if (%gtfo == 6) { msg $chan $nick won't be gone long... $chan is like a drug... }
if (%gtfo == 7) { msg $chan $nick $+ , you can run, but you can't hide. }
if (%gtfo == 8) { msg $chan so, $nick $+ , you just gonna leave without so much as a kind farewell? }
if (%gtfo == 9) { msg $chan yeah, $nick $+ , you better GET RIGHT THE FOCK OUT!!!! }
if (%gtfo == 10) { msg $chan god, I hate $nick $+ ... }
else halt
}
}
}
}
}
on ^*:quit: {
if ($nick == $me) { halt }
else {
if ($nick ison #[place chan name here]) {
if ($chan isin %parts.list) {
if ($readini(gtfo.sys.ini,$nick,Get_Out)) msg $chan 4*GTFO*1 $readini(gtfo.sys.ini, $nick, get_out) 4*GTFO*
else {
set %gtfo $r(1,20) {
if (%gtfo == 1) { msg $chan good riddance, $nick really freaks me right the fock out... }
if (%gtfo == 2) { msg $chan I'm gonna miss that guy... bye $nick $+ ... }
if (%gtfo == 3) { msg $chan It's a dark day when even $nick leaves us... }
if (%gtfo == 4) { msg $chan OMG, $nick is finally gone...come on out guys... }
if (%gtfo == 5) { msg $chan Damn, and I was gonna confess my love to $nick today...oh well... }
if (%gtfo == 6) { msg $chan $nick won't be gone long... $chan is like a drug... }
if (%gtfo == 7) { msg $chan $nick $+ , you can run, but you can't hide. }
if (%gtfo == 8) { msg $chan so, $nick $+ , you just gonna leave without so much as a kind farewell? }
if (%gtfo == 9) { msg $chan yeah, $nick $+ , you better GET RIGHT THE FOCK OUT!!!! }
if (%gtfo == 10) { msg $chan god, I hate $nick $+ ... }
else halt
}
}
}
}
}
}

Comments

Sign in to comment.
xero_art   -  Mar 30, 2009
I don't like txt files unless its alot...its easier for me to add and edited them...same reason I prefer not to use tokens
 Respond  
knoeki   -  Mar 30, 2009

Quote

To me, I don't fancy text files all over my directory.


that's why you give scripts like that their own dir. also, bigger scripts of multiple files: make a seperate data dir...
 Respond  
Jethro   -  Mar 30, 2009
To me, I don't fancy text files all over my directory. Besides, that aren't too many words to be included in script...unless the script itself gets really, really big in size.
 Respond  
Kirby   -  Mar 30, 2009
Yes, reading .txt files work well too.

I'll assume that you (xero_art) that you'll call it gtfo.txt.
You can save lots of room by using

Code

 
, in the coding itself.
 Respond  
The_Almighty_Duelist   -  Mar 30, 2009
why not just put all the messages in a .txt file have a $read(.txt) so it reads a random line every time that you can add on to.
 Respond  
Kirby   -  Mar 30, 2009
Those are quite mean channel messages. :d

For

Code

 
and

Code

 
, they weren't found anywhere else in this script, therefore irrelevant.

For the other "random kick message" part, you can simply use /var with tokens instead of using /set with $rand.

For example,

Code

 
can be replaced with:

Code

 
.

Code

 
can be also be rewritten as

Code

 
, since there are 10 kick messages in total.

Use /help Token Identifiers for more information on tokens..

Needless to say, the halts are unecessary, and

Code

 
can be changed to

Code

 
 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.