-module(oxybot).
-author('abzde@abzde.com').

-export([start/0]).

start() ->
    {ok, sock} = gen_tcp:connect("localhost", 6667, [binary, {packet, 0}]),
    gen_tcp:send(sock, "user oxybot oxybot oxybot :oxybot\r\n"),
    gen_tcp:send(sock, "nick oxybot\r\n"),
    do_recv(sock).

do_recv(sock) ->
    case gen_tcp:recv(sock, 512) of
        {ok, packet} ->
            handle(packet);
        _ ->
            stop
    end,
    do_recv(sock).

handle(packet) ->
    packet.