Develop and Download Open Source Software

Browse Subversion Repository

Annotation of /branches/ttcomtester/tests/#38168-deccara-range.sh

Parent Directory Parent Directory | Revision Log Revision Log


Revision 10521 - (hide annotations) (download) (as text)
Fri Jan 20 16:03:38 2023 UTC (14 months, 3 weeks ago) by zmatsuo
File MIME type: text/x-sh
File size: 1148 byte(s)
add communication test tool
1 doda 7083 #!/bin/sh
2     #
3     # DECCARA / DECRARA 対象領域確認スクリプト
4     # 同じ数字は同じ色 or 属性となるのが正しい。
5     # 画面の再描画前後で表示が変わらないのが正しい。
6     #
7    
8     printf "\033[*2x\033[2J"
9    
10     seqs=$(seq 9)
11    
12     for i in $seqs; do
13     xend=$((21 - $i))
14     yend=$((20 - $i))
15     char=$((47 + $i))
16    
17     printf '\033[%d;%d;%d;%d;%d$x' $char $i $i $yend $xend
18     done
19    
20     for i in $seqs; do
21     xend=$((21 - $i))
22     yend=$((20 - $i))
23     color=$((40 + $i % 8))
24     printf '\033[%d;%d;%d;%d;%d$r' $i $i $yend $xend $color
25     done
26    
27    
28     for i in $seqs; do
29     xstart=$(($i + 40))
30     xend=$((61 - $i))
31     yend=$((20 - $i))
32     char=$((47 + $i))
33    
34     printf '\033[%d;%d;%d;%d;%d$x' $char $i $xstart $yend $xend
35     done
36    
37     for i in $seqs; do
38     xstart=$(($i + 40))
39     xend=$((61 - $i))
40     yend=$((20 - $i))
41    
42     case $i in
43     1) attr="1;7";;
44     2) attr="1;4;7";;
45     3) attr="4;5;7";;
46     4) attr="1;5;7";;
47     5) attr="1;4;7";;
48     6) attr="4;5;7";;
49     7) attr="1;5;7";;
50     8) attr="1;4;7";;
51     9) attr="4;5;7";;
52     esac
53    
54     color=$((40 + $i % 8))
55     printf '\033[%d;%d;%d;%d;%s$t' $i $xstart $yend $xend $attr
56     done
57    
58     printf "\033[20;7HDECCARA\e[47GDECRARA\n\033[0*x"
59    
60     sleep 1
61    
62     # 画面再描画
63     printf "\033[7t"

Properties

Name Value
svn:executable *

Back to OSDN">Back to OSDN
ViewVC Help
Powered by ViewVC 1.1.26