]> CyberLeo.Net >> Repos - FreeBSD/releng/9.2.git/blob - contrib/dialog/samples/msgbox4-eucjp
- Copy stable/9 to releng/9.2 as part of the 9.2-RELEASE cycle.
[FreeBSD/releng/9.2.git] / contrib / dialog / samples / msgbox4-eucjp
1 #!/bin/sh
2 # $Id: msgbox4-eucjp,v 1.5 2010/01/13 10:20:03 tom Exp $
3
4 . ./setup-vars
5
6 width=35
7 while test $width != 61
8 do
9 $DIALOG --title "MESSAGE BOX (width $width)" --clear --no-collapse "$@" \
10         --msgbox "\
11 This sample is written in EUC-JP.
12 There are several checking points:
13 (1) whether the fullwidth characters are displayed well or not,
14 (2) whether the width of characters are evaluated properly, and
15 (3) whether the character at line-folding is lost or not.
16
17 ¤¢¤¤¤¦¤¨¤ª¤«¤­¤¯¤±¤³¤µ¤·¤¹¤»¤½¤¿¤Á¤Ä¤Æ¤È¤Ê¤Ë¤Ì¤Í¤Î
18 £±£²£³£´£µ£¶£·£¸£¹£°£±£²£³£´£µ£¶£·£¸£¹£°£±£²£³£´£µ
19 £Á£Â£Ã£Ä£Å£Æ£Ç£È£É£Ê£Ë£Ì£Í£Î£Ï£Ð£Ñ£Ò£Ó£Ô£Õ£Ö£×£Ø£Ù
20
21 Hi, this is a simple message box.  You can use this to \
22 display any message you like.  The box will remain until \
23 you press the ENTER key." 22 $width
24 width=`expr $width + 1`
25 done