# url="http://ctext.org/analects/zhs"; trs=1# url="http://ctext.org/mengzi/zhs";   trs=0# url="http://ctext.org/xunzi/zhs";  trs=0# url="http://ctext.org/kongzi-jiayu/zhs"# url="http://ctext.org/shi-shuo-xin-yu/zhs"# url="http://ctext.org/yan-shi-jia-xun/zhs"# url="http://ctext.org/zhuangzi/inner-chapters/zhs"# url="http://ctext.org/book-of-changes/zhs"url="http://ctext.org/shang-shu/zhs"; trs=0

exportLANG=$(locale -uU)# 设定中文支持

curl $url > _chp

awk ' BEGIN{system("rm -rf _ctx")}
/　　<a class="menuitem"/ {
	sub(/.*href=\"/, "")
	sub(/\".*/, "")url="http://ctext.org/"$0
	print url
	system("curl "url" >>_ctx")}' _chp

awk -v trs=$trs' BEGIN {chp=0; tot=0}
/<div id="content3"/ {
	gsub(/^[^《]+《/,"《")
	gsub(/》.+/,"》")
	chp++; sec=0
	print "第 "chp" 章　"$0"\n"}
/<div id="comm[0-9]+"/ {
	gsub(/<[^>]+>/,"")
	sec++;
	if(trs){if(sec%2) print chp"."(sec+1)/2, $0else{tot++; print tot"　"$0"\n"}}else{
		tot++;
		print chp"."sec"/"tot, $0"\n"}}' _ctx > _ctx.txt