summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/omega/otp/char2uni/intis620.otp
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/omega/otp/char2uni/intis620.otp')
-rw-r--r--Master/texmf-dist/omega/otp/char2uni/intis620.otp34
1 files changed, 34 insertions, 0 deletions
diff --git a/Master/texmf-dist/omega/otp/char2uni/intis620.otp b/Master/texmf-dist/omega/otp/char2uni/intis620.otp
new file mode 100644
index 00000000000..9d3b250839f
--- /dev/null
+++ b/Master/texmf-dist/omega/otp/char2uni/intis620.otp
@@ -0,0 +1,34 @@
+% File intis620.otp
+% Conversion to Unicode from TIS 620-1986 (Thai+ASCII)
+% Copyright (c) 1995 John Plaice and Yannis Haralambous
+% This file is part of the Omega project.
+%
+% This file was derived from data in the tcs program
+% (ftp://plan9.att.com/plan9/unixsrc/tcs.shar.Z, 16 November 1994)
+%
+
+input: 1;
+output: 2;
+
+tables:
+
+tabtis620[@"60] = {
+@"FFFD, @"0E01, @"0E02, @"0E03, @"0E04, @"0E05, @"0E06, @"0E07,
+@"0E08, @"0E09, @"0E0A, @"0E0B, @"0E0C, @"0E0D, @"0E0E, @"0E0F,
+@"0E10, @"0E11, @"0E12, @"0E13, @"0E14, @"0E15, @"0E16, @"0E17,
+@"0E18, @"0E19, @"0E1A, @"0E1B, @"0E1C, @"0E1D, @"0E1E, @"0E1F,
+@"0E20, @"0E21, @"0E22, @"0E23, @"0E24, @"0E25, @"0E26, @"0E27,
+@"0E28, @"0E29, @"0E2A, @"0E2B, @"0E2C, @"0E2D, @"0E2E, @"0E2F,
+@"0E30, @"0E31, @"0E32, @"0E33, @"0E34, @"0E35, @"0E36, @"0E37,
+@"0E38, @"0E39, @"0E3A, @"FFFD, @"FFFD, @"FFFD, @"FFFD, @"0E3F,
+@"0E40, @"0E41, @"0E42, @"0E43, @"0E44, @"0E45, @"0E46, @"0E47,
+@"0E48, @"0E49, @"0E4A, @"0E4B, @"0E4C, @"0E4D, @"0E4E, @"0E4F,
+@"0E50, @"0E51, @"0E52, @"0E53, @"0E54, @"0E55, @"0E56, @"0E57,
+@"0E58, @"0E59, @"0E5A, @"0E5B, @"FFFD, @"FFFD, @"FFFD, @"FFFD
+};
+
+expressions:
+
+@"00-@"7F => \1;
+@"A0-@"FF => #(tabtis620[\1-@"60]);
+. => @"FFFD;