!*** MODULE $TTCDEF ***
!DEC$ OPTIONS/ALIGN=(RECORDS=PACKED,COMMONS=PACKED)/NOWARN
	PARAMETER TTC$M_RESERVED = '000000FF'X
	PARAMETER TTC$M_KANA = '00000100'X
	PARAMETER TTC$M_KANJI = '00000200'X
	PARAMETER TTC$M_HANZI = '00000400'X
	PARAMETER TTC$M_HANGUL = '00000800'X
	PARAMETER TTC$M_HANYU = '00001000'X
	PARAMETER TTC$M_THAI = '00002000'X
	STRUCTURE /TTCDEF/
	UNION
	    MAP
	        PARAMETER TTC$S_RESERVED = 8
	        PARAMETER TTC$V_RESERVED = 0		 !  First byte is reserved
	        PARAMETER TTC$S_KANA = 1
	        PARAMETER TTC$V_KANA = 8		 !  Katakana
	        PARAMETER TTC$S_KANJI = 1
	        PARAMETER TTC$V_KANJI = 9		 !  Kanji
	        PARAMETER TTC$S_HANZI = 1
	        PARAMETER TTC$V_HANZI = 10		 !  Hanzi
	        PARAMETER TTC$S_HANGUL = 1
	        PARAMETER TTC$V_HANGUL = 11		 !  Hangul
	        PARAMETER TTC$S_HANYU = 1
	        PARAMETER TTC$V_HANYU = 12		 !  Hanyu
	        PARAMETER TTC$S_THAI = 1
	        PARAMETER TTC$V_THAI = 13		 !  Thai
	    BYTE %FILL (2)
	    END MAP
	END UNION
	END STRUCTURE	! TTCDEF
!DEC$ END OPTIONS