kraut.dir/kraut.l

   1 %e 2000
   2 %p 5000
   3 %n 1000
   4 %k 500
   5 %a 4000
   6 %o 2000
   7 BW [      ]
   8 EW [      .,;!?]
   9
  10 %{
  11 #define YY_DECL const char *yylex(void)
  12      char buf[128];
  13
  14 %}
  15
  16 %%
  17 ing                  return("ingkt");
  18 " the "             return(" ze ");
  19 "The "              return("Ze ");
  20 " with "            return(" mitt ");
  21 "With "             return("Mitt ");
  22 wr                  return("w-r-r");
  23 Wr                  return("W-r-r");
  24 R                   return("R-r-r");
  25 "Yes "              return("Jawohl ");
  26 " r"                return(" r-r-r");
  27 "Yes."              return("Jawohl.");
  28 "Yes!"              return("Jawohl!");
  29 "YES!"              return("JAWOHL!");
  30 " yes "             return(" ja ");
  31 " yes."             return(" ja.");
  32 " yes!"             return(" yes!");
  33 "No "               return("Nein ");
  34 "No!"               return("Nein!");
  35 "No?"               return("Nein?");
  36 " no "              return(" nein ");
  37 " no."              return(" nein.");
  38 " no!"              return(" nein!");
  39 " no?"              return(" nein?");
  40 [Mm]"r."            return("Herr");
  41 [Mm]"rs."           return("Frau");
  42 Miss                return("Fraulein");
  43 " of "              return(" uff ");
  44 "Of "               return("Uff ");
  45 my                  return("mein");
  46 My                  return("Mein");
  47 " and "             return(" undt ");
  48 "And "              return("Undt ");
  49 "One "              return("Ein ");
  50 " one"              return(" ein");
  51 "Is "               return("Ist ");
  52 " is "              return(" ist ");
  53 "ow "               return("ow ");
  54 "w "                return("w ");
  55 sh                  return("sch");
  56 Sh                  return("Sch");
  57 ch                  return("ch");
  58 Ch                  return("Ch");
  59 " c"                return(" k");
  60 " C"                return(" K");
  61
  62 v                   return("f");
  63 V                   return("F");
  64 " w"                return(" v");
  65 W                   return("V");
  66 th                  return("d");
  67 Th                  return("D");
  68 [Jj]ohn             return("Johann");
  69 [Ww]illiam          return("Wilhelm");
  70 [Bb]rad             return("Wilhelm");
  71 [Gg]ary             return("Gerhardt");
  72 [Jj]on              return("Hansel");
  73
  74 [a-f]"!"       {sprintf(buf,"%s Naturlich!",yytext);return(buf);}
  75 [p-z]"!"       {sprintf(buf,"%s Sieg Heil!",yytext);return(buf);}
  76 .              return(yytext);
  77 \n             return("\n");
  78
  79 %%
  80
  81