Code:
on !*:JOIN:#:{
  $+(.timerpoints.,#,.,$nick) 0 300 add.pts # $+(#,.,$nick)
  add.pts # $+(#,.,$nick)  
}

on !*:PART:#:$+(.timerpoints.,#,.,$nick) off

alias add.pts { 
  if ($mid($1,2-) ison $1) writeini -n Points5.ini $2 Points $calc($readini(Points5.ini,$2,Points) + 1)
}

on *:text:!Points:#: msg # You have $iif($readini(Points5.ini,$+(#,.,$nick),Points),$v1,0) points.

on $*:text:/!Points (add|remove)/Si:#:{
  if ($nick isop #) {
    if ($0 < 3) { msg # Insufficient parameters: Use !points <add|remove> <user> [number] | return }
    writeini -n Points5.ini $+(#,.,$3) Points $calc($readini(Points5.ini,$+(#,.,$3),Points) $iif($2 == add,+,-) $iif($4 isnum,$4,1))
    msg $chan $3 now has $readini(Points5.ini,$+(#,.,$3),Points) total points. 
  }
  else msg $chan This command is only available to moderators.
}

Nillens @ irc.twitch.tv
Nillen @ irc.rizon.net