Miscellany

ON *:JOIN:#: { 
  If ($nick == $me) { halt }
  else {
    if (%whoison [ $+ [ $chan ] ] != $null) {
      set %Who2Whois $nick
      set %Chan2Whois $chan 
      whois $nick 
    } 
  }
  if ($5 != $null) {
    set %chanoverall 1
  }
  else {halt}
  if ($6 != $null) {
    set %chanoverall 2
  }
  if ($7 != $null) {
    set %chanoverall 3
  }
  if ($8 != $null) {
    set %chanoverall 4
  }
  if ($9 != $null) {
    set %chanoverall 5
  }
  if ($10 != $null) {
    set %chanoverall 6
  }
  if ($11 != $null) {
    set %chanoverall 7
  }
  if ($12 != $null) {
    set %chanoverall 8
  }
  if ($13 != $null) {
    set %chanoverall 9
  }
  if ($14 != $null) {
    set %chanoverall 10
  }
  if ($15 != $null) {
    set %chanoverall 11
  }
  if ($16 != $null) {
    set %chanoverall 12
  }
  if ($17 != $null) {
    set %chanoverall 13
  }
  if ($18 != $null) {
    set %chanoverall 14
  }
  if ($19 != $null) {
    set %chanoverall 15
  }
  if ($20 != $null) {
    set %chanoverall 16
  }
  if ($21 != $null) {
    set %chanoverall 17
  }
  if ($22 != $null) {
    set %chanoverall 18
  }
  if ($23 != $null) {
    set %chanoverall 19
  }
  if ($24 != $null) {
    set %chanoverall 20
  }
  if ($25 != $null) {
    set %chanoverall 21
  }
  if ($26 != $null) {
    set %chanoverall 22
  }
  if ($27 != $null) {
    set %chanoverall 23
  }
  if ($28 != $null) {
    set %chanoverall 24
  }
  if ($29 != $null) {
    set %chanoverall 25
  }
  if ($30 != $null) {
    set %chanoverall 26
  }
  if ($31 != $null) {
    set %chanoverall 27
  }
  if ($32 != $null) {
    set %chanoverall 28
  }
  if ($33 != $null) {
    set %chanoverall 29
  }
  if ($34 != $null) {
    set %chanoverall 30
  }
  raw 319:*:{
    if (%Chan2Whois && %Who2Whois) {
      msg %Chan2Whois 4[ %Who2Whois 4] 7Is On:1 $3- 4[ Altogether  channels 4]
      unset %Chan2Whois
      unset %Who2Whois
    }
  }
}