home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / fj / kanji / 736 < prev    next >
Encoding:
Text File  |  1993-01-23  |  3.5 KB  |  96 lines
  1. Newsgroups: fj.kanji
  2. Path: sparky!uunet!ccut!news.u-tokyo.ac.jp!wnoc-tyo-news!etl.go.jp!handa
  3. From: handa@etlken.etl.go.jp (Kenichi Handa)
  4. Subject: Re: Call For Discussion on Multilingual text posting
  5. In-Reply-To: handa@etlken.etl.go.jp's message of Fri, 22 Jan 1993 09: 05:46 GMT
  6. Message-ID: <HANDA.93Jan23110003@etlken.etl.go.jp>
  7. Sender: news@etl.go.jp (News System)
  8. Nntp-Posting-Host: etlken
  9. Organization: Electrotechnical Lab., Japan.
  10. References: <HANDA.93Jan22180546@etlken.etl.go.jp>
  11. Distribution: fj
  12. Date: Sat, 23 Jan 1993 02:00:03 GMT
  13. Lines: 81
  14.  
  15. In article <HANDA.93Jan22180546@etlken.etl.go.jp>
  16.     handa@etlken.etl.go.jp (Kenichi Handa) writes:
  17. >> $B!V%P%$%H?t!aI=<(I}!W$G$O:Q$^$;$F$$$^$;$s!#Nc$($P(B
  18. >>                 if (ISJISKANJI1(c, multiindex))
  19. >>                 {
  20. >>                         multilen = 2;
  21. >> ...
  22.  
  23. $B$9$$$^$;$s!#$3$l$OE,Ev$JItJ,$G$O$"$j$^$;$s$G$7$?!#(Bless177
  24. $B$K4X$7$F$O(B line.c $B$N(B
  25.         switch (a & MULTIMASK)
  26.         {
  27.         case KANJI1: return (2);
  28.         case KANJI2: return (0);
  29.         case KANA1:  return (1);
  30.         case KANA2:  return (0);
  31.         case OTHER1: return (2);
  32.         case OTHER2: return (0);
  33.         case OTHER3: return (0);
  34.         case OTHER4: return (0);
  35.         }
  36. $B$NJ}$,E,Ev$JNc$G$7$g$&!#$=$l$+$i!"(B
  37.  
  38. >> $B$7$+$b>e5-$ONc$($P(B ISO5589-5 (Cyrillic) $B$K$OBP1~$7$F$$$^$;$s(B
  39.  
  40. $B$3$l$O(B exterm $B$K$D$$$F$O(B X Locale Definition File $B$rE,Ev$K@_(B
  41. $BDj$9$k$9$k$3$H$K$h$C$F2DG=$G$7$?!#(B
  42.  
  43. >> $B$h$M!#$3$NJ8;z%;%C%H$r;H$&$3$H$K$J$C$?;~$K$O$I$&$;=$@5$,I,MW(B
  44. >> $B$G$9!#$=$N:]$K(B ESC,<F> $B$rF~$l$k$N$O$=$l$3$=$[$s$N$A$g$C$H$7(B
  45. >> $B$?:n6H$G:Q$_$^$9!#(B
  46.  
  47. $B$A$J$_$K:#(B V11R5/mit/lib/X/Xsi/XInitCT.c $B$rGA$$$?$i(B
  48. ------------------------------------------------------------
  49. /*
  50.  * Add one more for Taiwan.
  51.  * It would be better to invoke final characters for Taiwan into 03/01
  52.  * and 03/02 in accordance with ISO 2022 because it has not registered yet.
  53.  * However strict CT definition contains the following statements:
  54.  *
  55.  *    [Final characters for private encodings (in the range 03/00 to 03/15),
  56.  *    are not permitted here in Compound Text.]  
  57.  *
  58.  * Ooh,Ooh!
  59.  * So the final characters for Taiwan is defined to 05/01 and 05/02.
  60.  *
  61.  * By Li Yuhong, Nov. 20, 1990
  62. */
  63. #ifdef  nodef
  64. #define NTW2312_1       "tw2312-1.1980-0"
  65. #define NTW2312_2       "tw2312-2.1980-0"
  66. #define ETW2312_1       "\033$(Y"       /* Taiwan Font1, not registered yet.*/
  67. #define ETW2312_2       "\033$(Z"       /* Taiwan Font2, not registered yet.*/
  68. #define WTW2312_1       PrivatePlaneLastI11
  69. #define WTW2312_2       PrivatePlaneLastI10
  70. #endif
  71. ------------------------------------------------------------
  72. $B$J$s$F5-=R$,$"$k!*(B tw2312-1 $B$C$F(B CNS $B$NBh0lLL$N$3$H$@$m$&$+!#(B
  73. $B$^$@(B #ifdef nodef $B$NCf$@$1$I>-Mh(B Xsi $B$O$I$&$9$k$s$@$m$&!#(B
  74.  
  75. $B$=$l$+$i!"F1$8%U%!%$%k$N(B
  76. ------------------------------------------------------------
  77. _XctisGLdsg(dsg)
  78.     char *dsg;
  79. {
  80.     if (*(dsg+1) == '(' || *(dsg+2) == '(')
  81.         return (True);
  82.     else if (*(dsg+1) == ')' || *(dsg+2) == ')' || *(dsg+1) == '-')
  83.         return (False);
  84.     else if (*(dsg+1) == '$' &&
  85.                 (*(dsg+2) == '@' || *(dsg+2) == 'A' || *(dsg+2) == 'B'))
  86.         return (True);
  87.     return (False);
  88. }
  89. ------------------------------------------------------------ 
  90. $B$r$A$g$3$C$H=$@5$9$l$P(B exterm $B$G$b(B ESC,<F> $B$,;H$($k$h$&$K$J(B
  91. $B$k$N$+$J!)(B $B$=$l$K$7$F$b(B X $B%3%s%=!<%7%"%`!J$+$J!"$"$k$$$O(B Xsi 
  92. $B$r$d$C$F$$$k$H$3$m!)!K$K$3$l$rDs0F$9$k$N$OLLE]$=$&$@$J$!!#(B
  93.  
  94. $B!]!]!!$1$s$A$c$s!w#E#T#L(B
  95.       handa@etl.go.jp
  96.