File indexing completed on 2024-04-21 05:51:30

0001 do_tests() {
0002     tput cup 0 0; printf "$@"
0003 
0004     tput cup  0 $((COLUMNS-1)); printf "AB"
0005     tput cup  3 $((COLUMNS-1)); printf "A\bB"
0006     tput cup  6 $((COLUMNS-1)); printf A; tput  cud 1; printf B
0007     tput cup  9 $((COLUMNS-1)); printf A; tput  cuu 1; printf B
0008     tput cup 12 $((COLUMNS-1)); printf A; tput  cub 1; printf B
0009     tput cup 15 $((COLUMNS-1)); printf A; tput  cuf 1; printf B
0010 
0011     tput cup 18 1; echo -n -- "-- Press RETURN to run next test --"
0012     read
0013     #sleep 5
0014 }
0015 
0016 clear; tput smam
0017 do_tests "No Reverse Wrap - AutoWrap Mode"
0018 
0019 clear; tput rmam
0020 do_tests "No Reverse Wrap - No AutoWrap Mode"
0021 
0022 
0023 clear; tput smam; printf "\e[?45h"
0024 do_tests "Reverse Wrap - AutoWrap Mode"
0025 
0026 clear; tput rmam; printf "\e[?45h"
0027 do_tests "Reverse Wrap - No AutoWrap Mode"
0028 
0029 
0030 clear; tput smam; printf "\e[?45l"