Untitled

on $*:text:/^[@!]((Slay(er|task)?)|st)(.*?)/Si:#: {
  if ($regex($2,/^(finish(ed)?|done)/Si)) {
    notice $nick 12Congratulations on finishing your4 $readini(Slayer.ini,$chan,$+($nick,.1)) Task $+ 12:)
    remini Slayer.ini $chan $+($nick,.1)
    remini Slayer.ini $chan $+($nick,.2)
  }
  elseif ($2 == search) {
    if ($readini(Slayer.ini,$chan,$+($replace($3-,$chr(32),_),.1)) && $readini(Slayer.ini,$chan,$+($replace($3-,$chr(32),_),.2))) {
      $iif($left($1,1) == @ && $nick !isreg $chan, msg $chan, notice $nick) 4 $+ $replace($3-,$chr(32),_) 12currently has a4 $readini(Slayer.ini,$chan,$+($nick,.1)) 12task, and is currently doing it in 4World $readini(Slayer.ini,$chan,$+($nick,.2)) $+ 12.
    }
    else {
      notice $nick 4 $+ $replace($3-,$chr(32),_) 12is currently not doing a slayer task.
    }
  }
  elseif ($nick == $me && !$regex($2,/^((finish(ed)?|done)|search)/Si)) {
    /slayer $2 $3
  }
  else {
    writeini Slayer.ini $chan $+($nick,.1) $2
    writeini Slayer.ini $chan $+($nick,.2) $3
    msg $chan 12 $+ $nick $+ `s current slayer task is 4 $+ $replace($readini(Slayer.ini,$chan,$+($nick,.1)),_,$chr(32)) 12and is training on 4World $readini(Slayer.ini,$chan,$+($nick,.2)) $+ 12.
  }
}

alias slayer {
  tokenize 32 $1-
  writeini Slayer.ini $active $+($me,.1) $1
  writeini Slayer.ini $active $+($me,.2) $2
  msg $chan 12 $+ My current slayer task is 4 $+ $replace($readini(Slayer.ini,$chan,$+($nick,.1)),_,$chr(32)) 12and is training on 4World $readini(Slayer.ini,$chan,$+($nick,.2)) $+ 12.
}