on *:text:!fail *:#chan: {
  inc %fail- $+ $2
}

on *:text:!checkfail*:#chan: {
  if (!$2) {
    msg $chan Number of FAILS for $nick $+ : $eval($+(%,fail-,$nick),2)
  }
  else {
    msg $chan Number of FAILS for $2 $+ : $eval($+(%,fail-,$2),2)
  }
}