home *** CD-ROM | disk | FTP | other *** search
/ Il CD di internet / CD.iso / SOURCE / D / CLISP / CLISPSRC.TAR / clisp-1995-01-01 / utils / charset / cvhpatari.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-07-23  |  3.3 KB  |  129 lines
  1. /* Konversionsprogramm HPUX-Zeichensatz -> Atari-Zeichensatz */
  2. /* Bruno Haible 5.9.1991 */
  3.  
  4. #include <stdio.h>
  5.  
  6. main ()
  7. { static int tabelle[256];
  8.   /* Tabelle initialisieren: */
  9.   int atari, hp;
  10. #define ATARI(x) atari=x;
  11. #define HP(y) hp=y;
  12. #define _ tabelle[hp]=atari;
  13.   { int i;
  14.     for (i=0;i<128;i++) { HP(i) ATARI(i) _ }
  15.   }
  16.   HP(160) ATARI(-1) _
  17.   HP(161) ATARI(182) _ /* └ */
  18.   HP(162) ATARI(-1) _
  19.   HP(163) ATARI(-1) _
  20.   HP(164) ATARI(-1) _
  21.   HP(165) ATARI(-1) _
  22.   HP(166) ATARI(-1) _
  23.   HP(167) ATARI(-1) _
  24.   HP(168) ATARI(186) _ /* ┤ */
  25.   HP(169) ATARI(-1) _
  26.   HP(170) ATARI(-1) _
  27.   HP(171) ATARI(185) _ /* ¿ */
  28.   HP(172) ATARI(-1) _
  29.   HP(173) ATARI(-1) _
  30.   HP(174) ATARI(-1) _
  31.   HP(175) ATARI(156) _ /* ú */
  32.   HP(176) ATARI(255) _ /* » */
  33.   HP(177) ATARI(-1) _
  34.   HP(178) ATARI(-1) _
  35.   HP(179) ATARI(248) _ /* ░ */
  36.   HP(180) ATARI(128) _ /* ╟ */
  37.   HP(181) ATARI(135) _ /* τ */
  38.   HP(182) ATARI(165) _ /* ╤ */
  39.   HP(183) ATARI(164) _ /* ± */
  40.   HP(184) ATARI(173) _ /* í */
  41.   HP(185) ATARI(168) _ /* ┐ */
  42.   HP(186) ATARI(-1) _
  43.   HP(187) ATARI(156) _ /* ú */
  44.   HP(188) ATARI(157) _ /* Ñ */
  45.   HP(189) ATARI(221) _ /* º */
  46.   HP(190) ATARI(159) _ /*  */
  47.   HP(191) ATARI(155) _ /* ó */
  48.   HP(192) ATARI(131) _ /* Γ */
  49.   HP(193) ATARI(136) _ /* Ω */
  50.   HP(194) ATARI(147) _ /* ⌠ */
  51.   HP(195) ATARI(150) _ /* √ */
  52.   HP(196) ATARI(160) _ /* ß */
  53.   HP(197) ATARI(130) _ /* Θ */
  54.   HP(198) ATARI(162) _ /* ≤ */
  55.   HP(199) ATARI(163) _ /* · */
  56.   HP(200) ATARI(133) _ /* α */
  57.   HP(201) ATARI(138) _ /* Φ */
  58.   HP(202) ATARI(149) _ /* ≥ */
  59.   HP(203) ATARI(151) _ /* ∙ */
  60.   HP(204) ATARI(132) _ /* Σ */
  61.   HP(205) ATARI(137) _ /* δ */
  62.   HP(206) ATARI(148) _ /* ÷ */
  63.   HP(207) ATARI(129) _ /* ⁿ */
  64.   HP(208) ATARI(143) _ /* ┼ */
  65.   HP(209) ATARI(140) _ /* ε */
  66.   HP(210) ATARI(178) _ /* ╪ */
  67.   HP(211) ATARI(146) _ /* ╞ */
  68.   HP(212) ATARI(134) _ /* σ */
  69.   HP(213) ATARI(161) _ /* φ */
  70.   HP(214) ATARI(179) _ /* ° */
  71.   HP(215) ATARI(145) _ /* µ */
  72.   HP(216) ATARI(142) _ /* ─ */
  73.   HP(217) ATARI(141) _ /* ∞ */
  74.   HP(218) ATARI(153) _ /* ╓ */
  75.   HP(219) ATARI(154) _ /* ▄ */
  76.   HP(220) ATARI(144) _ /* ╔ */
  77.   HP(221) ATARI(139) _ /* ∩ */
  78.   HP(222) ATARI(158) _ /* ▀ */
  79.   HP(223) ATARI(-1) _
  80.   HP(224) ATARI(-1) _
  81.   HP(225) ATARI(183) _ /* ├ */
  82.   HP(226) ATARI(176) _ /* π */
  83.   HP(227) ATARI(-1) _
  84.   HP(228) ATARI(-1) _
  85.   HP(229) ATARI(-1) _
  86.   HP(230) ATARI(-1) _
  87.   HP(231) ATARI(-1) _
  88.   HP(232) ATARI(-1) _
  89.   HP(233) ATARI(184) _ /* ╒ */
  90.   HP(234) ATARI(177) _ /* ⌡ */
  91.   HP(235) ATARI(-1) _
  92.   HP(236) ATARI(-1) _
  93.   HP(237) ATARI(-1) _
  94.   HP(238) ATARI(-1) _
  95.   HP(239) ATARI(152) _ /*   */
  96.   HP(240) ATARI(-1) _
  97.   HP(241) ATARI(-1) _
  98.   HP(242) ATARI(-1) _
  99.   HP(243) ATARI(230) _ /* ╡ */
  100.   HP(244) ATARI(188) _ /* ╢ */
  101.   HP(245) ATARI(-1) _
  102.   HP(246) ATARI(-1) _
  103.   HP(247) ATARI(172) _ /* ╝ */
  104.   HP(248) ATARI(171) _ /* ╜ */
  105.   HP(249) ATARI(166) _ /* ¬ */
  106.   HP(250) ATARI(167) _ /* ║ */
  107.   HP(251) ATARI(174) _ /* ½ */
  108.   HP(252) ATARI(-1) _
  109.   HP(253) ATARI(175) _ /* ╗ */
  110.   HP(254) ATARI(241) _ /* ▒ */
  111.   HP(255) ATARI(-1) _
  112. #undef _
  113. #undef HP
  114. #undef ATARI
  115.   { int fehler = 0;
  116.     int c;
  117.     while (!((c = getchar()) == EOF))
  118.       { c = tabelle[c];
  119.         if (c < 0) { fehler++; } else putchar(c);
  120.       }
  121.     if (!(fehler == 0))
  122.       { fprintf(stderr,"%d illegal characters\n",fehler); exit(1); }
  123.       else
  124.       if (ferror(stdin) || ferror(stdout))
  125.         { exit(1); }
  126.         else
  127.         { exit(0); }
  128. } }
  129.