Terminal control/Unicode output: Difference between revisions

From Rosetta Code
Content added Content deleted
Line 14: Line 14:
if (ENVIRON["LANG"] !~ "UTF")
if (ENVIRON["LANG"] !~ "UTF")
unicodeterm=0 # This terminal does not support Unicode
unicodeterm=0 # This terminal does not support Unicode
done
end
done
end


if (unicodeterm)
if (unicodeterm)
Line 24: Line 24:
# U+25B3 => UTF-8 342 226 263
# U+25B3 => UTF-8 342 226 263
"/usr/bin/printf \\342\\226\\263\\n"
"/usr/bin/printf \\342\\226\\263\\n"
done
end
else
else
do
do
print "HW65001 This program requires a Unicode compatible terminal"|"cat 1>&2"
print "HW65001 This program requires a Unicode compatible terminal"|"cat 1>&2"
exit 252 # Incompatible hardware
exit 252 # Incompatible hardware
done</lang>
end</lang>


=={{header|UNIX Shell}}==
=={{header|UNIX Shell}}==

Revision as of 20:28, 11 September 2011

Terminal control/Unicode output is a draft programming task. It is not yet considered ready to be promoted as a complete task, for reasons that should be found in its talk page.

The task is to check that the terminal supports Unicode output, before outputting a Unicode character. If the terminal supports Unicode, then the terminal should output a Unicode delta (U+25b3). If the terminal does not support Unicode, then an appropriate error should be raised.

AWK

<lang awk>#!/usr/bin/awk -f BEGIN {

 unicodeterm=1   # Assume Unicode support
 if (ENVIRON["LC_ALL"] !~ "UTF")
   do
     if (ENVIRON["LC_CTYPE"] !~ "UTF")
       do
         if (ENVIRON["LANG"] !~ "UTF")
           unicodeterm=0    # This terminal does not support Unicode
       end        
   end
 if (unicodeterm)
   do
     # This terminal supports Unicode
     # We need a Unicode compatible printf, so we source this externally
     # printf might not know \u or \x, so use octal.
     # U+25B3 => UTF-8 342 226 263
     "/usr/bin/printf \\342\\226\\263\\n"
   end
 else
   do
     print "HW65001 This program requires a Unicode compatible terminal"|"cat 1>&2"
   exit 252    # Incompatible hardware
   end</lang>

UNIX Shell

Works with: Bourne Shell

<lang bash>unicode_tty() {

 # LC_ALL supersedes LC_CTYPE, which supersedes LANG.
 case y in
 ${LC_ALL:+y})		unset "$LC_ALL";;
 ${LC_CTYPE:+y})	unset "$LC_CTYPE";;
 ${LANG:+y})		unset "$LANG";;
 y)			return 1;;
 esac
 # We use 'case' to perform pattern matching against a string.
 case "$1" in
 *UTF-8*)		return 0;;
 *)			return 1;;
 esac

}

if unicode_tty; then

 # printf might not know \u or \x, so use octal.
 # U+25B3 => UTF-8 342 226 263
 printf "\342\226\263\n"

else

 echo "HW65001 This program requires a Unicode compatible terminal" >&2
 exit 252    # Incompatible hardware

fi</lang>

ZX Spectrum Basic

<lang zxbasic>10 REM There is no Unicode delta in ROM 20 REM So we first define a custom character 30 FOR l=0 TO 7 40 READ n 50 POKE USR "d"+l,n 60 NEXT l 70 REM our custom character is a user defined d 80 PRINT CHR$(147): REM this outputs our delta 9500 REM data for our custom delta 9510 DATA 0,0,8,20,34,65,127,0 </lang>