Hey, I got this quote system from my friend Bee's script. He barely comes on anymore and I just love this quote system. Its the best one i've ever used. Anyway, just load it up into your remotes. Do /dialog -dm bsquotes bsquotes to open up the window, and from there its pretty much clear what you have to do. Also make sure you have a quotes.txt, if not, it will make one for you when you add a quote.

|------------------------------------------------------------|
|    [ BEE'S DIALOG QUOTE SYSTEM ][ IRC.ANIMELAB.COM ]       |
|------------------------------------------------------------|
alias quotes dialog -dm bsquotes bsquotes
dialog bsquotes {
  title "Buzz Script Quoter"
  size -1 -1 195 155
  option dbu
  box "Controls", 1, 0 0 195 23
  button "Say Random", 2, 5 8 35 12
  button "Say Selected", 3, 43 8 35 12
  button "Add Quote", 4, 81 8 35 12
  button "Delete Quote", 5, 119 8 35 12
  button "List Quotes", 6, 157 8 35 12
  box "Quote List", 7, 0 25 195 105
  list 8, 3 32 190 95, size 
  box "Search", 9, 0 130 195 25
  button "Search!", 10, 3 138 35 12
  edit "", 11, 40 139 108 10, autohs
  check "Show in Chan", 12, 150 139 43 10
}
dialog bsqedit { 
  title "Edit Quote"
  size -1 -1 250 60
  edit "", 1, 5 5 240 22, autohs
  button "Edit", 2, 75 32 40 25
  button "Cancel", 3, 120 32 40 25, Cancel
}
on *:dialog:bsqedit:init:0:{ did -a $dname 1 $did(bsquotes,8).seltext | set %quote.temp $did(bsquotes,8).sel }
on *:dialog:bsqedit:sclick:2:{ var %x = $did(bsqedit,1).text | var %y = %quote.temp | write -l $+ %quote.temp quotes.txt %x | echo -a Quote Edited: %x | dialog -x bsqedit bsqedit | dialog -v bsquotes bsquotes | did -d bsquotes 8 %y | did -i bsquotes 8 %y %x | did -c bsquotes 8 %y }
on *:dialog:bsqedit:close:0:{ unset %quote.temp }

on *:dialog:bsquotes:init:0:{ 
  loadbuf -o bsquotes 8 quotes.txt | dialog -t bsquotes Buzz Script Quoter - Total Quotes: $lines(quotes.txt) - (/quotes)
}
on *:dialog:bsquotes:dclick:8:{ dialog -ma bsqedit bsqedit }
on *:dialog:bsquotes:sclick:2:{ var %x = $rand(1,$lines(quotes.txt)) | msg $active %left $+ Buzz Quote $chr(35) $+ %x $+ %right $read(quotes.txt,%x) }
on *:dialog:bsquotes:sclick:3:{ if ($did(8).seltext) var %x = $read(quotes.txt,s,$did(8).seltext) | var %y = $readn | msg $active %left $+ Buzz Quote $chr(35) $+ %y $+ %right $did(8).seltext }
on *:dialog:bsquotes:sclick:4:{ 
  var %x = $$?="Quote?" | write quotes.txt %x | msg $active %left $+ Added New Quote: $chr(35) $+ $lines(quotes.txt) $+ %right %x | dialog -t bsquotes Buzz Script Quoter - Total Quotes: $lines(quotes.txt) - (/quotes)
  if (%quote.list == seach) loadbuf -o bsquotes 8 quotes.txt 
  else { did -a bsquotes 8 %x }
}
on *:dialog:bsquotes:sclick:5:{ 
  if ($did(8).seltext) { 
    if (%quote.list == search) { var %x = $read(quotes.txt,s,$did(8).seltext) | var %y = $readn | var %z = $did(8).seltext | goto end }
    else { var %y = $did(8).sel | var %z = $did(8).seltext | goto end }
    :end 
    write -dl $+ %y quotes.txt | did -d bsquotes 8 $did(8).sel | dialog -t bsquotes Buzz Script Quoter - Total Quotes: $lines(quotes.txt) - (/quotes) | echo -a Quote deleted: %z
  } 
}
on *:dialog:bsquotes:sclick:6:{ did -r bsquotes 8 | loadbuf -o bsquotes 8 quotes.txt | dialog -t bsquotes Buzz Script Quoter - Total Quotes: $lines(quotes.txt) - (/quotes) }
on *:dialog:bsquotes:sclick:10:{ if ($did(11).text != $null) set %quote.list search | did -r bsquotes 8 | quotesearch }
on *:dialog:bsquotes:close:0:{ .unset %quote.list }
alias quotesearch {
  var %i = 1
  var %y = 0
  var %x = $did(bsquotes,11)
  var %z = 0
  if ($did(bsquotes,12).state == 1) msg $active %left $+ Quote Search for: $+(*,%x,*,%right)
  while ($lines(quotes.txt) >= %i) {
    if (%x isin $read(quotes.txt,%i)) { 
      .timer -m 1 $calc(%z + 400) did -a bsquotes 8 $read(quotes.txt,%i) | inc %y | inc %z 400 
      if ($did(bsquotes,12).state == 1) { .timer -m 1 %z msg $active $read(quotes.txt,%i) }
    }
    inc %i
  }
  if ($did(bsquotes,12).state == 1) .timer -m 1 $calc(%z + 400) msg $active %left $+ Quotes Found: %y $+ %right
  .timer -m 1 $calc(%z + 400) dialog -t bsquotes Buzz Script Quoter - Found %y $iif(%y == 1,Quote,Quotes) - (/quotes)
}