V(){
#bu VINRARUS
while true
do
LIST=
N=1
set ""
shift
for SEE in .* *
do
    if [ -d "$SEE" ]
    then
        true
    elif [ -f "$SEE" ]
    then
        true
    else
        set "$@" "$SEE"
LIST="$LIST$N: [$SEE]
"
        N=$((N+1))
    fi
done
for SEE in .* *
do
    if [ "." = "$SEE" -o ".." = "$SEE" ]
    then
        true
    elif [ -d "$SEE" ]
    then
        set "$@" "$SEE"
LIST="$LIST$N: $SEE/
"
        N=$((N+1))
    fi
done
for SEE in .* *
do
    if [ -f "$SEE" ]
    then
        set "$@" "$SEE"
LIST="$LIST$N: $SEE
"
        N=$((N+1))
    fi
done
echo -n "0: ..
$LIST$PWD >> "
read CD
echo "----------------------------------------"
V=
case "$CD" in
0)
    cd ..
    continue
;;
[0-9]|[0-9][0-9]|[0-9][0-9][0-9]|[0-9][0-9][0-9][0-9]|[0-9][0-9][0-9][0-9][0-9])
    eval V="\${$CD}"
    #echo     "V=${1}"
    if [ -d "$V" ]
    then
        cd "$V"
        continue
    fi
;;
esac
break
done
W="$PWD/$V"
echo "V=$V"
echo "W=$W"
LIST=
N=
SEE=
CD=
}