Code:
 
on *:text:!addquote *:#: {
  if ($nick isop #) {
    var %r = $read(quote.txt,ns,$2)
    if (%r) { .msg $chan [ $+ $nick $+ ]: Error, This quote $qt($2) is quote exist into the database! | return }
    write quote.txt $2-
    msg $chan /me + quote $2 has been added to the database!
  }
}
on *:text:!delquote *:#: {
  if ($nick isop #) {
    var %r = $read(quote.txt,ns,$2)
    if (!%r) { .msg $chan [ $+ $nick $+ ]: Error, This quote $qt($2) does NOT exist into the database! | return }
    write -dl $+ $readn quote.txt
    msg $chan /me - Quote $2- has been deleted from the database!
  }
}
on *:text:!editquote & *:#: {
  if ($nick isop #) {
    var %r = $read(quote.txt,ns,$2)
    if (!%r) { .msg $chan [ $+ $nick $+ ]: Error, This quote $qt($2) does NOT exist into the database! | return }
    write -l $+ $readn quote.txt $2-
    msg $chan /me -> Quote $2 has been updated!
  }
}
ON *:TEXT:*:#: { 
  tokenize 32 $strip($1-,burci)
  if ($read(quote.txt, nts, $1)) {
    var %com = $v1
    var %com = $replace(%com,@user@,$iif($2,$2,?),@nick@,$nick,@target@,$target)
    if (-ul=mod == $gettok(%com,1,32)) && ($nick !isop $chan) { msg $chan  | return }
    msg $chan $iif(-ul=mod == $gettok(%com,1,32),$gettok(%com,2-,32),$gettok(%com,1-,32))
  }
}

This is a modified version of my !addcom !editcom !delcom script. It should work with what you want. With the ability to both delete and edit your quotes, in case of mistakes! (If it does not work, sorry I am tired!

Last edited by dailyproblem; 31/07/15 05:46 AM.