on $*:TEXT:/^[!@.](droplogs)/:#: {
  var %pre $iif($left($1,1) == @, msg $chan, notice $nick)
  if ($2 == add && $3 != $null) {
    writeini droplogs.ini $nick $replace($3-,$chr(32),_) $calc($readini(droplogs.ini,$nick,$replace($3-,$chr(32),_)) + 1)
    %pre [Drop Logs]: $3- added to your drop logs. You now have $readini(droplogs.ini,$nick,$replace($3-,$chr(32),_)) $3- $+ .
    halt
  }
  if ($2 == del && $ini(droplogs.ini,$nick,$replace($3-,$chr(32),_))) {
    remini droplogs.ini $nick $replace($3-,$chr(32),_)
    %pre [Drop Logs]: $3- removed from your drop logs.
    halt
  }
  if ($2 == clear && $ini(droplogs.ini,$nick)) {
    remini droplogs.ini $nick
    %pre [Drop Logs]: Your drop logs have been cleared.
    halt
  }
  if (!$ini(droplogs.ini,$nick)) { %pre [Drop Logs]: You don't have any logs. Try using !droplogs [add <item> $chr(124) del <item> $chr(124) clear] | halt }
  else {
    var %looptot $ini(droplogs.ini,$nick,0)
    var %looptemp 1
    var %string
    while (%looptemp <= %looptot) {
      %string = $addtok(%string,$replace($ini(droplogs.ini,$nick,%looptemp),_,$chr(32)) $+ ( $+ $readini(droplogs.ini,$nick,$ini(droplogs.ini,$nick,%looptemp)) $+ ) $chr(124),32)
      inc %looptemp 1
    }
    %pre [Drop Logs]: $remove(%string,$right(%string,2))
  }
}