Seekbrain.com

Brain Seeking at it’s Best

Budbot 0.0.1 Released

Filed under: Software — Perlboy at 4:08 pm on Thursday, June 3, 2004

Hi all,

Yer well, a bit of random procrastination came over me so I went about producing a Perl based IRC bot. Current features are:

- Multiple Server support
- Mulitple Channel support
- Full Xchat Compatible logging support
- Star Wars Random quote function
- !l33tsp4m3r function

The last function basically waits for someone to say:

!l33tsp4m3r #channelname [optional botname]

When that occurs, it will join the channel (after cloning if optional botname is specified) and wait for input from the initiating channel. When a user says anything prefixed with leet, it will convert what the user has said and print it in the target channel.

Lame but fun. ;)
Example:

Perllabs is me. :)
In #bud:

[16:04:49] !l33tsp4m3r #bc sp4mm4st3r
[16:04:49] sp4mm4st3r (~sp4mm4st3@CPE-144-136-154-111.qld.bigpond.net.au) has joined channel #bud
[16:04:51] leet, hehehehehee this is addictive

In #bc:

[16:04:49] sp4mm4st3r (~sp4mm4st3@CPE-144-136-154-111.qld.bigpond.net.au) has joined channel #bc
[16:04:51] h3h3h3h3h33 this is 4ddictiv3

To kill the bot:

[16:06:45] !k1lll33t
[16:06:46] Signoff: sp4mm4st3r (Remote host closed the connection)

SO.. Here it is

One final note, if your nickname has Perl in it and you say Go away it will self destruct. :)
Stuart

No Comments »

No comments yet.

RSS feed for comments on this post. TrackBack URI

Leave a comment

XHTML: You can use these tags: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <code> <em> <i> <strike> <strong>