Something

mhl {
  var %x = 1
  while (%x <= $nick($chan,0)) {
    if (%x == 1) {
      clipboard $nick($chan,%x)
    inc %x }
    elseif (%x == $nick($chan,0)) { 
      clipboard -a $chr(15) and $nick($chan,%x) $+ $chr(46)
    inc %x }
    else { 
      clipboard -a $chr(44) $nick($chan,%x)
    inc %x }
  }
  msg $chan hi $cb
}