+++ /dev/null
-%{
-/* Title: English to Texan translator
- * Author: Adam Hudd (adam@dadhb1.ti.com)
- * Date: 5 March 1991
- * Version: 1.0
- *
- * Input: stdin
- * Output: stdout
- * compile: flex -iL drawl.l ; cc -O lex.yy.c -o drawl
- */
-
-#include <stdio.h>
-#include <ctype.h>
-
-void changeCase();
-%}
-%%
-(^|" ")"American" changeCase(" Amerkin");
-(^|" ")"California" changeCase(" Caleyfornyuh");
-(^|" ")"Dallas" changeCase(" Big D.");
-(^|" ")"Fort Worth" changeCase(" Fowert Wurth");
-(^|" ")"Houston" changeCase(" Useton");
-(^|" ")"I don't know" changeCase(" I-O-no");
-(^|" ")"I will"|" I'll" changeCase(" Ahl");
-(^|" ")"I would" changeCase(" Ahd");
-(^|" ")"I " changeCase(" Ah ");
-(^|" ")"I'm "|" I am " changeCase(" Ahm ");
-(^|" ")"I've "|" I have " changeCase(" Ahv ");
-(^|" ")"Mexico" changeCase(" Messyco");
-(^|" ")"San Antonio" changeCase(" Santone");
-(^|" ")"TV"|" television"|" telly" changeCase(" tayvay");
-(^|" ")"Texan" changeCase(" Texun");
-(^|" ")"Texas" changeCase(" Teksus");
-(^|" ")"a while " changeCase(" uhwahl ");
-(^|" ")"a " changeCase(" uh ");
-(^|" ")"about" changeCase(" bout");
-(^|" ")"adult" changeCase(" a-dult");
-(^|" ")"afraid" changeCase(" frayed");
-(^|" ")"and " changeCase(" an ");
-(^|" ")"anniversary" changeCase(" anavarsry");
-(^|" ")"any " changeCase(" no ");
-(^|" ")"anywhere" changeCase(" anywhare");
-(^|" ")"appreciate" changeCase(" preshate");
-(^|" ")"april" changeCase(" abrul");
-(^|" ")"are going to" changeCase(" sargunna");
-(^|" ")"are known" changeCase(" iz node");
-(^|" ")"are " changeCase(" is ");
-(^|" ")"aren't you" changeCase(" arncha");
-(^|" ")"at them" changeCase(" attum");
-(^|" ")"august" changeCase(" awg-ghust");
-(^|" ")"away" changeCase(" awf");
-(^|" ")"awkward" changeCase(" aukerd");
-(^|" ")"bad" changeCase(" bayud");
-(^|" ")"ball" changeCase(" bawl");
-(^|" ")"baptists" changeCase(" babtusses");
-(^|" ")"barbed" changeCase(" bob");
-(^|" ")"be " changeCase(" bay ");
-(^|" ")"bear" changeCase(" bayur");
-(^|" ")"beautiful" changeCase(" butiful");
-(^|" ")"because" changeCase(" cuz");
-(^|" ")"believe" changeCase(" bleeve");
-(^|" ")"bitty" changeCase(" biddy");
-(^|" ")"black" changeCase(" blaak");
-(^|" ")"blue" changeCase(" bulloo");
-(^|" ")"born" changeCase(" bornd");
-(^|" ")"brake" changeCase(" brayke");
-(^|" ")"break" changeCase(" brayke");
-(^|" ")"brick" changeCase(" breck");
-(^|" ")"brighter" changeCase(" brotter");
-(^|" ")"bringing" changeCase(" brangin");
-(^|" ")"brown" changeCase(" braoyone");
-(^|" ")"building" changeCase(" bildun");
-(^|" ")"bulb" changeCase(" bub");
-(^|" ")"call you " changeCase(" cawya ");
-(^|" ")"called you " changeCase(" cawdja ");
-(^|" ")"camera" changeCase(" Instuhmatik");
-(^|" ")"can't" changeCase(" kaynt");
-(^|" ")"can't"|" can not"|" cannot" changeCase(" kaynt");
-(^|" ")"capital" changeCase(" captul");
-(^|" ")"car " changeCase(" cawer ");
-(^|" ")"catch" changeCase(" ketch");
-(^|" ")"chair" changeCase(" chayer");
-(^|" ")"cheer" changeCase(" chair");
-(^|" ")"chicken" changeCase(" chikun");
-(^|" ")"child" changeCase(" kid");
-(^|" ")"children" changeCase(" kids");
-(^|" ")"clean" changeCase(" klane");
-(^|" ")"climate" changeCase(" kliment");
-(^|" ")"cold" changeCase(" code");
-(^|" ")"darker" changeCase(" dawerker");
-(^|" ")"deaf" changeCase(" dayuf");
-(^|" ")"death" changeCase(" dayuth");
-(^|" ")"december" changeCase(" deceyumbur");
-(^|" ")"definite" changeCase(" defnut");
-(^|" ")"did not"|" didn't" changeCase(" didunt");
-(^|" ")"did you" changeCase(" dja");
-(^|" ")"didn't it" changeCase(" diduhnit");
-(^|" ")"different" changeCase(" difernt");
-(^|" ")"difficult" changeCase(" difahkult");
-(^|" ")"divide" changeCase(" duhvide");
-(^|" ")"does" changeCase(" duz");
-(^|" ")"doesn't" changeCase(" don't");
-(^|" ")"dog " changeCase(" dawg ");
-(^|" ")"I don't care" changeCase(" don't make no nevur mind to may ");
-(^|" ")"door" changeCase(" dower");
-(^|" ")"dreaming" changeCase(" draimun");
-(^|" ")"drink" changeCase(" drank");
-(^|" ")"drinking" changeCase(" drankin");
-(^|" ")"drive" changeCase(" drahv");
-(^|" ")"eight" changeCase(" ate");
-(^|" ")"eighteen" changeCase(" a-tane");
-(^|" ")"eighth" changeCase(" athd");
-(^|" ")"eighty" changeCase(" ady");
-(^|" ")"eleven" changeCase(" lebum");
-(^|" ")"entire" changeCase(" entahr");
-(^|" ")"especially" changeCase(" speshuly");
-(^|" ")"even" changeCase(" evun");
-(^|" ")"evening" changeCase(" eevnun");
-(^|" ")"eventually" changeCase(" eventchly");
-(^|" ")"ever" changeCase(" evur");
-(^|" ")"every once in a while" changeCase(" evurwonsinawhahl");
-(^|" ")"every" changeCase(" evur");
-(^|" ")"exactly" changeCase(" zakly");
-(^|" ")"executive" changeCase(" zekatuv");
-(^|" ")"eye " changeCase(" ah ");
-(^|" ")"father" changeCase(" papa");
-(^|" ")"february" changeCase(" febberyawary");
-(^|" ")"fell " changeCase(" fayul ");
-(^|" ")"fifteen" changeCase(" fiftane");
-(^|" ")"fifth" changeCase(" fifd");
-(^|" ")"fifty" changeCase(" fifdy");
-(^|" ")"fight" changeCase(" fite");
-(^|" ")"figure" changeCase(" figger");
-(^|" ")"filling" changeCase(" fillin");
-(^|" ")"fine" changeCase(" fahn");
-(^|" ")"fire" changeCase(" far");
-(^|" ")"first" changeCase(" fursd");
-(^|" ")"five" changeCase(" fav");
-(^|" ")"fixing" changeCase(" fixin");
-(^|" ")"flower" changeCase(" flare");
-(^|" ")"follow" changeCase(" faller");
-(^|" ")"for " changeCase(" fahwar ");
-(^|" ")"forget" changeCase(" fergit");
-(^|" ")"fork" changeCase(" fowerk");
-(^|" ")"forty" changeCase(" fardy");
-(^|" ")"four" changeCase(" fower");
-(^|" ")"fourteen" changeCase(" fortane");
-(^|" ")"fourth" changeCase(" fowerth");
-(^|" ")"freeze" changeCase(" fraze");
-(^|" ")"friday" changeCase(" frydy");
-(^|" ")"from" changeCase(" frum");
-(^|" ")"front" changeCase(" frunt");
-(^|" ")"gas" changeCase(" gayus");
-(^|" ")"geography" changeCase(" joggerfee");
-(^|" ")"get a hold of you" changeCase(" gittaholdayew");
-(^|" ")"get" changeCase(" git");
-(^|" ")"going to" changeCase(" gunna");
-(^|" ")"going to" changeCase(" mona");
-(^|" ")"gold" changeCase(" gode");
-(^|" ")"got to " changeCase(" gotta ");
-(^|" ")"green" changeCase(" grane");
-(^|" ")"grey"|" gray" changeCase(" graey");
-(^|" ")"guests" changeCase(" guesss");
-(^|" ")"guitar" changeCase(" gitahwer");
-(^|" ")"gulf" changeCase(" guf");
-(^|" ")"hard" changeCase(" hayud");
-(^|" ")"have a " changeCase(" havuh ");
-(^|" ")"have not"|" haven't" changeCase(" habumt");
-(^|" ")"have " changeCase(" hav ");
-(^|" ")"he " changeCase(" hay ");
-(^|" ")"headed" changeCase(" hardud");
-(^|" ")"here" changeCase(" hare");
-(^|" ")"high" changeCase(" ha");
-(^|" ")"hour" changeCase(" air");
-(^|" ")"how are you" changeCase(" hyeru");
-(^|" ")"how do you do " changeCase(" howdee ");
-(^|" ")"huh!" changeCase(" hawh!");
-(^|" ")"huh?" changeCase(" hawh?");
-(^|" ")"hundred" changeCase(" hunnerd");
-(^|" ")"if I " changeCase(" fah ");
-(^|" ")"if it " changeCase(" hifit ");
-(^|" ")"if you" changeCase(" few");
-(^|" ")"if " changeCase(" hif ");
-"ing " changeCase("in' ");
-(^|" ")"ignorance" changeCase(" ignernt");
-(^|" ")"indian" changeCase(" hinyun");
-(^|" ")"inside" changeCase(" n-sod");
-(^|" ")"instead of" changeCase(" instudda");
-(^|" ")"institute" changeCase(" instatoot");
-(^|" ")"intersection" changeCase(" innersekshun");
-(^|" ")"is a " changeCase(" izza ");
-(^|" ")"is it " changeCase(" izit ");
-(^|" ")"is that " changeCase(" izzat ");
-(^|" ")"is that right " changeCase(" zatrot ");
-(^|" ")"is " changeCase(" iz ");
-(^|" ")"isn't it " changeCase(" hiduhnit ");
-(^|" ")"it appears" changeCase(" pears");
-(^|" ")"it would" changeCase(" hid");
-(^|" ")"it " changeCase(" hit ");
-(^|" ")"it'd " changeCase(" hid ");
-(^|" ")"it's"|" it is" changeCase(" hit's");
-(^|" ")"jail" changeCase(" jayul");
-(^|" ")"january" changeCase(" janyawary");
-(^|" ")"jeans" changeCase(" janes");
-(^|" ")"jet" changeCase(" jeyut");
-(^|" ")"jewelry" changeCase(" julry");
-(^|" ")"july" changeCase(" djoolie");
-(^|" ")"june" changeCase(" djoon");
-(^|" ")"just" changeCase(" gist");
-(^|" ")"kind of" changeCase(" kinduh");
-(^|" ")"king" changeCase(" kang");
-(^|" ")"library" changeCase(" liberry");
-(^|" ")"lie" changeCase(" lah");
-(^|" ")"life" changeCase(" lahf");
-(^|" ")"light" changeCase(" lot");
-(^|" ")"lighter" changeCase(" lahter");
-(^|" ")"like" changeCase(" lahk");
-(^|" ")"little" changeCase(" liddel");
-(^|" ")"log" changeCase(" lawg");
-(^|" ")"lot of" changeCase(" lottuh");
-(^|" ")"lots of" changeCase(" lotsa");
-(^|" ")"love" changeCase(" luv");
-(^|" ")"mall" changeCase(" mawl");
-(^|" ")"march" changeCase(" martch");
-(^|" ")"material" changeCase(" mahtearyul");
-(^|" ")"may" changeCase(" maey");
-(^|" ")"me " changeCase(" may ");
-(^|" ")"mile" changeCase(" mahl");
-(^|" ")"minute" changeCase(" minent");
-(^|" ")"monday" changeCase(" mundy");
-(^|" ")"mosquito" changeCase(" skeeter");
-(^|" ")"moss" changeCase(" mawce");
-(^|" ")"mother" changeCase(" ma");
-(^|" ")"mroone" changeCase(" maroon");
-(^|" ")"my " changeCase(" mah ");
-(^|" ")"myself" changeCase(" mahsef");
-(^|" ")"never" changeCase(" nevur");
-(^|" ")"nine" changeCase(" nahn");
-(^|" ")"nineteen" changeCase(" nontane");
-(^|" ")"nineth" changeCase(" nonth");
-(^|" ")"ninety" changeCase(" nondy");
-(^|" ")"no " changeCase(" naw ");
-(^|" ")"nothing" changeCase(" nuthun");
-(^|" ")"november" changeCase(" noveyumbur");
-(^|" ")"ocean" changeCase(" oshun");
-(^|" ")"october" changeCase(" oktobur");
-(^|" ")"of " changeCase(" uh ");
-(^|" ")"off" changeCase(" awf");
-(^|" ")"oil" changeCase(" all");
-(^|" ")"old " changeCase(" ode ");
-(^|" ")"one of " changeCase(" wunna ");
-(^|" ")"one " changeCase(" wun ");
-(^|" ")"only" changeCase(" monly");
-(^|" ")"opposite" changeCase(" opsit");
-(^|" ")"orange" changeCase(" arnjuh");
-(^|" ")"over there" changeCase(" ovare");
-(^|" ")"over" changeCase(" ovur");
-(^|" ")"parking" changeCase(" parkin");
-(^|" ")"people" changeCase(" paypul");
-(^|" ")"picture" changeCase(" pitchur");
-(^|" ")"pillow" changeCase(" pillar");
-(^|" ")"pine" changeCase(" pahn");
-(^|" ")"pink" changeCase(" pank");
-(^|" ")"please" changeCase(" playze");
-(^|" ")"pretty" changeCase(" purdy");
-(^|" ")"probably" changeCase(" probly");
-(^|" ")"purple" changeCase(" burpel");
-(^|" ")"queen" changeCase(" kwane");
-(^|" ")"quit" changeCase(" kewyut");
-(^|" ")"rather" changeCase(" ruthur");
-(^|" ")"ready" changeCase(" reddy");
-(^|" ")"real" changeCase(" reeyul");
-(^|" ")"really" changeCase(" rilly");
-(^|" ")"red" changeCase(" rayud");
-(^|" ")"right" changeCase(" rot");
-(^|" ")"ring" changeCase(" rang");
-(^|" ")"said" changeCase(" sayud");
-(^|" ")"sale" changeCase(" sayul");
-(^|" ")"sale"|" sail"|" sell" changeCase(" sayul");
-(^|" ")"saturday" changeCase(" sadderdy");
-(^|" ")"school" changeCase(" skoo");
-(^|" ")"screen" changeCase(" skrane");
-(^|" ")"second" changeCase(" sekunt");
-(^|" ")"see" changeCase(" say");
-(^|" ")"september" changeCase(" ceptimbur");
-(^|" ")"seven" changeCase(" sebum");
-(^|" ")"seventeen" changeCase(" sebumtane");
-(^|" ")"seventh" changeCase(" sebumthd");
-(^|" ")"seventy" changeCase(" sebumdy");
-(^|" ")"she" changeCase(" shay");
-(^|" ")"shirt" changeCase(" churt");
-(^|" ")"sign" changeCase(" sahn");
-(^|" ")"silver" changeCase(" seeyulvur");
-(^|" ")"sit" changeCase(" set");
-(^|" ")"sixteen" changeCase(" sickstane");
-(^|" ")"sixth" changeCase(" sicksed");
-(^|" ")"sixty" changeCase(" sicksdy");
-(^|" ")"siz" changeCase(" sicks");
-(^|" ")"smell" changeCase(" smayul");
-(^|" ")"smile" changeCase(" smahl");
-(^|" ")"softer" changeCase(" sowftur");
-(^|" ")"some of those" changeCase(" sumoze");
-(^|" ")"some" changeCase(" sum");
-(^|" ")"something" changeCase(" sumpn");
-(^|" ")"sometime" changeCase(" sumtom");
-(^|" ")"south" changeCase(" saowth");
-(^|" ")"speak" changeCase(" spake");
-(^|" ")"spring" changeCase(" sprang");
-(^|" ")"sprinkle" changeCase(" sprankul");
-(^|" ")"stadium" changeCase(" stadyum");
-(^|" ")"station" changeCase(" stayshun");
-(^|" ")"string" changeCase(" strang");
-(^|" ")"sunday" changeCase(" sundy");
-(^|" ")"sure" changeCase(" shore");
-(^|" ")"tale"|" tail" changeCase(" tayul");
-(^|" ")"talk" changeCase(" tawk");
-(^|" ")"talking" changeCase(" tawkin");
-(^|" ")"tall" changeCase(" tahl");
-(^|" ")"tan" changeCase(" tayun");
-(^|" ")"ten" changeCase(" teyun");
-(^|" ")"tenth" changeCase(" teyunth");
-(^|" ")"terible" changeCase(" tarbul");
-(^|" ")"terrible" changeCase(" tarbul");
-(^|" ")"that is"|" that's" changeCase(" thets");
-(^|" ")"that" changeCase(" thet");
-(^|" ")"the only" changeCase(" thonly");
-(^|" ")"the other" changeCase(" thuther");
-(^|" ")"the" changeCase(" thuh");
-(^|" ")"their" changeCase(" thur");
-(^|" ")"there" changeCase(" thare");
-(^|" ")"there" changeCase(" thayure");
-(^|" ")"they" changeCase(" thay");
-(^|" ")"thing" changeCase(" thang");
-(^|" ")"think" changeCase(" thank");
-(^|" ")"third" changeCase(" thurd");
-(^|" ")"thirteen" changeCase(" thurtane");
-(^|" ")"thirty" changeCase(" thurdy");
-(^|" ")"this" changeCase(" thus");
-(^|" ")"those" changeCase(" them");
-(^|" ")"thousand" changeCase(" thousun");
-(^|" ")"three" changeCase(" thray");
-(^|" ")"through" changeCase(" thoo");
-(^|" ")"throw" changeCase(" thow");
-(^|" ")"throw" changeCase(" throw");
-(^|" ")"thrown" changeCase(" thowed");
-(^|" ")"thursday" changeCase(" thursdy");
-(^|" ")"tie" changeCase(" tah");
-(^|" ")"tied" changeCase(" tahd");
-(^|" ")"tight" changeCase(" tot");
-(^|" ")"time" changeCase(" tom");
-(^|" ")"to " changeCase(" tuh ");
-(^|" ")"today" changeCase(" tuhday");
-(^|" ")"toilet" changeCase(" outhouse");
-(^|" ")"told" changeCase(" tode");
-(^|" ")"tommorrow" changeCase(" tuhmorrow");
-(^|" ")"tree" changeCase(" tray");
-(^|" ")"truck" changeCase(" truk");
-(^|" ")"tuesday" changeCase(" chewsdy");
-(^|" ")"twelve" changeCase(" twayulv");
-(^|" ")"twenty" changeCase(" twindy");
-(^|" ")"two " changeCase(" tew ");
-(^|" ")"understand" changeCase(" understaynd");
-(^|" ")"used to" changeCase(" ustuh");
-(^|" ")"vehicle" changeCase(" vee-hicul");
-(^|" ")"victory" changeCase(" viktray");
-(^|" ")"violation" changeCase(" vahlayshun");
-(^|" ")"virtual" changeCase(" vurchul");
-(^|" ")"want to " changeCase(" wonna ");
-(^|" ")"was that" changeCase(" wuzzat");
-(^|" ")"was" changeCase(" wuz");
-(^|" ")"wash" changeCase(" wartch");
-(^|" ")"water" changeCase(" warder");
-(^|" ")"we " changeCase(" way ");
-(^|" ")"wedding" changeCase(" wedden");
-(^|" ")"wednesday" changeCase(" winsdy");
-(^|" ")"well" changeCase(" wayul");
-(^|" ")"were " changeCase(" wuz ");
-(^|" ")"west " changeCase(" wayust ");
-(^|" ")"what did you" changeCase(" whudja");
-(^|" ")"what did" changeCase(" whuddle");
-(^|" ")"what do you" changeCase(" wadja");
-(^|" ")"what is the matter" changeCase(" smatter");
-(^|" ")"what is"|" what's" changeCase(" whut");
-(^|" ")"what" changeCase(" whut");
-(^|" ")"wheel" changeCase(" whale");
-(^|" ")"when" changeCase(" wheyun");
-(^|" ")"where did you" changeCase(" whardja");
-(^|" ")"where" changeCase(" whar");
-(^|" ")"where" changeCase(" whayer");
-(^|" ")"white" changeCase(" wot");
-(^|" ")"why don't you" changeCase(" y-oncha");
-(^|" ")"why" changeCase(" wha");
-(^|" ")"wife" changeCase(" waf");
-(^|" ")"window" changeCase(" wender");
-(^|" ")"winter" changeCase(" winner");
-(^|" ")"wire" changeCase(" war");
-(^|" ")"with you" changeCase(" witchew");
-(^|" ")"woman" changeCase(" whoamun");
-(^|" ")"women" changeCase(" wimmen");
-(^|" ")"world" changeCase(" warld");
-(^|" ")"worse than" changeCase(" worsun");
-(^|" ")"yard" changeCase(" chard");
-(^|" ")"yellow" changeCase(" yuller");
-(^|" ")"yes" changeCase(" u-betcha");
-(^|" ")"yes" changeCase(" yayus");
-(^|" ")"you " changeCase(" yawl ");
-(^|" ")"your are"|" you're" changeCase(" yore");
-(^|" ")"your" changeCase(" chur");
-.|'\n' ECHO;
-%%
-main()
-{
- yylex();
-}
-
-void changeCase(word)
-char *word;
-{
-extern char *yytext;
-
-/* change o/p to upper/lower based on original text */
- if (isupper(*(yytext+1)) && islower(*(word+1)))
- *(word+1) = toupper(*(word+1));
-
- printf(word);
-}