Terminal control/Unicode output
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 done done
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" done else do print "HW65001 This program requires a Unicode compatible terminal"|"cat 1>&2" exit 252 # Incompatible hardware done</lang>
UNIX 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>