alias init_balloons {

  run w:\balloond\balloond\bin\release\balloond.exe
  timerballoon 1 5 connect_balloons

}

alias connect_balloons {

  set %bell $chr(7)
  sockopen balloons localhost 1985

}

on *:SOCKOPEN:balloons:{

  if ($sockerr > 1) {
    print 11 * Balloon connect failed.
    return
  }

  sockwrite -n balloons $+(i am,%bell,mIRC $version)
  sockwrite -n balloons $+(new,%bell,mirc,%bell,mIRC Satellite Tray Icon,%bell,F:\mirc\mirc.ico)
  sockwrite -n balloons $+(show,%bell,mirc)

}

alias show_balloon {
  sockwrite -n balloons $+(balloon,%bell,mirc,%bell,4000,%bell,info,%bell,$1,%bell,$2)
}

on *:JOIN:*:{
  noop $show_balloon(Channel join,$nick ( $+ $address $+ ) joined channel $chan)
}