Something

on *:text:*:#:{
  if (($chan == #123456789) && ($network == PTnet)) {
    var %x = 1 
    while (%x <= $scid(0)) {
      if ($scid(%x).network == EFnet) { scid $scid(%x) /msg #radiovirtual $nick disse: $1- | break }
      inc %x
    }
  }
  elseif (($chan == #radiovirtual) && ($network == EFnet)) {
    var %x = 1, %scid = $calc($scid(0) +8)
    while (%x <= %scid) {
      if ($scid(%x).network == PTnet) { scid $scid(%x) /msg #123456789 $nick disse: $1- | break }
      inc %x
    }
  }
}