on *:TEXT:!quote:#:{
  hload quotes quotes
  var %quote = $rand(1,$calc($hget(quotes, 0).item))
  if (%quotecheck != %quote) {
    msg $chan $hget(quotes, %quote).item $+ . $hget(quotes, %quote)
    var %quotecheck = %quote
  }
}
on *:TEXT:$(!quote $2 *):#:{


  hload quotes quotes
  var %i = 1
  echo Values:
  ; iterate over each item
  while ($hget(quotes, %i).item) {
    ; print the key/value pair
	var %tmp = $hget(quotes, $v1)
	if ($s isin %tmp)
	{
		echo -a %tmp
	}
    inc %i
  }


  }
}