on *:text:*:#:{ if ($chan = #revo-pre) {
    if ($nick == NEW)|| ($nick == OLD) && ($network == RevolutionIrc) {
      scid -t1 $idnet(irchighway) msg #NiNJA-PRE 2[NiNJA2] in $1- @ 2[ $+ $gmt(HH:nn:ss) GMT2] on 2[ $+ $gmt(dd/mm/yyyy) $+ 2]
    } 
  }
  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !pre) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } }

  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !group) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } }

  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !last) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } }

  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !lastpre) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } }

  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !db) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } }

  if ($chan = #NiNJA-PRE) {
  if ($strip($1) = !dupe) && ($network == irchighway) { scid -t1 $idnet(RevolutionIrc) /msg #revo-pre $strip($1-) } } 

}
on *:text:*:?:{ if ($nick == OLD) && ($network == RevolutionIrc) { scid -t1 $idnet(irchighway) /msg #NiNJA-PRE $strip($1-) } }

alias idnet {
  var %k = 1
  var %L = $1
  while (%k <= $scid(0)) {
    if ($scid($scon(%k)).network == %L) { return $scon(%k) }
    inc %k
} }