libkcc/euc.c

   1 #include "libkcc.h"
   2
   3 extern bool nogaiji;
   4
   5 /*---------------------------------------------------------------------
   6     NAME
   7         eucgaiji
   8  ---------------------------------------------------------------------*/
   9 void Kcc_eucgaiji(ddd, c1, c2)
  10     register int c1, c2;
  11     char **ddd;
  12 {
  13     if (nogaiji) {
  14         **ddd = ZENPAD >> 8 | 0x80; (*ddd)++;
  15         **ddd = (ZENPAD & 0xff) | 0x80; (*ddd)++;
  16     } else {
  17         **ddd = SS3; (*ddd)++;
  18         **ddd = c1 | 0x80; (*ddd)++;
  19         **ddd = c2 | 0x80; (*ddd)++;
  20     }
  21 }
  22
  23 /*---------------------------------------------------------------------
  24     NAME
  25         euckana
  26  ---------------------------------------------------------------------*/
  27 void Kcc_euckana(ddd, c)
  28     register int c;
  29     char **ddd;
  30 {
  31     **ddd = SS2; (*ddd)++;
  32     **ddd = (!nogaiji || (0x20 < c && c < 0x60) ? c : HANPAD) | 0x80;
  33     (*ddd)++;
  34 }
  35
  36 /*---------------------------------------------------------------------
  37     NAME
  38         euckanji
  39  ---------------------------------------------------------------------*/
  40 void Kcc_euckanji(ddd, c1, c2)
  41     register int c1, c2;
  42     char **ddd;
  43 {
  44     **ddd = c1 | 0x80; (*ddd)++;
  45     **ddd = c2 | 0x80; (*ddd)++;
  46 }
  47