home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: Multimed / Multimed.zip / chord3_6.zip / chord / iso.c < prev    next >
C/C++ Source or Header  |  1995-04-25  |  8KB  |  237 lines
  1. static char SccsId[] = "@(#)iso.c    3.6\t Mar. 1995";
  2. static char copyright[] = "Copyright 1991-1995 by Martin Leclerc & Mario Dorion";
  3.  
  4. #include <stdio.h>
  5.  
  6. void print_re_encode ()
  7. {
  8.     printf("%%  iso.ps  reencodeing of ISO 8859-1 8-bit french characters\n");
  9.     printf("%%\n");
  10.     printf("/reencodedict 5 dict def\n");
  11.     printf("/ReEncode\n");
  12.     printf("  { reencodedict begin\n");
  13.     printf("      /newencoding exch def\n");
  14.     printf("      /newfontname exch def\n");
  15.     printf("      /basefontname exch def\n");
  16.     printf("\n");
  17.     printf("      /basefontdict basefontname findfont def\n");
  18.     printf("\n");
  19.     printf("      /newfont basefontdict maxlength dict def\n");
  20.     printf("\n");
  21.     printf("      basefontdict\n");
  22.     printf("      {  exch dup dup /FID ne exch /Encoding ne and\n");
  23.     printf("    { exch newfont 3 1 roll put }\n");
  24.     printf("    { pop pop }\n");
  25.     printf("    ifelse\n");
  26.     printf("      } forall\n");
  27.     printf("      newfont /FontName newfontname put\n");
  28.     printf("      newfont /Encoding newencoding put\n");
  29.     printf("      newfontname newfont definefont pop\n");
  30.     printf("      end\n");
  31.     printf("   } def\n");
  32.     printf("\n");
  33.     printf("/ISO 256 array def\n");
  34.     printf("\n");
  35.     printf("0 1 255 { ISO exch /.notdef put } for\n");
  36.     printf("ISO\n");
  37.     printf("\n");
  38.     printf("  dup 8#040 /space put\n");
  39.     printf("  dup 8#041 /exclam put\n");
  40.     printf("  dup 8#042 /quotedbl put\n");
  41.     printf("  dup 8#043 /numbersign put\n");
  42.     printf("  dup 8#044 /dollar put\n");
  43.     printf("  dup 8#045 /percent put\n");
  44.     printf("  dup 8#046 /ampersand put\n");
  45.     printf("  dup 8#047 /quotesingle put\n");
  46.     printf("  dup 8#050 /parenleft put\n");
  47.     printf("  dup 8#051 /parenright put\n");
  48.     printf("  dup 8#052 /asterisk put\n");
  49.     printf("  dup 8#053 /plus put\n");
  50.     printf("  dup 8#054 /comma put\n");
  51.     printf("  dup 8#055 /hyphen put\n");
  52.     printf("  dup 8#056 /period put\n");
  53.     printf("  dup 8#057 /slash put\n");
  54.     printf("  dup 8#060 /zero put\n");
  55.     printf("  dup 8#061 /one put\n");
  56.     printf("  dup 8#062 /two put\n");
  57.     printf("  dup 8#063 /three put\n");
  58.     printf("  dup 8#064 /four put\n");
  59.     printf("  dup 8#065 /five put\n");
  60.     printf("  dup 8#066 /six put\n");
  61.     printf("  dup 8#067 /seven put\n");
  62.     printf("  dup 8#070 /eight put\n");
  63.     printf("  dup 8#071 /nine put\n");
  64.     printf("  dup 8#072 /colon put\n");
  65.     printf("  dup 8#073 /semicolon put\n");
  66.     printf("  dup 8#074 /less put\n");
  67.     printf("  dup 8#075 /equal put\n");
  68.     printf("  dup 8#076 /greater put\n");
  69.     printf("  dup 8#077 /question put\n");
  70.     printf("  dup 8#100 /at put\n");
  71.     printf("  dup 8#101 /A put\n");
  72.     printf("  dup 8#102 /B put\n");
  73.     printf("  dup 8#103 /C put\n");
  74.     printf("  dup 8#104 /D put\n");
  75.     printf("  dup 8#105 /E put\n");
  76.     printf("  dup 8#106 /F put\n");
  77.     printf("  dup 8#107 /G put\n");
  78.     printf("  dup 8#110 /H put\n");
  79.     printf("  dup 8#111 /I put\n");
  80.     printf("  dup 8#112 /J put\n");
  81.     printf("  dup 8#113 /K put\n");
  82.     printf("  dup 8#114 /L put\n");
  83.     printf("  dup 8#115 /M put\n");
  84.     printf("  dup 8#116 /N put\n");
  85.     printf("  dup 8#117 /O put\n");
  86.     printf("  dup 8#120 /P put\n");
  87.     printf("  dup 8#121 /Q put\n");
  88.     printf("  dup 8#122 /R put\n");
  89.     printf("  dup 8#123 /S put\n");
  90.     printf("  dup 8#124 /T put\n");
  91.     printf("  dup 8#125 /U put\n");
  92.     printf("  dup 8#126 /V put\n");
  93.     printf("  dup 8#127 /W put\n");
  94.     printf("  dup 8#130 /X put\n");
  95.     printf("  dup 8#131 /Y put\n");
  96.     printf("  dup 8#132 /Z put\n");
  97.     printf("  dup 8#133 /bracketleft put\n");
  98.     printf("  dup 8#134 /backslash put\n");
  99.     printf("  dup 8#135 /bracketright put\n");
  100.     printf("  dup 8#136 /asciicircum put\n");
  101.     printf("  dup 8#137 /underscore put\n");
  102.     printf("  dup 8#140 /grave put\n");
  103.     printf("  dup 8#141 /a put\n");
  104.     printf("  dup 8#142 /b put\n");
  105.     printf("  dup 8#143 /c put\n");
  106.     printf("  dup 8#144 /d put\n");
  107.     printf("  dup 8#145 /e put\n");
  108.     printf("  dup 8#146 /f put\n");
  109.     printf("  dup 8#147 /g put\n");
  110.     printf("  dup 8#150 /h put\n");
  111.     printf("  dup 8#151 /i put\n");
  112.     printf("  dup 8#152 /j put\n");
  113.     printf("  dup 8#153 /k put\n");
  114.     printf("  dup 8#154 /l put\n");
  115.     printf("  dup 8#155 /m put\n");
  116.     printf("  dup 8#156 /n put\n");
  117.     printf("  dup 8#157 /o put\n");
  118.     printf("  dup 8#160 /p put\n");
  119.     printf("  dup 8#161 /q put\n");
  120.     printf("  dup 8#162 /r put\n");
  121.     printf("  dup 8#163 /s put\n");
  122.     printf("  dup 8#164 /t put\n");
  123.     printf("  dup 8#165 /u put\n");
  124.     printf("  dup 8#166 /v put\n");
  125.     printf("  dup 8#167 /w put\n");
  126.     printf("  dup 8#170 /x put\n");
  127.     printf("  dup 8#171 /y put\n");
  128.     printf("  dup 8#172 /z put\n");
  129.     printf("  dup 8#173 /braceleft put\n");
  130.     printf("  dup 8#174 /bar put\n");
  131.     printf("  dup 8#175 /braceright put\n");
  132.     printf("  dup 8#176 /asciitilde put\n");
  133.     printf("  dup 8#241 /exclamdown put\n");
  134.     printf("  dup 8#242 /cent put\n");
  135.     printf("  dup 8#243 /sterling put\n");
  136.     printf("  dup 8#244 /currency put\n");
  137.     printf("  dup 8#245 /yen put\n");
  138.     printf("  dup 8#246 /bar put\n");
  139.     printf("  dup 8#247 /section put\n");
  140.     printf("  dup 8#250 /dieresis put\n");
  141.     printf("  dup 8#251 /copyright put\n");
  142.     printf("  dup 8#252 /ordfeminine put\n");
  143.     printf("  dup 8#253 /guillemotleft put\n");
  144.     printf("  dup 8#254 /.notdef put\n");
  145.     printf("  dup 8#255 /endash put\n");
  146.     printf("  dup 8#256 /registered put\n");
  147.     printf("  dup 8#257 /tilde put\n");
  148.     printf("  dup 8#260 /ring put\n");
  149.     printf("  dup 8#261 /.notdef put\n");
  150.     printf("  dup 8#262 /.notdef put\n");
  151.     printf("  dup 8#263 /.notdef put\n");
  152.     printf("  dup 8#264 /acute put\n");
  153.     printf("  dup 8#265 /.notdef put\n");
  154.     printf("  dup 8#266 /paragraph put\n");
  155.     printf("  dup 8#267 /.notdef put\n");
  156.     printf("  dup 8#270 /cedilla put\n");
  157.     printf("  dup 8#271 /.notdef put\n");
  158.     printf("  dup 8#272 /ordmasculine put\n");
  159.     printf("  dup 8#273 /guillemotright put\n");
  160.     printf("  dup 8#274 /.notdef put\n");
  161.     printf("  dup 8#275 /circumflex put\n");
  162.     printf("  dup 8#276 /dotlessi put\n");
  163.     printf("  dup 8#277 /questiondown put\n");
  164.     printf("  dup 8#300 /Agrave put\n");
  165.     printf("  dup 8#301 /Aacute put\n");
  166.     printf("  dup 8#302 /Acircumflex put\n");
  167.     printf("  dup 8#303 /Atilde put\n");
  168.     printf("  dup 8#304 /Adieresis put\n");
  169.     printf("  dup 8#305 /Aring put\n");
  170.     printf("  dup 8#306 /AE put\n");
  171.     printf("  dup 8#307 /Ccedilla put\n");
  172.     printf("  dup 8#310 /Egrave put\n");
  173.     printf("  dup 8#311 /Eacute put\n");
  174.     printf("  dup 8#312 /Ecircumflex put\n");
  175.     printf("  dup 8#313 /Edieresis put\n");
  176.     printf("  dup 8#314 /Igrave put\n");
  177.     printf("  dup 8#315 /Iacute put\n");
  178.     printf("  dup 8#316 /Icircumflex put\n");
  179.     printf("  dup 8#317 /Idieresis put\n");
  180.     printf("  dup 8#320 /.notdef put\n");
  181.     printf("  dup 8#321 /Ntilde put\n");
  182.     printf("  dup 8#322 /Ograve put\n");
  183.     printf("  dup 8#323 /Oacute put\n");
  184.     printf("  dup 8#324 /Ocircumflex put\n");
  185.     printf("  dup 8#325 /Otilde put\n");
  186.     printf("  dup 8#326 /Odieresis put\n");
  187.     printf("  dup 8#327 /.notdef put\n");
  188.     printf("  dup 8#330 /Oslash put\n");
  189.     printf("  dup 8#331 /Ugrave put\n");
  190.     printf("  dup 8#332 /Uacute put\n");
  191.     printf("  dup 8#333 /Ucircumflex put\n");
  192.     printf("  dup 8#334 /Udieresis put\n");
  193.     printf("  dup 8#335 /.notdef put\n");
  194.     printf("  dup 8#336 /.notdef put\n");
  195.     printf("  dup 8#337 /germandbls put\n");
  196.     printf("  dup 8#340 /agrave put\n");
  197.     printf("  dup 8#341 /aacute put\n");
  198.     printf("  dup 8#342 /acircumflex put\n");
  199.     printf("  dup 8#343 /atilde put\n");
  200.     printf("  dup 8#344 /adieresis put\n");
  201.     printf("  dup 8#345 /aring put\n");
  202.     printf("  dup 8#346 /ae put\n");
  203.     printf("  dup 8#347 /ccedilla put\n");
  204.     printf("  dup 8#350 /egrave put\n");
  205.     printf("  dup 8#351 /eacute put\n");
  206.     printf("  dup 8#352 /ecircumflex put\n");
  207.     printf("  dup 8#353 /edieresis put\n");
  208.     printf("  dup 8#354 /igrave put\n");
  209.     printf("  dup 8#355 /iacute put\n");
  210.     printf("  dup 8#356 /icircumflex put\n");
  211.     printf("  dup 8#357 /idieresis put\n");
  212.     printf("  dup 8#360 /.notdef put\n");
  213.     printf("  dup 8#361 /ntilde put\n");
  214.     printf("  dup 8#362 /ograve put\n");
  215.     printf("  dup 8#363 /oacute put\n");
  216.     printf("  dup 8#364 /ocircumflex put\n");
  217.     printf("  dup 8#365 /otilde put\n");
  218.     printf("  dup 8#366 /odieresis put\n");
  219.     printf("  dup 8#367 /.notdef put\n");
  220.     printf("  dup 8#370 /oslash put\n");
  221.     printf("  dup 8#371 /ugrave put\n");
  222.     printf("  dup 8#372 /uacute put\n");
  223.     printf("  dup 8#373 /ucircumflex put\n");
  224.     printf("  dup 8#374 /udieresis put\n");
  225.     printf("  dup 8#375 /ydieresis put\n");
  226.     printf("  dup 8#376 /.notdef put\n");
  227.     printf("  pop\n");
  228.     printf("\n");
  229.     printf("\n");
  230. }
  231.  
  232. void re_encode (font)
  233. char *font;
  234.     {
  235.     printf("/%s /%s ISO ReEncode\n", font, font); 
  236.     }
  237.