rm -r vlak.tmp
rm vlak.big
mkdir vlak.tmp
cd vlak.tmp
I=0
( while [ $I -lt 100000 ]; do
	echo -n "Downloading $I..." >&2
	lynx -source "http://idos.datis.cdrail.cz/tempr.asp?ind=$I" > $I.html
#	cat ../../vlak/$I > $I.html
	echo -n "processing." >&2
	J=`cat $I.html | grep '^<title' | sed -e 's/<title>//' -e 's- </title--' -e 's-</title--' -e 's/ /_/g' -e 's-/-X-g' -e "s/>/__$I /"`
	echo $J | grep -v Chyba > /dev/null || exit
	echo -n ".." >&2
	eval "../w3m -cols 180 -dump $I.html > $J"
	rm $I.html
	for J in *; do
		ed $J 2> /dev/null <<EOF
1,/Stanice/d
1,/Zast.vka/d
/----/,\$d
w
EOF
		echo "# $J"
		echo "$J" >&2
		cat $J
		rm $J
		done
	I=$[$I+1]
done ) | gzip -f > ../vlak.big.gz