summaryrefslogtreecommitdiff
path: root/contrib/dialog/samples/msgbox4-utf8
blob: 00ac0698ff8b27c72ea091b93a532211706f3c21 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
#!/bin/sh
# $Id: msgbox4-utf8,v 1.13 2020/11/26 00:25:37 tom Exp $

. ./setup-vars

. ./setup-utf8

width=30
while test $width != 61
do
$DIALOG --title "MESSAGE BOX (width $width)" --no-collapse "$@" \
        --msgbox "\
This sample is written in UTF-8.
There are several checking points:
(1) whether the fullwidth characters are displayed well or not,
(2) whether the width of characters are evaluated properly, and
(3) whether the character at line-folding is lost or not.

あいうえおかきくけこさしすせそたちつてとなにぬねの
1234567890123456789012345
ABCDEFGHIJKLMNOPQRSTUVWXY

Hi, this is a simple message box.  You can use this to \
display any message you like.  The box will remain until \
you press the ENTER key." 22 $width
returncode=$?

case $returncode in
  $DIALOG_OK)
    ;;
  *)
    . ./report-button;
    exit
    ;;
esac

width=`expr $width + 1`

done