Develop and Download Open Source Software

Browse Subversion Repository

Contents of /branches/ttcomtester/tests/#33906-decsace.sh

Parent Directory Parent Directory | Revision Log Revision Log


Revision 10521 - (show annotations) (download) (as text)
Fri Jan 20 16:03:38 2023 UTC (13 months, 2 weeks ago) by zmatsuo
File MIME type: text/x-sh
File size: 1049 byte(s)
add communication test tool
1 #!/bin/sh
2 #
3 # DECSACE の動作テスト
4 # 通常は S と s に色および下線が付く。
5 # DECSACE:2 の時のみ S だけに色と下線が付く。
6 #
7
8 waitkey() {
9 printf "push return"
10 read pause
11 }
12
13 SetTestingScreen() {
14 printf '\033[2J\033[18H'
15 printf '\033[46;1;1;16;9999$x'
16
17 printf '\033[4;1;4;9999$z'
18 printf '\033[9;1;9;9999$z'
19
20 printf '\033[83;2;11;2;20$x'
21 printf '\033[83;6;11;7;20$x'
22 printf '\033[83;11;11;15;20$x'
23
24 printf '\033[115;6;21;6;9999$x'
25 printf '\033[115;7;1;7;10$x'
26
27 printf '\033[115;11;21;14;9999$x'
28 printf '\033[115;12;1;15;10$x'
29 }
30
31 TestDECSACE() {
32 SetTestingScreen
33
34 [ $# -gt 0 ] && printf "\033[${1}*x"
35
36 printf '\033[2;11;2;20;1;35$r'
37 printf '\033[2;11;2;20;4$t'
38
39 printf '\033[6;11;7;20;1;35$r'
40 printf '\033[6;11;7;20;4$t'
41
42 printf '\033[11;11;15;20;1;35$r'
43 printf '\033[11;11;15;20;4$t'
44
45 if [ "x$1" = "x" ]; then
46 echo "Default"
47 else
48 echo "DECSACE: ${1}"
49 fi
50
51 sleep 1
52
53 printf "\033[7t"
54 }
55
56 TestDECSACE
57 waitkey
58
59 TestDECSACE 0
60 waitkey
61
62 TestDECSACE 1
63 waitkey
64
65 TestDECSACE 2
66 waitkey
67
68 TestDECSACE ""

Properties

Name Value
svn:executable *

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