ON *:nick: {
  writeini tel.ini $chan nick $calc($readini(tel.ini, $chan, nick) + 1)
  if ($readini(tel.ini, $chan, datum) == $null) writeini tel.ini $chan datum $fulldate
}