on *:text:$($iif(*PRE* iswm $strip($1),*)):#:{
  if (($nick == nomedobot) && ($network == after-all)) {
    var %x = 1, %scid = $scid(0)
    while (%x <= $calc(%scid +8)) {
      if ($scid(%x).network == AustIRC) { scid $scid(%x) msg #chak [Pre | $3 $+ ]: $5 | break }
      inc %x
    }
  }
}