Cayin remote 2.0

//COMMANDS

on *:TEXT:!social:#: {
  if ((%floodtest) || ($($+(%,floodtest.,$nick),2))) { return }
  set -u10 %floodtest On
  set -u30 %floodtest. $+ $nick On
  msg $chan Here's a list of social media sites where you can keep up with Cayin www.facebook.com/cayinator, www.youtube.com/user/cayinator, www.twitter.com/cayinator, www.reddit.com/user/cayinator $+
}
on *:TEXT:!patreon:#: {
  if ((%floodtest) || ($($+(%,floodtest.,$nick),2))) { return }
  set -u10 %floodtest On
  set -u30 %floodtest. $+ $nick On
  msg $chan If you're enjoying the show and want to help support me directly visit http://www.patreon.com/cayinator $+
}
on *:TEXT:!donate:#: {
  if ((%floodtest) || ($($+(%,floodtest.,$nick),2))) { return }
  set -u10 %floodtest On
  set -u30 %floodtest. $+ $nick On
  msg $chan All donations are greatly appreciated and go towards the stream. If you're considering to donate you can do it by following this link : https://www.twitchalerts.com/donate/Cayinator $+
}
on *:TEXT:!steamgroup:#: {
  if ((%floodtest) || ($($+(%,floodtest.,$nick),2))) { return }
  set -u10 %floodtest On
  set -u30 %floodtest. $+ $nick On
  msg $chan Become a Turbo Bandit today! http://steamcommunity.com/groups/TheTurboBandits $+
}
on *:TEXT:!24h:#: {
  if ((%floodtest) || ($($+(%,floodtest.,$nick),2))) { return }
  set -u10 %floodtest On
  set -u30 %floodtest. $+ $nick On
  msg $chan Whenever a collective donation of $500 is reached a 24 hour stream shall take place the following Friday! $+
}

//Point system

alias -l addPoints {
  if ($1 !isnum) { echo 2 -st $1 is not a number. It needs to be a number. | halt }
  var %topic $+($chan,.,$nick)
  var %points $calc($readini(Points.ini,%topic,Points) + $5)
  writeini -n Points.ini %topic Points %points
  return %points
}

alias -l lookUpPoints {
  var %topic $+($chan,.,$nick)
  var %points $readini(Points.ini,%topic,Points)
  return %points
}
alias doaddpoints {
  if ($3 !isnum) { echo 2 -st $3 is not a number. It needs to be a number. | halt }
  var %topic $+($1,.,$2)
  var %points $calc($readini(Points.ini,%topic,Points) + $3)
  writeini -n Points.ini %topic Points %points
  echo -a Added points for %topic
}

alias dorempoints {
  var %topic $+($1,.,$2)
  remini -n Points.ini %topic Points
  echo -a Removed points for %topic
}

on *:text:!crabs:#:{
  if ((%floodpoints) || ($($+(%,floodcrabs.,$nick),2))) { return }
  set -u10 %floodcrabs On
  set -u30 %floodcrabs. $+ $nick On
  msg # $nick has $readini(Points.ini,$+(#,.,$nick),Points) total crabs.
}

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

on !*:join:#:{
  $+(.timerpoints.,#,.,$nick) 0 600 add.pts $+(#,.,$nick)
  add.pts $+(#,.,$nick)
}
on !*:part:#:$+(.timerpoints.,#,.,$nick) off
alias -l add.pts {
  writeini -n Points.ini $1 Points $calc($readini(Points.ini,$1,Points) + 1)
}