AdiIRC

Try this:

on *:ACTIVE:*:{
  setcolors
}

on *:APPACTIVE:{
  setcolors
}

alias setcolors {
  var %s 0
  while (%s < $scon(0)) {
    inc %s
    scon %s

    var %w 0
    while (%w < $window(*, 0)) {
      inc %w
      var %type = $window(*, %w).type

      ; sets the editbox color for inactive windows, using $color(N) or $rgb() decimal or RRR,GGG,BBB format
      ; var %background = $color(4)
      ; var %text = $color(5)
      ; var %background = $rgb(255,0,0)
      ; var %text = $rgb(0,0,255)
      ; var %background = 255,0,0
      ; var %text = 0,0,255

      var %background = $color(1)
      var %text = $color(0)

      if ($appactive && $window(*, %w).wid == $activewid) {

        ; for the active window, use the editbox color options
        %background = $ocolor(29)
        %text = $ocolor(30)
      }

      if (%type == status) {
        editbox -sk %background
        editbox -sc %text
      }
      else if (%type == channel) || (%type == query) {
        editbox -k $window(*, %w) %background
        editbox -c $window(*, %w) %text
      }
    }
  }
}