*! version 1.0.0  10/28/93                      STB16: zz3
program define stb_dtl1
	version 3.1
	quietly count if filetype==1
	if _result(1)==0 {
		exit
	}
	preserve
	quietly keep if filetype==1
	di _n in gr _col(18) ".ado and .hlp files:" 
	local i 1
	while `i'<=_N {
		local fn = file[`i']
		stb_ex `fn'
		local user "$S_2"
		stb_sys `fn'
		local sys "$S_2"
		if "`user'"=="" & "`sys'"=="" {
			di _col(18) "    `fn'" _col(37) in gr "(not installed)"
		}
		else {
			if "`sys'"!="" {
				di _col(18) "    `fn'" _col(37) in gr /*
				*/ "now part of Stata $STBver"
				if "`user'"!="" {
					di _col(37) in gr /*
					*/ "old version also found in " /*
					*/ in ye "`user'"
				}
			}
			else {
				di _col(18) "    `fn'" _col(37) in gr "installed in " /*
				*/ in ye "`user'"
			}
		}
		local i=`i'+1
	}
end