By napa182 on Jun 16, 2011This is a random Bash quote look up or look up by quote number socket.
Copy/Paste into a new remote of your bot, or you can place it into a new remote your own mIRC client.
Some of the quotes do contain foul language. So use in a room where you will not get banned for the use of foul language.
[b]Have fun with it, and like always go ahead an rip, trash, or set fire to this snippet any way you see fit.
I don't care.[/b]
Trigger is @bash or @bash
Example:
@bash <~Sick0> Looking Up :[Bash Quote #841]: Please wait... <~Sick0> :[BASH]: zophar was a trend <~Sick0> :[BASH]: it was hip to be with zophar <~Sick0> :[BASH]: till we all realized how gay he is@bash 842 <~Sick0> :[Bash Quote #842 does not exist.]: @bash 1578 <~Sick0> Looking Up :[Bash Quote #1578]: Please wait... <~Sick0> :[BASH]: we had a guy at school that wore black lipstick.. and was all gothy.. and then one day we caught him buying an assvibrator <~Sick0> :[BASH]: ew. <~Sick0> :[BASH]: wait, you "caught" him? <~Sick0> :[BASH]: like, you were behind him in line at the assvibrator store? <~Sick0> :[BASH]: he doesnt answer <~Sick0> :[BASH]: *** Quits: calin (No route to host) <~Sick0> @bash <~Sick0> Looking Up :[Bash Quote #181]: Please wait... <~Sick0> :[BASH]: (topanga) I HATE HAVING COMPUTER DREAMS. <~Sick0> @bash 382 <~Sick0> Looking Up :[Bash Quote #382]: Please wait... <~Sick0> :[BASH]: does anyone know anything about a program called instant spanish <~Sick0> :[BASH]: like if its any good <~Sick0> :[BASH]: just add water <~Sick0> :[BASH]: heh.. thought that said 'instant spinach' ```mirc alias -l bash { if (!$($+(%,#,bash),2)) { inc -u10 $+(%,#,bash) if ($sock($+(bash,#))) sockclose $+(bash,#) sockopen $+(bash,#) www.bash.org 80 sockmark $+(bash,#) $+(/?,$iif($1,$1,random)) msg # } } on *:load: { echo 12 -a You Have Just Loaded Napa182's Bash Quote Socket echo 07 -a A irc.EzzyChat.com Production echo -a 08!!04WARNING08 This snippet may04/08will say curse04/08foul words 04WARNING08!! } on *:input:#:if ($regex($1-,/^@bash?\s?(\d+)?$/iS)) bash $iif($regml(1),$v1) on $*:text:/^@bash?\s?(\d+)?$/iS:#:bash $iif($regml(1),$v1) on *:sockopen:bash*: { sockwrite -n bash* GET $gettok($sock($sockname).mark,1,32) HTTP/1.1 sockwrite -n bash* Host: $+($sock($sockname).addr,$str($crlf,2)) } on *:sockread:bash*: { var %bash | sockread %bash if ($regex(%bash,/Quote\s\43(\d+\s.+exist\56)<\/font>/)) { $gettok($sock($sockname).mark,2-,32) :[04Bash Quote $+($chr(35),04,$regml(1),]:) sockclose $sockname } if ($regex(%bash,/\43(\d+)<\/b>/)) { $gettok($sock($sockname).mark,2-,32) Looking Up :[04Bash Quote$& $+($chr(35),04,$regml(1),]: Please wait...) } if ($regex(%bash,/^(
|)(\S.+)(
|<\/p>)/)) {
inc -u10 $+(%,$sockname)
.timerbash $+ $($+(%,$sockname),2) 1 $calc(2* $($+(%,$sockname),2))$&
$gettok($sock($sockname).mark,2-,32) :[04BASH]:$&
$replace($regml(2),<,<,>,>,",", ,$chr(32),&,&)
}
if ($regml(3) =
Not really tocalfane1:
(Jun-Wed-27)(11:20:25:am) <07~Ricko> @bash
(Jun-Wed-27)(11:20:28:am) <05&Pyro> Looking Up :[04Bash Quote #04694]: Please wait...
(Jun-Wed-27)(11:20:30:am) <05&Pyro> :[04BASH]: how does a guy become a porn star?
(Jun-Wed-27)(11:20:32:am) <05&Pyro> :[04BASH]: that's what I wana find out
(Jun-Wed-27)(11:20:34:am) <05&Pyro> :[04BASH]: sparc5: have at least 8inches and 4inches girth
(Jun-Wed-27)(11:20:36:am) <05&Pyro> :[04BASH]: sparc5: and you usually pay them to be in the first few
(Jun-Wed-27)(11:20:38:am) <05&Pyro> :[04BASH]: or family business
(Jun-Wed-27)(11:20:40:am) <05&Pyro> :[04BASH]: Rehlic: pay???
(Jun-Wed-27)(11:20:42:am) <05&Pyro> :[04BASH]: may you all catch this horrible disease and suffer
(Jun-Wed-27)(11:20:44:am) <05&Pyro> :[04BASH]: sparc5: its easy to find any guy to fuk some hot pron star
(Jun-Wed-27)(11:20:46:am) <05&Pyro> :[04BASH]: damn
Try this:
alias -l bash {
if (!$($+(%,#,bash),2)) { inc -u10 $+(%,#,bash)
if ($sock($+(bash,#))) sockclose $+(bash,#)
sockopen $+(bash,#) www.bash.org 80
sockmark $+(bash,#) $+(/?,$iif($1,$1,random)) msg #
}
}
on *:load: {
echo 12 -a You Have Just Loaded Napa182's Bash Quote Socket
echo 07 -a A irc.EzzyChat.com Production
echo -a 08!!04WARNING08 This snippet may04/08will say curse04/08foul words 04WARNING08!!
}
on *:input:#:if ($regex($1-,/^@bash?\s?(\d+)?$/iS)) bash $iif($regml(1),$v1)
on $*:text:/^@bash?\s?(\d+)?$/iS:#:bash $iif($regml(1),$v1)
on *:sockopen:bash*: {
sockwrite -n bash* GET $gettok($sock($sockname).mark,1,32) HTTP/1.1
sockwrite -n bash* Host: $+($sock($sockname).addr,$str($crlf,2))
}
on *:sockread:bash*: {
var %bash | sockread %bash
if ($regex(%bash,/<center.+>Quote\s\43(\d+\s.+exist\56)<\/font>/)) {
$gettok($sock($sockname).mark,2-,32) :[04Bash Quote $+($chr(35),04,$regml(1),]:)
sockclose $sockname
}
if ($regex(%bash,/<b>\43(\d+)<\/b>/)) {
$gettok($sock($sockname).mark,2-,32) Looking Up :[04Bash Quote$&
$+($chr(35),04,$regml(1),]: Please wait...)
}
if ($regex(%bash,/^(<p class=.+>|)(\S.+)(<br \/>|<\/p>)/)) {
inc -u10 $+(%,$sockname)
.timerbash $+ $($+(%,$sockname),2) 1 $calc(2* $($+(%,$sockname),2))$&
$gettok($sock($sockname).mark,2-,32) :[04BASH]:$&
$replace($regml(2),<,<,>,>,&nsbsp,$chr(32),&,&)
}
if ($regml(3) = </p>) { sockclose $sockname }
}
Before: > [10:41pm] <~Stewie|Toclafane> @Bash
[10:41pm] <&thunderbolt> Looking Up :[Bash Quote #355]: Please wait...
[10:41pm] <&thunderbolt> :[BASH]: <Rapture> I wasn't naked! I had a sock on! After: > [10:43pm] <~Stewie|Toclafane> @bash 355
[10:43pm] <&thunderbolt> Looking Up :[Bash Quote #355]: Please wait...
[10:43pm] <&thunderbolt> :[BASH]: I wasn't naked! I had a sock on!
