sock_open('fn','irc.freenode.net',6667);
sock_write('fn',"NICK bl_bot\n");
sock_write('fn',"USER bl_bot bl_bot \"\" :bl bot\n");
while (1) {
	line = sock_read('fn');
	if (length(line) != 0) {
		if (match(line,'/.+ 001 .+/')) {
			sock_write('fn',"JOIN #buubot\n");
		}
	}
}