Old rolující menu

#!/bin/bash
ttt=("aaa" "bbb" "ccc" "ddd" "eee" "fff" "ggg" "hhh" "iii" "jjj")
sel=0
sum=${#ttt[@]}
max=5
pos=0
center=0
while [ 1 ]
do
  clear

  for ((i=$pos; i<($pos+$max); i++ ))
  do
    if [ $sel = $i ]
    then
      echo -e ">\e[5;31m${ttt[i]}\e[0m<"
    else
      echo " ${ttt[i]} "
    fi
done
read -sn1 -t1 c
l=`perl -e "printf('%d',ord('$c'));"`
k="$l"

if ((k == 66)) && ((sel < (sum -1) )) ; then
let sel++

  if ((center < max)); then
  let center++
  fi

  if ((center == max )) && (((pos +5) < sum)); then
  let pos++
  fi

fi

if ((k == 65)) && ((sel > 0)); then
let sel--

  if ((center > 0)); then
  let center--
  fi


 if ((center == 0 )) && (( (pos ) > 0 )); then
 let pos--
 fi

fi

done