on *:JOIN:#:{ 
  if (% [ $+ [ $+($nick,.,$chan) ] ] == $null) {
    set % [ $+ [ $+($nick,.,$chan) ] ] 1
    notice $nick Welcome to $chan $+ ! You have joined $chan % [ $+ [ $+($nick,.,$chan) ] ] times!
    /halt
  }
  else {
    inc % [ $+ [ $+($nick,.,$chan) ] ] 1
    notice $nick Welcome to $chan $+ ! You have joined $chan % [ $+ [ $+($nick,.,$chan) ] ] times!
  }
}