let retlist = []
for i in filter(getcompletion('','option'),'v:val!~''^\%(all\|termcap\)$'' ' )
let str = execute("verb set " . i . "?")
if str =~ "Last set from"
let retstr = i ."\t". string(eval("&". i)) ."\t". matchstr(str, '\_.*Last set from\s*\zs.*')
call add(retlist, retstr)
endif
endfor
fun! s:sort(a,b)
let a = matchstr(a:a,'[^\t]\+$')
let b = matchstr(a:b,'[^\t]\+$')
return a == b ? 0 : a > b ? 1 : -1
endfun
echo join(sort(retlist,'s:sort'),"\n")