From 2ad76bd43ca4c4bd1ca7dfc5f5e984b7341df7ad Mon Sep 17 00:00:00 2001 From: joey Date: Sat, 11 Sep 1999 04:28:29 +0000 Subject: [PATCH] Removed cruft --- aust.l | 171 ------------ b1ff.l | 302 --------------------- biffa.l | 265 ------------------- buck.l | 85 ------ censor.l | 103 ------- chef.l | 63 ----- cockney.l | 190 ------------- debian/changelog | 81 ++++++ debian/config | 65 ----- drawl.l | 426 ----------------------------- eleet.l | 48 ---- fin.l | 63 ----- fudd.l | 37 --- jive.l | 250 ----------------- ken.l | 283 -------------------- kraut.l | 82 ------ marc-barrett.l | 137 ---------- mb.l | 137 ---------- moo.l | 122 --------- newspeak.l | 677 ----------------------------------------------- nyc.l | 97 ------- valspeak.l | 134 ---------- 22 files changed, 81 insertions(+), 3737 deletions(-) delete mode 100644 aust.l delete mode 100644 b1ff.l delete mode 100644 biffa.l delete mode 100644 buck.l delete mode 100644 censor.l delete mode 100644 chef.l delete mode 100644 cockney.l delete mode 100644 debian/config delete mode 100644 drawl.l delete mode 100644 eleet.l delete mode 100644 fin.l delete mode 100644 fudd.l delete mode 100644 jive.l delete mode 100644 ken.l delete mode 100644 kraut.l delete mode 100644 marc-barrett.l delete mode 100644 mb.l delete mode 100644 moo.l delete mode 100644 newspeak.l delete mode 100644 nyc.l delete mode 100644 valspeak.l diff --git a/aust.l b/aust.l deleted file mode 100644 index 39313ae..0000000 --- a/aust.l +++ /dev/null @@ -1,171 +0,0 @@ -%e 3000 -%p 8000 -%n 2000 -%k 2000 -%a 3000 -%o 2000 -BW [ ] -EW [ .,:;!?_] -ES [.:;!?] -VO [aeiouy] -CO [bcdfghjklmnpqrstvwxz] -CC [cdfgjklmnprtz] -SC [cg] -HC [bdfhjklmnpqrstvwxz] -ST [pbtdkg] -LE [a-zA-Z] - -%{ - - /* English to australian translator */ - - /* to build with standard at&t lex - * lex aust.l - * cc lex.yy.c -ll -o aust - * - * to build with flex - * flex -I aust.l - * cc lex.yy.c -o aust - * - * (flex is a pd version of lex that runs under Unix, VMS and MSDOS.) - */ - - /* 16Jan90 - wb - first version, based on biffa.l by - * Stephen K Mulrine */ - /* 30Jan90 - wb - added more words */ - /* 16Feb90 - wb - converted from jive to aust */ - /* 12Mar90 - wb - added some randomness */ - - - /* BW = begin word */ - /* EW = end word */ - /* ES = end sentence */ - /* VO = vowel */ - /* CO = consonant */ - /* CC = end of consonant cluster */ - /* SC = soft consonant (need an 'e') */ - /* HC = hard consonant (does not need an 'e') */ - /* ST = stop */ - /* LE = any letter */ - -bloody(n) -int n; -{ - if (n == 0 || rand() < n) - printf((rand() < 20000)? "bloody ": "bleedin' "); -} - -say(msg, n) -char *msg; -int n; -{ - if (rand() < n) - printf("%s", msg); -} - -oi(n) -int n; -{ - say(" Blimey!", n); - while (rand() < n) - printf(" OI!"); -} - - -%} - -%% -"That is" | -"That's" printf("Thaz"); -"that is" | -"that's" printf("thaz"); -bathroom | -toilet printf("loo"); -{BW}john{EW} printf("%cloo%c", yytext[0], yytext[5]); -[Aa]lright printf("%clrighty", yytext[0]); -{BW}mad{EW} printf("%cpissed%c", yytext[0], yytext[4]); -angry | -annoyed printf("pissed"); -drunk printf("loaded"); -drank printf("swilled"); -drink printf("swill"); -{BW}beer printf("%cFoster's", yytext[0]); /* Australian for beer, mate */ -"ught to" printf("ughta"); -{BW}train printf("%cland train", yytext[0]); -ough{EW} printf("o%c", yytext[4]); -Hello{EW} | -"Good day"{EW} printf("G'day!"); -hello{EW} | -"good day"{EW} printf("g'day!"); -"in Austrailia" | -"to Austrailia" printf("down under"); -{BW}bit{EW} printf("%ctad%c", yytext[0], yytext[4]); - -{CO}{CC}{EW} printf("%c'%c", yytext[0], yytext[2]); -{CO}{CC}ed{EW} printf("%c%s", yytext[0], yytext+2); -of{EW} printf("o'%c", yytext[2]); - -Some{BW}one | -Someone | -Guy printf("Dude"); -some{BW}one | -someone | -guy printf("dude"); - -[Ww]ha printf("%co", yytext[0]); -{BW}esp printf("'sp"); -{BW}Esp printf("'Sp"); - -{BW}h{LE} printf("%c'%c", yytext[0], yytext[2]); -off{BW}of printf("offa"); - -[Yy]our printf("%cer", yytext[0]); -you{EW} printf("ya%c", yytext[3]); -my printf("me"); - -{CO}[ai]{SC}e printf("%coi%ce", yytext[0], yytext[2]); -{CO}[ai]{HC}e printf("%coi%c", yytext[0], yytext[2]); -{CO}[ai]{CO}[aiouy] printf("%coi%c%c", yytext[0], yytext[2], yytext[3]); -r[ai]{CO}{CO} printf("%coi%c%c", yytext[0], yytext[2], yytext[3]); -{CO}igh{LE} printf("%coi%c", yytext[0], yytext[4]); -extremely | -really | -very printf("roit"); -Extremely | -Really | -Very printf("Roit"); -that printf("wot"); -Well printf("Welp"); -baseball | -football | -hockey printf("cricket"); -{VO}th({EW}|{VO}) printf("%ct%c", yytext[0], yytext[3]); -Who printf("Oo"); -{BW}who printf("%c'oo", yytext[0]); -{LE}{CO}er{EW} printf("%c%ca%c", yytext[0], yytext[1], yytext[4]); -{VO}{CO}e{BW}to printf("%c%ceda", yytext[0], yytext[1]); -{VO}{CO}{BW}to printf("%c%c%ca", yytext[0], yytext[1], yytext[1]); -{BW}[Bb]e{CO}{LE} printf("%c'%s", yytext[0], yytext+3); -{BW}[Aa]{CO}{LE} printf("%c'%s", yytext[0], yytext+2); -{BW}[Oo]ne? printf("%c'un", yytext[0]); - -{LE}\, {ECHO; say(" moit,", 10000);} -{BW}an?{EW} {if(rand()<12000){printf(" a ");bloody(0);}else printf("%s",yytext);} -An?{EW} {if(rand()<12000){printf("A ");bloody(0);}else printf("%s",yytext);} -(T|({BW}t))he{EW} | -(T|({BW}t))hose{EW} {ECHO; bloody(12000);} - -\!|\? {say(", moit", 6000); ECHO; oi(12000);} -\. {say(", moit", 2000); ECHO; oi(6000);} - -{BW}-*[0-9]+" "*("degrees"|([Ff]{LE}*)){EW} {printf("%c%dc%c",*yytext,((atoi(yytext+1)-24)/9)*5,yytext[strlen(yytext)-1]);} - -. printf("%s", yytext); -\n printf("\n"); - -%% -main() -{ - yylex(); -} - diff --git a/b1ff.l b/b1ff.l deleted file mode 100644 index 40637b6..0000000 --- a/b1ff.l +++ /dev/null @@ -1,302 +0,0 @@ - -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ - -/* - * The B1FF filter. - * - * Modification History - * - * - Created Sat Feb 26 04:02:01 EST 1994 by Dave Baggett , - * who obviously had too much time on his hands. Based on the earlier - * "jive" filter of unknown origin. - * - * ------------------------------------------------------------------------- - * To build the B1FF filter, do the following: - * - * lex biff.l - * cc -o biff lex.yy.c -ll - * rm lex.yy.c - * - * Optionally replace lex and cc above with flex and gcc. - * - * To use the executable, pipe stuff to it; e.g., - * - * cat foo | biff - * - */ - -char buf[128]; -int count = 0; -char WhAt[]="@(#)DAVE BAGGETT-S B1FF!!1 FlLTER + A CHANGE OR 2 BYE BGRIFFIN\n@(#)$Header: b1ff.l,v 1.4 94/05/07 20:42:53 bgriffin Final $"; - -%} - -%% - -" and " printf(" + "); -" plus " printf(" + "); -"you're" printf("YOUR"); -your printf("UR"); -"it's" printf("1TZ"); -its printf("1T'Z"); -here printf("HEAR"); -hear printf("HERE"); -"they're" printf("THE1R"); -their printf("THERE"); -there printf("THEY'RE"); -was printf("WUZ"); -etc printf("U GET THE 1DEA"); -e[.]g[.] printf("LAIK THIS"); -i[.]e[.] printf("U NOE LAIK"); -" are " printf(" R "); -"be " printf("B "); -before printf("B4"); -" to " printf(" 2 "); -this printf("TH1S"); -like printf("LA1K"); -total printf("TODAL"); -"and I" printf("+ ME"); - -good printf("K00L"); -okay printf("C00L"); -ok printf("K00L"); -interesting printf("C00L"); -neat printf("Q00L"); -nifty printf("Q00L"); -useful printf("K00L"); -great printf("RAD"); -functional printf("RAD"); -excellent printf("X-L-ENT"); -very printf("TOTALLY"); -quite printf("REAL"); -really printf("REAL"); -new printf("NU"); -recent printf("RAD NU"); - -result printf("TH1NG"); -ramification printf("TH1NG"); -reason printf("TH1NG"); -conclusion printf("TH1NG"); -results printf("STUFF"); -ramifications printf("STUFF"); -reasons printf("STUFF"); -conclusions printf("STUFF"); - -files printf("WAREZ"); -program printf("GAME"); -programs printf("WAREZ"); -game printf("KRACKED GAME"); -games printf("GAMEZ"); -[Uu][Nn][Ii][Xx] printf("THE MANEFRA1M O/S"); -[Dd][Oo][Ss] printf("THE VIC-20 TAPE DRIVE SCR1PTER"); -disk printf("TAPE"); -computer printf("VIC-20"); -workstation printf("MANEFRA1M"); -supercomputer printf("MANEFRAM"); -[Cc]ray printf("K1CKASS MANEFRA1M"); -"Connection Machine" printf("TODALY RAD KOMPUTUR BRANE"); -machine printf("VIC-20"); -[Aa][Tt][Aa][Rr][Ii] printf("PEACE UV SH1T ATAR1"); -[Aa][Pp][Pp][Ll][Ee] printf("PEACE UV SH1T APPEL"); -[Aa][Mm][Ii][Gg][Aa] printf("WORKSTASHUN"); -[Mm]acintosh printf("MACK1NTRASH"); -upload printf("U/L"); -download printf("D/L"); -load printf("U/L"); -save printf("D/L"); -send printf("U/L"); -receive printf("D/L"); -ftp printf("XMODEM"); -buy printf("D-L"); - -[Pp]ascal printf("THAT WUSSY LANGUAGE"); -[Mm]odula.[23] printf("THAT WUSSY SH1T LANGUAGE"); -[Ll]isp printf("THAT KOMPUTUR BRANE LANGUAGE"); -[Ss]cheme printf("THAT TODAL NURD LANGUAGE"); -[Aa]da printf("THAT K00L NU ARMY LANGUAGE"); -[Pp]ost[Ss]cript printf("PRINTUR KODEZ"); -[Aa]ssembly printf("CPU KODE"); -[Aa]ssembler printf("CPU KODE"); - -newsgroup printf("MESSAGE BASE"); -news printf("MESSAGES"); -thread printf("BOARD"); -[Uu]senet printf("THE MANEFRAIM BOARDZ"); -[Nn]et[Nn]ews printf("THE BOARDZ"); - -fool printf("LUZER"); -moron printf("LAMER"); -idiot printf("LAMER"); -jerk printf("HOZER"); -dweeb printf("LUZER"); -geek printf("HOZER"); -nerd printf("LUZER"); - -" man " printf(" D00D "); -" men " printf(" D00DZ "); -woman printf("BABE"); -women printf("BABEZ"); -wife printf("BABE"); -husband printf("LOVERD00D"); -girlfriend printf("PEACE"); -boyfriend printf("STUD"); -girl printf("TODAL BABE"); -person printf("D00D"); -people printf("D00DZ"); -friend printf("FRE1ND"); - -sure printf("SHUR"); -"got to" printf("GOTTA"); -"want to" printf("WANNA"); -"have to" printf("HAFTA"); -have printf("GOT"); - -"using" printf("UZE1NG"); - -" car " printf(" WHEELS "); -" eat " printf(" NARF "); - -police printf("P1GZ"); -from printf("FRUM"); - -human printf("D00D"); -occasionally printf("SUMTIMZ"); -whom printf("WHO"); -whose printf("WHO'S"); -who's printf("WHOSE"); -"who is" printf("WHOSE"); -"ought to" printf("OTTA"); -"need to" printf("GOTTA"); -"should" printf("OTTA"); -"tonight" printf("2NITE"); -together printf("2GETHR"); -tomorrow printf("2MOROW"); -today printf("LAST NITE"); -to-day printf("2DAY"); -" food " printf(" PIZZA "); -coke printf("MOUNTIN DOO"); -pepsi printf("MOUNTIN DOO"); -caffeine printf("COKE"); -coffee printf("SPEED"); -[Nn]yquil printf("SMACK"); -night printf("NITE"); - -" believe" printf(" TH1NK"); -phone printf("FONE"); -freak printf("PHREAK"); -[Kk][Ii*-][Bb][Oo*-] printf("THE FONT GUY"); -[nN]et[htw][ar][cer][ke] { /* nethack nettrek netware */ - printf("PACMAN"); } -chess printf("PONG"); -[Ss]"treet "[Ff]ighter printf("POLL POSIT1ON"); - -amateur printf("LAMER"); -" of " printf(" UV "); -what printf("WUT"); -"meta " printf("ALT/CAPSLOCK "); - -"talk" printf("1NTERFACE"); -"sort of" printf("SORTA"); -"kind of" printf("K1NDA"); -magazine printf("ZINE"); - -":^)" ; -":-)" printf("HAHAHAHA!!1!1!1!!!1!!!"); -"8-)" printf("ITZA JOKE YA NOE"); - -[dgmnr]"." { *(yytext+1) = 0; - upcase(yytext); - sprintf(buf, "%s!",yytext); - printf(buf); - } - -[efhkpst]"." { *(yytext+1) = 0; - upcase(yytext); - sprintf(buf, "%s,",yytext); - printf(buf); - } - -[bclw]"." { *(yytext+1) = 0; - upcase(yytext); - sprintf(buf, "%s...",yytext); - printf(buf); - } - -[a-e]"?" { upcase(yytext); printf(yytext); printf("?"); } -[f-j]"?" { upcase(yytext); printf(yytext); printf("??"); } -[k-o]"?" { upcase(yytext); printf(yytext); printf("!?1?"); } -[p-t]"?" { upcase(yytext); printf(yytext); printf("!?1?!?"); } -[u-z]"?" { upcase(yytext); printf(yytext); printf("?1?!?1?!"); } -[a-e]"!" { upcase(yytext); printf(yytext); printf("!"); } -[f-j]"!" { upcase(yytext); printf(yytext); printf("!!"); } -[k-o]"!" { upcase(yytext); printf(yytext); printf("!1!"); } -[p-t]"!" { upcase(yytext); printf(yytext); printf("!!1!"); } -[u-z]"!" { upcase(yytext); printf(yytext); printf("!1!!1"); } -";" printf(","); -"," printf("."); -"'" ; -[a-z]":" { *(yytext+1) = ','; - upcase(yytext); - sprintf(buf, "%s L1KE:",yytext); - printf(buf); - } -[iI] { count++; if (count % 3 == 0) printf("1"); else printf("I"); } -oo printf("00"); -0 printf("o"); -"s " printf("Z "); -"s." printf("Z."); -cr printf("KR"); -wr printf("R"); -ate printf("8"); -ait printf("8"); -ame printf("A1M"); -ain printf("ANE"); -ade printf("AID"); -four printf("4"); -fore printf("4"); -for printf("4"); -see printf("C"); -seeing printf("CN"); -you printf("U"); -ude printf("00D"); -ule printf("OOL"); -ome printf("UM"); -ose printf("UZE"); -tion printf("SHUN"); -mn printf("M"); -kn printf("N"); -er printf("UR"); -em printf("UM"); -ll printf("L"); -ware printf("WEAR"); - -. { upcase(yytext); printf(yytext); } - -\n printf("\n"); - -%% - -upcase(s) - char *s; -{ - while (*s) { - if (islower(*s)) - *s = toupper(*s); - s++; - } -} - -main() -{ - yylex(); -} - diff --git a/biffa.l b/biffa.l deleted file mode 100644 index e7dc80c..0000000 --- a/biffa.l +++ /dev/null @@ -1,265 +0,0 @@ -%e 3000 -%p 6000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ - char buf[128]; - -%} - -%% -ead printf("eed"); -ote printf("urte"); -oad printf("urd"); -ode printf("urde"); -oke printf("urke"); -olk printf("urk"); -one printf("urn"); -al printf("aal"); -OK printf("aal reyt"); -"O.K." printf("all reyt"); -okay printf("aal reyt"); -Okay printf("Aal reyt"); -mother printf("mutha"); -mummy printf("mutha"); -ma{EW} printf("mutha "); -father printf("fatha"); -dad printf("fatha"); -pa{EW} printf("fatha "); -telephone printf("furn"); -ph printf("f"); -and printf("un'"); -And printf("Un'"); -only printf("urnly"); -over printf("urva"); -will printf("'ll"); -"You are" printf("Y'a fuckin'"); -"you are" printf("y'a fuckin'"); -"I am" printf("A'm fuckin'"); -"I'm" printf("A'm fuckin'"); -Most printf("Murst"); -most printf("murst"); -murder printf("knack"); -shatter printf("knack"); -damage printf("knack"); -Murder printf("Knack"); -Shatter printf("Knack"); -Damage printf("Knack"); -"Oh yes?" printf("Did yee spill wor pint?"); -[Cc]hinese printf("Chinky"); -"no it isn't" printf("Is it shite"); -"No it is not" printf("Is it shite"); -"It is not" printf("Is it fuck"); -"it is not" printf("is it fuck"); -"It isn't" printf("Is it fuck"); -"it isn't" printf("is it fuck"); -idle printf("ardle"); -rubbish printf("gobshite"); -useless printf("shite"); -"no good" printf("shite"); -shit printf("shite"); -muck printf("shite"); -mouth printf("gob"); -Mouth printf("Gob"); -someone printf("some fukka"); -Someone printf("Some fukka"); -anyone printf("any fukka"); -Anyone printf("Any fukka"); -nobody printf("neewun"); -Nobody printf("Neewun"); -noone printf("neewun"); -Noone printf("Neewun"); -"who is" printf("who tha fuck's"); -"Who is" printf("Who tha fuck's"); -"who are" printf("who tha fuck'a'"); -"Who are" printf("Who tha fuck'a'"); -"Why is" printf("Why tha fuck's"); -"Why is" printf("Why tha fuck's"); -"why are" printf("why tha fuck'a'"); -"Why are" printf("Why tha fuck'a'"); -"when is" printf("when tha fuck's"); -"When is" printf("When tha fuck's"); -"when are" printf("when tha fuck'a'"); -"When are" printf("When tha fuck'a'"); -tough printf("fuckin' hard"); -strong printf("fuckin' hard"); -"! " printf(", ya fuckin' puff! "); -nothing printf("bugga aal"); -Nothing printf("Bugga aal"); -food printf("grub"); -Food printf("Grub"); -My printf("Ma fuckin'"); -Your printf("Y' fuckin'"); -Our printf("Wor fuckin'"); -throw printf("hoy"); -Throw printf("Hoy"); -lots printf("lurds"); -Lots printf("Lurds"); -" have" printf("'ve"); -Have printf("Hev"); -"don't" printf("divvn't"); -"Don't" printf("Divvn't"); -"isn't" printf("in't"); -"Isn't" printf("In't"); -."self " printf("ssel "); -girls printf("lasses"); -girl printf("lass"); -boy printf("lad"); -know printf("knaa"); -make printf("maak"); -take printf("tek"); -Take printf("Tek"); -tak printf("tek"); -th[eo]se printf("them"); -broken printf("brerken"); -Broken printf("Brerken"); -broke printf("brerk"); -" tired" printf(" fuckin' knackered"); -gives printf("giz"); -give printf("giz"); -Give printf("Giz"); -giv printf("gizz"); -gave printf("gav"); -TV printf("telly"); -[Ww]ill printf("'ll"); -[Ss]hall printf("'ll"); -more printf("more fuckin'"); -than printf("than fuckin'"); -"can " printf("kin "); -"Can " printf("Kin "); -bad printf("bastaad"); -Bad printf("Bastaad"); -nasty printf("bastaad"); -good printf("magic"); -Good printf("Magic"); -great printf("magic"); -Great printf("Magic"); -human printf("yooman"); -woman printf("wumman"); -women printf("wummen"); -" man " printf(" bastaad "); -football printf("futbaal"); -all printf("aal"); -All printf("Aal"); -"the " printf("the fuckin' "); -"what is" printf("what the fuck is"); -"What is" printf("What the fuck is"); -"what are" printf("what the fuck are"); -"What are" printf("What the fuck are"); -"The " printf("The fuckin' "); -"That " printf("That fuckin' "); -" any" printf(" onny fuckin'"); -poof printf("puff"); -homosexual printf("puff"); -gay printf("puff"); -bisexual printf("semi-puff"); -[Mm]iddlesbrough printf("Boro"); -[Mm]iddlesborough printf("Boro"); -[Gg]ateshead printf("Gaatsed"); -[Nn]ewcastle printf("Neecassl"); -"South Shields" printf("Saath Sheels"); -[Ss]cotland printf("Jock"); -[Ss]cotsman printf("Jocko bastaad"); -[Ss]cottish printf("Jock"); -[Ss]paniard printf("Wop"); -[Ss]panish printf("Wop"); -[Ii]talian printf("Wop"); -[Ss]pain printf("Wopland"); -[Ii]taly printf("Wopland"); -them printf("'em"); -home printf("yem"); -" go " printf(" gaan "); -going printf("gannin'"); -" gone " printf(" went "); -trousers printf("kex"); -burnt printf("bornt"); -because printf("cos"); -Because printf("Cos"); -both printf("burth"); -Both printf("Burth"); -" yes " printf(" aye "); -"Yes " printf("Aye "); -" no " printf(" ney "); -"No " printf("Ney "); -"with " printf("wi' "); -wrong printf("wrang"); -told printf("telt"); -"bit of a " printf("birruva "); -"bit of " printf("birra "); -"You're a" printf("Yorra"); -"You are a" printf("Yorra"); -"you're a" printf("yorra"); -"you are a" printf("yorra"); -"We are" printf("Wur"); -" we are" printf(" wur"); -"What a" printf("Worra"); -"what a" printf("worra"); -your printf("y'"); -"you're" printf("yer"); -you printf("ya"); -" him" printf("'m"); -Your printf("Y'"); -"You're" printf("Yer"); -You printf("Ya"); -" our" printf(" wur"); -"Our" printf("Wur"); -"I won't" printf("Will Ah fuck"); -"I refuse to" printf("Will Ah fuck"); -"I will not" printf("Will Ah fuck"); -"I don't" printf("Do Ah fuck"); -"I do not " printf("Do Ah fuck "); -"I didn't" printf("Did Ah fuck"); -"I did not " printf("Did Ah fuck "); -"No." printf("Ney chance."); -"No!" printf("Ney chance!"); -"I'" printf("Ah'"); -"I " printf("Ah "); -" my" printf(" ma"); -" me " printf("'us "); -"We " printf("Wu "); -" we " printf(" wu "); -"were " printf("wus "); -"Were " printf("Wus "); -bastard printf("bastaad"); -into printf("inter"); -" on " printf("'an "); -" for " printf(" f' "); -beer printf("brown"); -" of " printf(" a'"); -[Gg]erman printf("Jorman"); -[Ss]wiss printf("Jorman"); -[Au]strian printf("Jorman"); -right printf("reyt"); -Right printf("Reyt"); -" to " printf(" ter "); -" hit by " printf(" chinned off "); -" kill" printf(" fuck"); -" hitt" printf(" fuck"); -" hit " printf(" fucked "); -" hit" printf(" fuck"); -breast printf("tit"); -bosom printf("tit"); -screwing printf("shaggin'"); -Screwing printf("Shaggin'"); -screw printf("shag"); -kick printf("fuck"); -Kick printf("Fuck"); -"ing " printf("in' "); -ou printf("er"); -"? " printf(", ya bastaad? "); -", sir" printf(", pal"); -", dear" printf(", pet"); -[a-m]", " {ECHO;printf("fuck, ");} -[n-z]", " {ECHO;printf("like, ");} -. printf(yytext); -\n printf("\n"); -%% -main() -{ - yylex(); -} diff --git a/buck.l b/buck.l deleted file mode 100644 index 2568f2b..0000000 --- a/buck.l +++ /dev/null @@ -1,85 +0,0 @@ -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 - -%{ -/* -** -** The buckwheat filter -** by Benjamin Elijah Griffin 29 March 1995 -** -** A lex utility written as a favor for a friend. (He provided the -** rules, I showed him how to make a lex filter out of them.) -** -** compile like this: -** lex buck.l -** cc -o buck lex.yy.c -ll -** rm lex.yy.c -** -** use like this: -** buck < infile > outfile -** or -** cat infile | | buck | > outfile -** -*/ - -char WhAt[]="@(#)Benjamin Elijah Griffin's buck filter for buckwheat (c) 1995\n@(#)$Header:$" -; - -%} - -%% - -okay printf("otay"); -Okay printf("Otay"); -the printf("da"); -The printf("Da"); -ing[ .,;!?] printf("in'%s",yytext+3); -" for " printf(" po' "); -" in " printf(" bin "); -love printf("nub"); -Love printf("Nub"); -" ll" printf(" d"); -Ll printf("D"); -" l" printf(" w"); -L printf("W"); -ll { printf("ww"); /* hmm, do we really want that? */ } -l { 1+1; /* cutesy null statement */ } -" ch" printf(" t"); -Ch printf("T"); -" h" printf(" n"); -H printf("H"); -" r"[aeiou] printf("%s",yytext+2); -R[aeiou] printf("R%s",toupper(*(yytext+1))); -r[^ .,;!?] printf("%s",yytext+1); -" t" printf(" d"); -T printf("D"); -" g" printf(" b"); -G printf("B"); -th printf("d"); -n[a-z][ .,;!?] printf("n%s",yytext+2); -wi printf("bi"); -Wi printf("Bi"); -" sh" printf(" t"); -Sh printf("T"); -" "s[aeiou] printf(" t%s",yytext+2); -S[aeiou] printf("T%s",yytext+1); -" "s[qwrtypsdfghjklzxcvbnm] printf(" %s",yytext+2); -S[qwrtypsdfghjklzxcvbnm] printf("%s",yytext+1); -" "c[aou] printf(" %s",yytext+2); -C[aou] printf("C%c",toupper(*(yytext+1))); -" "r[aeiou] printf(" %s",yytext+2); -R[aeiou] printf("R%c",toupper(*(yytext+1))); - -. printf("%s",yytext); - -%% - -main() -{ - yylex(); -} - diff --git a/censor.l b/censor.l deleted file mode 100644 index 840528a..0000000 --- a/censor.l +++ /dev/null @@ -1,103 +0,0 @@ -%{ -#define yywrap() 1 -%} - -T [" .!?,"]* - -%% - -"ass" printf("[BUTTOCKS]"); -"ASS" printf("[BUTTOCKS]"); -"Ass" printf("[BUTTOCKS]"); -"Damn" printf("[CURSE]"); -"damn" printf("[CURSE]"); -"DAMN" printf("[CURSE]"); -"fuck" printf("[FORNICATE]"); -"Fuck" printf("[FORNICATE]"); -"FUCK" printf("[FORNICATE]"); -"shit" printf("[EXCREMENT]"); -"Shit" printf("[EXCREMENT]"); -"SHIT" printf("[EXCREMENT]"); -"bitch" printf("[FEMALE DOG]"); -"Bitch" printf("[FEMALE DOG]"); -"BITCH" printf("[FEMALE DOG]"); -"pecker" printf("[PHALLUS]"); -"Pecker" printf("[PHALLUS]"); -"PECKER" printf("[PHALLUS]"); -"nipple" printf("[MAMMARY OUTLET]"); -"Nipple" printf("[MAMMARY OUTLET]"); -"NIPPLE" printf("[MAMMARY OUTLET]"); -"breast" printf("[BUSOM]"); -"Breash" printf("[BUSOM]"); -"BREAST" printf("[BUSOM]"); -"fucking" printf("[FORNICATING]"); -"Fucking" printf("[FORNICATING]"); -"FUCKING" printf("[FORNICATING]"); -"fucked" printf("[FORNICATED]"); -"Fucked" printf("[FORNICATED]"); -"FUCKED" printf("[FORNICATED]"); -"damned" printf("[CURSED]"); -"Damned" printf("[CURSED]"); -"DAMNED" printf("[CURSED]"); -"damning" printf("[CURSING]"); -"Damning" printf("[CURSING]"); -"DAMNING" printf("[CURSING]"); -"piss" printf("[URINATE]"); -"Piss" printf("[URINATE]"); -"PISS" printf("[URINATE]"); -"asshole" printf("[DONKEY BUTTOCKS]"); -"Asshole" printf("[DONKEY BUTTOCKS]"); -"ASSHOLE" printf("[DONKEY BUTTOCKS]"); -"prick" printf("[PHALLUS]"); -"Prick" printf("[PHALLUS]"); -"PRICK" printf("[PHALLUS]"); -"cock" printf("[PHALLUS]"); -"Cock" printf("[PHALLUS]"); -"COCK" printf("[PHALLUS]"); -"pussy" printf("[VAGINA]"); -"Pussy" printf("[VAGINA]"); -"PUSSY" printf("[VAGINA]"); -"twat" printf("[VAGINA]"); -"Twat" printf("[VAGINA]"); -"TWAT" printf("[VAGINA]"); -"cunt" printf("[VAGINA]"); -"Cunt" printf("[VAGINA]"); -"CUNT" printf("[VAGINA]"); -"dick" printf("[RICHARD]"); -"Dick" printf("[RICHARD]"); -"DICK" printf("[RICHARD]"); -"cum" printf("[EJACULATE]"); -"Cum" printf("[EJACULATE]"); -"CUM" printf("[EJACULATE]"); -"jack off" printf("[MASTERBATE]"); -"Jack Off" printf("[MASTERBATE]"); -"JACK OFF" printf("[MASTERBATE]"); -"wet dream" printf("[NOCTURNAL EMISSION]"); -"Wet Dream" printf("[NOCTURNAL EMISSION]"); -"WET DREAM" printf("[NOCTURNAL EMISSION]"); -"jerk off" printf("[MASTERBATE]"); -"Jerk Off" printf("[MASTERBATE]"); -"JERK OFF" printf("[MASTERBATE]"); -"bastard" printf("[ILLEGITIMATE CHILD]"); -"Bastard" printf("[ILLEGITIMATE CHILD]"); -"BASTARD" printf("[ILLEGITIMATE CHILD]"); -"slut" printf("[WANTON WOMAN]"); -"Slut" printf("[WANTON WOMAN]"); -"SLUT" printf("[WANTON WOMAN]"); -"whore" printf("[PROSTITUTE]"); -"Whore" printf("[PROSTITUTE]"); -"WHORE" printf("[PROSTITUTE]"); -"suck" printf("[INHALE]"); -"Suck" printf("[INHALE]"); -"SUCK" printf("[INHALE]"); -"blow" printf("[EXHALE]"); -"Blow" printf("[EXHALE]"); -"BLOW" printf("[EXHALE]"); -. ECHO; -%% - -main() -{ - srand(getpid()); - yylex(); -} diff --git a/chef.l b/chef.l deleted file mode 100644 index 7e8ea13..0000000 --- a/chef.l +++ /dev/null @@ -1,63 +0,0 @@ -%{ -/* chef.x - convert English on stdin to Mock Swedish on stdout - * - * The WC definition matches any word character, and the NW definition matches - * any non-word character. Two start conditions are maintained: INW (in word) - * and NIW (not in word). The first rule passes TeX commands without change. - * - * HISTORY - * - * Apr 26, 1993; John Hagerman: Added ! and ? to the Bork Bork Bork rule. - * - * Apr 15, 1992; John Hagerman: Created. - */ - -static int i_seen = 0; -%} - -WC [A-Za-z'] -NW [^A-Za-z'] - -%start INW NIW - -%% - -\\[^ \n]+ ECHO; - -{NW} { BEGIN NIW; i_seen = 0; ECHO; } -[.!?]$ { BEGIN NIW; i_seen = 0; - printf("%c\nBork Bork Bork!",yytext[0]); } - -"bork"/{NW} ECHO; -"Bork"/{NW} ECHO; - -"an" { BEGIN INW; printf("un"); } -"An" { BEGIN INW; printf("Un"); } -"au" { BEGIN INW; printf("oo"); } -"Au" { BEGIN INW; printf("Oo"); } -"a"/{WC} { BEGIN INW; printf("e"); } -"A"/{WC} { BEGIN INW; printf("E"); } -"en"/{NW} { BEGIN INW; printf("ee"); } -"ew" { BEGIN INW; printf("oo"); } -"e"/{NW} { BEGIN INW; printf("e-a"); } -"e" { BEGIN INW; printf("i"); } -"E" { BEGIN INW; printf("I"); } -"f" { BEGIN INW; printf("ff"); } -"ir" { BEGIN INW; printf("ur"); } -"i" { BEGIN INW; printf(i_seen++ ? "i" : "ee"); } -"ow" { BEGIN INW; printf("oo"); } -"o" { BEGIN INW; printf("oo"); } -"O" { BEGIN INW; printf("Oo"); } -"o" { BEGIN INW; printf("u"); } -"the" { BEGIN INW; printf("zee"); } -"The" { BEGIN INW; printf("Zee"); } -"th"/{NW} { BEGIN INW; printf("t"); } -"tion" { BEGIN INW; printf("shun"); } -"u" { BEGIN INW; printf("oo"); } -"U" { BEGIN INW; printf("Oo"); } -"v" { BEGIN INW; printf("f"); } -"V" { BEGIN INW; printf("F"); } -"w" { BEGIN INW; printf("v"); } -"W" { BEGIN INW; printf("V"); } - -. { BEGIN INW; ECHO; } diff --git a/cockney.l b/cockney.l deleted file mode 100644 index e6c0bda..0000000 --- a/cockney.l +++ /dev/null @@ -1,190 +0,0 @@ -%{ -/* - * Lex filter to transform plain English into Cockney English. - * No racial or societal slurs are intended. For amusement only. - * - * Copyright 1986 by Daniel Klein. - * - * Reproduction permitted so long as this notice is retained. - */ -%} - -BW [ \t\n] -SP [ \t]+ -EW [ \t.,;!\?$] - -%Start junk - -%% -. { srandom(time(0L)); unput(yytext[0]); BEGIN 0; } -{BW}[Tt]he{EW} { ECHO; bloody(); } -{BW}[Ss]teal{EW} { printf("%c%cick",yytext[0],yytext[1]-5); - eos(); - } -{BW}[Ss]tole{EW} { printf("%c%cicked",yytext[0],yytext[1]-5); - eos(); - } -{BW}tired pooped(); -{BW}were{EW} | -{BW}was{EW} { printf("%cwuz",yytext[0]); eos(); } -[Hh]ello printf("'%cllo", caseify('u')); -{BW}[Hh] printf("%c'",yytext[0]); -{BW}[Yy]our{EW} { printf("%.2ser",yytext); eos(); } -{BW}it{EW} { printf("%.2s'",yytext); eos(); } -{BW}go{EW} { printf("%.2sow",yytext); eos(); } -{BW}and{EW} { printf("%c'n'",yytext[0]); eos(); } -{BW}my{EW} { printf("%.2se",yytext); eos(); } -{BW}th(is|at){EW} { printf("%.5s", yytext); eos(); } -{BW}[Ww]e{SP}went{EW} | -{BW}[Ww]e{SP}had{EW} | -{BW}[Ww]e{SP}did{EW} { printf("%.*s",yyleng-1,yytext); - set_did(2); - eos(); - } -{BW}I{SP}went{EW} | -{BW}I{SP}had{EW} | -{BW}I{SP}did{EW} { I(); - printf(" did"); - set_did(1); - eos(); - } -{BW}I{EW} { I(); eos(); } - -[Yy]ou{SP}[^aeiouy] { printf("%c'", yytext[0]); plastc(); } -[Ww]hat{SP}are{EW} { printf("%cotta", yytext[0]); eos(); } - -{BW}other | -[MmNnRr]other printf("%cuvver",yytext[0]); -[MmSs]outh printf("%cowf", yytext[0]); -[cYy]outh printf("%coof", yytext[0]); -[^o]uth printf("%.2sf",yytext); -{BW}th[^e] | -[AaEeIiOo]th[^em] { printf("%cf",yytext[0]); plastc(); } -oothe | -e[ei]the { printf("%c%cve", yytext[0], yytext[0]); } -ooth | -eeth { printf("%c%cf", yytext[0], yytext[0]); } -[aei]the { printf("%cvv",yytext[0]); plastc(); } -th putchar('v'); -a[km]e{EW} { printf("i%ce",yytext[1]); eos(); } -[^r][Oo]ld printf("%.2swld",yytext); -[^AaEeIiOoUu][uo]nd[a-z] printf("%cunn%c",yytext[0],yytext[yyleng-1]); -ing{EW} { printf("in'"); eos(); } -[^dg]get+[^h] printf("%cge'%c",yytext[0],yytext[yyleng-1]); -ail printf("aiw"); -any printf("enny"); -[rSs]ay{EW} { printf("%cigh",yytext[0]); eos(); } -way printf("why"); -[BbHh]it{EW} { printf("%ci'",yytext[0]); eos(); } -ait{EW} { printf("ite"); eos(); } -ime{EW} { printf("oime"); eos(); } -[^e]ize[^n] printf("%coize%c",yytext[0],yytext[yyleng-1]); -[^e]ight printf("%coit",*yytext); -[a-z]"?" { *(yytext+1) = ','; - printf("%s roit?",yytext); - clear_did(); - } -[a-z]"." { printf("%c", yytext[0]); dintI(); } -\n printf("\n"); - -%% - -eos() -{ - if (yytext[yyleng-1] == '.') - dintI(); - else - unput(yytext[yyleng-1]); -} - -plastc() -{ - unput(yytext[yyleng-1]); -} - -caseify(c) -char c; -{ - if (yytext[0] <= 'Z') - return (c - ' '); - else - return (c); -} - - -I() -{ -/* extern long random(); */ - - if (random() % 100 < 20) - printf("%cOy",yytext[0]); - else - printf("%cI",yytext[0]); -} - -static short b_count = 0; -static short b_which = 0; - -bloody() -{ - if (b_count++ % 2 == 0) { - switch (b_which++ % 4) { - case 0: printf("bloody "); break; - case 1: printf("flinkin' "); break; - case 2: printf("bleedin' "); break; - case 3: printf("soddin' "); break; - } - } -} - -static short did = 0; - -set_did(val) -{ - did = val; -} - -clear_did() -{ - did = 0; -} - -dintI() -{ -/* extern long random(); */ - - if ((did == 1) && (random() % 100 < 50)) - printf(", didn'I?"); - else if ((did == 2) && (random() % 100 < 50)) - printf(", din't we?"); - else - printf("."); - clear_did(); -} - -pooped() -{ -/* extern long random(); */ - - switch (random() % 3) { - case 0: - printf("%cknackered", yytext[0]); - break; - case 1: - printf("%cshagged out", yytext[0]); - break; - case 2: - printf("%cdone in", yytext[0]); - break; - } -} - -expletive() -{ -/* -Blimey -Stright a light -'Strewth -Cor blimey -*/ -} diff --git a/debian/changelog b/debian/changelog index 520b0b6..10a237d 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,84 @@ +filters (2.6) unstable; urgency=low + + * + + -- Joey Hess Fri, 10 Sep 1999 21:25:47 -0700 + +filters (2.5) unstable; urgency=low + + * eleet: w -> \/\/ + * Spelling correction patch from Edward Betts + (closes: #38850) + + -- Joey Hess Thu, 3 Jun 1999 13:03:02 -0700 + +filters (2.4) unstable; urgency=low + + * chef: say "knooeeng" for "knowing", and in general say "oo" for "ow". + + -- Joey Hess Wed, 19 May 1999 17:20:07 -0700 + +filters (2.3) unstable; urgency=low + + * Added kraut filter (free version found). + + -- Joey Hess Wed, 17 Mar 1999 15:52:05 -0800 + +filters (2.2) unstable; urgency=low + + * fixed Makefile to add . to PATH before running makesample.sh, because it + called jibberish, which looks only in /usr/games for the filters, and if + you're building filters w/o the package installed, they won't be there + and the build will fail. Whew! (closes: #33758) + + -- Joey Hess Fri, 26 Feb 1999 00:17:24 -0800 + +filters (2.1) unstable; urgency=low + + * Added upside down filter, which well, turns text upside down. + + -- Joey Hess Sat, 20 Feb 1999 18:22:43 -0800 + +filters (2.0) unstable; urgency=low + + * Re-wrote the eleet, chef, b1ff filters in perl, dropped all the rest + (except jethro); they will be in filters-nonfree now. This was done + due to copyright problems in the original filters. + * Fixes important bug #32333 + + -- Joey Hess Sun, 24 Jan 1999 13:13:17 -0800 + +filters (1.8) unstable; urgency=low + + * Added jibberish meta-filter by Raul Miller . + (#24677) + + -- Joey Hess Fri, 4 Dec 1998 15:18:09 -0800 + +filters (1.7) unstable; urgency=low + + * Renamed mb to marc-barrett to eliminate namespace pollution. + + -- Joey Hess Wed, 15 Apr 1998 00:23:38 -0700 + +filters (1.6) unstable; urgency=low + + * Added eleet filter, thanks to Jeremy Worrells . + + -- Joey Hess Fri, 6 Mar 1998 11:41:29 -0800 + +filters (1.5) unstable; urgency=low + + * Updated standards-version. + + -- Joey Hess Mon, 9 Feb 1998 13:38:55 -0800 + +filters (1.4) unstable; urgency=low + + * Use debhelper. + + -- Joey Hess Sat, 7 Feb 1998 19:38:35 -0800 + filters (1.3) unstable; urgency=low * Libc6. diff --git a/debian/config b/debian/config deleted file mode 100644 index db4d289..0000000 --- a/debian/config +++ /dev/null @@ -1,65 +0,0 @@ -# Edit this file to configure debian/rules to build a package. -# No modification of debian/rules should be neccessary. (Famous last words!) -# -# File by Joey Hess - -# What is the name of this package? -package=filters - -# Files that go in directories under /doc. -docs=README ky00te.dir/README.ky00te SAMPLES -copyright=debian/copyright - -# What file must exist in the current directory if the package is -# properly unpacked here? -test_file=makesample.sh - -# Does this package build from an Imakefile? -# If so, uncomment the line below. -#use_imakefile=y - -# Does this package build from a Configure script? -# If so, uncomment the line below and enter the command to run to run the -# Configure script (ie: "./Configure") -#use_configure=./Configure - -# What commands to run to build the package? -define build_command - $(MAKE) - $(MAKE) samples -endef - -# What commands to run to clean up after a build? -define clean_command - -$(MAKE) -i clean -endef - -# List here any files that must be removed during "debian/rules clean" -# that clean_command doesn't take care of. -clean_files= - -# List here any files that should be preserved during a build, and restored -# to their original state during a clean. For example, if the package comes -# with both an Imakefile and a Makefile, and xmkmf is run, list the original -# Makefile here so it will be backed up before it is overwritten my xmkmf. -preserve_files= - -# What command to run to install the package into debian/tmp? -# You might want to edit the package's Makefile and add $(PREFIX) -# to all the paths it installs files to. or, you can just write -# your own install commands here instead. -# -# Note that debian/* and the files in /usr/doc will be installed -# properly for you, you don't need to do that here. -# -define install_command - $(MAKE) PREFIX=debian/tmp install -endef - -# After being installed in debian/tmp, everything is chowned to root.root, -# and chmod g-ws is run on everyything. Enter below any chmod commands you -# need to run to set files to the proper permissions. This is where you -# can make programs be suid, etc. -# (Note that these commands will be run as root.) -define ch_commands -endef diff --git a/drawl.l b/drawl.l deleted file mode 100644 index ae73df1..0000000 --- a/drawl.l +++ /dev/null @@ -1,426 +0,0 @@ -%{ -/* 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 -#include - -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); -} diff --git a/eleet.l b/eleet.l deleted file mode 100644 index 3cd77f1..0000000 --- a/eleet.l +++ /dev/null @@ -1,48 +0,0 @@ -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ -#include - -char buf[128]; -%} - -%% - -a printf("4"); -A printf("4"); -e printf("3"); -E printf("3"); -i printf("1"); -I printf("1"); -o printf("0"); -O printf("0"); -n printf("/\\/"); -N printf("/\\/"); -m printf("/\\/\\"); -M printf("/\\/\\"); -v printf("\\/"); -V printf("\\/"); -t printf("+"); -T printf("+"); -s printf("5"); -S printf("5"); -l printf("|_"); -L printf("|_"); -x printf("><"); -X printf("><"); -h printf("|-|"); -H printf("|-|"); - -%% -main() -{ - yylex(); - return(0); -} diff --git a/fin.l b/fin.l deleted file mode 100644 index 68f266e..0000000 --- a/fin.l +++ /dev/null @@ -1,63 +0,0 @@ - -T [" .!?,"]* -%% - -look printf("watch"); -watch printf("look"); -hear printf("listen"); -listen printf("hear"); -good printf("well"); -well printf("good"); -say printf("speaks"); -said printf("speaked"); -being printf("be"); -ck printf("kk"); -nn printf("n"); -mm printf("m"); -tt printf("t"); -ss printf("s"); -dd printf("d"); -" had " printf(" have "); -" than " printf(" to "); -" was " printf(" were "); -" can " printf(" be able to "); -" do " printf(" doing "); -" does " printf(" doings "); -" see " printf(" be seeing "); -" be " printf(" being "); -" am " printf(" do be "); -" as " printf(" so "); -" so " printf(" as "); -" is " printf(" does be "); -" my " printf(" the of me "); -"My " printf("The of me "); -" his " printf(" the of him "); -"His " printf("The of him "); -[Yy]our printf("the of you"); -" a " printf(" "); -" the " printf(" "); -"A " printf("One "); -"ts " printf("t's "); -"t's " printf("ts "); -[Tt]hat printf("this"); -[Tt]his printf("that"); -into printf("in"); -" in " printf(" into "); -onto printf("on"); -" on " printf(" onto "); -never printf("not once"); -[Oo]nce printf("one time"); -[Tt]wice printf("two times"); -about printf("by"); -[Ww]hy printf("how"); -" by " printf(" from "); -" to " printf(" for "); -" for " printf(" to "); -"ing " printf("ed "); -%% - -main() -{ - srand(getpid()); - yylex(); -} diff --git a/fudd.l b/fudd.l deleted file mode 100644 index 463c214..0000000 --- a/fudd.l +++ /dev/null @@ -1,37 +0,0 @@ -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ -#include - -char buf[128]; -%} - -%% -"r" printf("w"); -"l" printf("w"); -"qu" printf("qw"); -"th " printf("f "); -"th" printf("d"); -"n." printf("n, uh-hah-hah-hah\. "); -"R" printf("W"); -"L" printf("W"); -"Qu" printf("Qw"); -"QU" printf("QW"); -"TH " printf("F "); -"TH" printf("D"); -"Th" printf("D"); -"N." printf("N, uh-hah-hah-hah\. "); - -%% -main() -{ - yylex(); - return(0); -} diff --git a/jive.l b/jive.l deleted file mode 100644 index dcb9924..0000000 --- a/jive.l +++ /dev/null @@ -1,250 +0,0 @@ -%{ -/* - * Lex filter to transform plain English into Jive English. - * No racial or societal slurs are intended. For amusement only. - * - * Copyright 1986 by Daniel Klein and Clement Cole. - * - * Reproduction permitted so long as this notice is retained. - */ -%} -%e 1700 -%p 4000 -%n 700 -%k 450 -%a 1700 -%o 1500 -BW [ \t\(] -EW [ \t.,;!\?$\)] -%% -@[Bb]egin(.*) | -".so ".*$ printf("%s", yytext); -{BW}send printf("%ct'row",yytext[0]); -program+ printf("honky code"); -[Uu]nix printf("slow mo-fo"); -UNIX printf("dat slow mo-fo"); -actual printf("ak'shul"); -{BW}take printf("%csnatch",yytext[0]); -{BW}took | -{BW}take[ns] printf("%csnatch'd",yytext[0]); -[Mm]exican printf("%cet-back", caseify('w')); -[Ii]talian printf("%creaser", caseify('g')); -{BW}big{EW} { printf("%cbig ass",yytext[0]);plastc();} -fool printf("honkyfool"); -modem printf("doodad"); -{BW}he{EW} { printf("%cmah' man he",yytext[0]);plastc();} -"e the"{EW} | -"a the"{EW} | -"t the"{EW} | -"d the"{EW} { printf("%c da damn", yytext[0]);plastc();} -wife | -woman printf("mama"); -girl printf("goat"); -something printf("sump'n"); -{BW}lie printf("%chonky jive",yytext[0]); --o- printf("-on rebound-"); -[a-z]"." { printf("%s", yytext);expletive();} -! printf(". Right On!"); -[Ss]ure printf("%cho'", yytext[0]); -get printf("git"); -"will have"{EW} | -"will"{EW} | -"got to"{EW} { printf("gots'ta");plastc();} -"I am" printf("I's gots'ta be"); -"aren't" | -"am not" | -"have not" | -"is not" | -"are not" printf("ain't"); -{BW}see{EW} { printf("%csee's",yytext[0]);plastc();} -{BW}are{EW} { printf("%cis",yytext[0]);plastc();} -{BW}hat{EW} { printf("%cfedora",yytext[0]);plastc();} -{BW}shoe printf("%ckicker",yytext[0]); -{BW}"have to"{EW} | -{BW}has{EW} { printf("%cgots'ta",yytext[0]);plastc();} -have printf("gots'"); -{BW}go{EW} | -{BW}"come over"{EW} | -{BW}come{EW} { printf("%cmosey on down",yytext[0]);plastc();} -buy printf("steal"); -{BW}car{EW} { printf("%cwheels",yytext[0]);plastc();} -drive printf("roll"); -{BW}food printf("%ccatfish an' colluhd greens",yytext[0]); -{BW}eat{EW} { printf("%cfeed da bud",yytext[0]);plastc();} -drink printf("guzzle"); -black | -negro printf("brother"); -white printf("honky"); -nigger printf("gentleman"); -nice printf("supa' fine"); -{BW}person printf("%csucka'",yytext[0]); -[Pp]eople printf("%cucka's", caseify('s')); -{BW}thing thing(yytext[0]); -house{EW} { printf("crib");plastc();} -home printf("plantation"); -name printf("dojigger"); -{BW}path printf("%calley",yytext[0]); -[Cc]omputer printf("%clunker", yytext[0]); -or printf("o'"); -president printf("super-dude"); -"prime minister" printf("prahm mistah"); -government printf("guv'ment"); -knew printf("knowed"); -[Bb]ecause printf("'%cuz", caseify('c')); -[Yy]our printf("%co'", yytext[0]); -[Ff]our printf("%coe", yytext[0]); -got printf("gots"); -young printf("yung"); -you printf("ya'"); -You printf("You's"); -first printf("fust"); -police printf("honky pigs"); -{BW}string printf("%cchittlin'",yytext[0]); -{BW}read printf("%ceyeball",yytext[0]); -write printf("scribble"); -think{EW} { printf("thin'");plastc();} -with printf("wif"); -other printf("uthu'"); -[Tt]hr printf("%c'r", yytext[0]); -[Tt]h printf("%c", caseify('d')); -ing printf("in'"); -{BW}a{EW} { printf("%csome",yytext[0]);plastc();} -{BW}to{EW} { printf("%ct'",yytext[0]); - if(yytext[yyleng-1]!=' ') - plastc(); - } -tion printf("shun"); -[Aa]lmost printf("%cos'", caseify('m')); -from printf("fum"); -[Yy]"ou're" printf("%couse", yytext[0]); -alright | -okay printf("coo'"); -[Aa]nd printf("%cn'", yytext[0]); -known printf("knode"); -want printf("wants'"); -beat printf("whup'ed"); -ile printf("ah'l"); -er{EW} { printf("uh");plastc();} -[a-z]sti printf("%cs'i", yytext[0]); -tute printf("toot"); -exp printf("'sp"); -exs | -exc printf("'s"); -{BW}ex printf("%c'es",yytext[0]); -[ae]ct{EW} { printf("%cc'", yytext[0]); plastc(); } -like printf("likes"); -done | -did printf("dun did"); -"kind of" printf("kind'a"); -women printf("honky chicks"); -{BW}man{EW} { printf("%cdude",yytext[0]);plastc();} -{BW}men{EW} | -{BW}mens{EW} { printf("%cdudes",yytext[0]);plastc();} -injured printf("hosed"); -killed | -dead printf("wasted"); -good printf("baaaad"); -open{EW} { printf("jimmey");plastc();} -opened{EW} { printf("jimmey'd");plastc();} -{BW}very printf("%creal",yytext[0]); -per printf("puh'"); -oar printf("o'"); -{BW}can printf("%ckin",yytext[0]); -{BW}just{EW} { printf("%cplum",yytext[0]);plastc();} -[Dd]etroit printf("Mo-town"); -[Ww]"estern "[Ee]"lectric" printf("da' cave"); -{BW}believe printf("%crecon'",yytext[0]); -[Ii]"ndianapolis" printf("Nap-town"); -Daniel | -Dan printf("Liva' Lips"); -Reagan printf("Kingfish"); -Ronald{EW} | -Ron{EW} { printf("Rolo");plastc();} -John printf("Rastus"); -Jim printf("Bo-Jangles"); -pontiff | -pope printf("wiz'"); -[Pp]ravda printf("dat commie rag"); -broken printf("bugger'd"); -strange{EW} { printf("funky");plastc();} -dance{EW} { printf("boogy");plastc();} -ask printf("ax'"); -{BW}so{EW} { printf("%cso's",yytext[0]);plastc();} -heard printf("'hoid"); -head printf("'haid"); -boss printf("main man"); -money printf("bre'd"); -[a-z]":" { *(yytext+1) = ','; - printf("%s dig dis:",yytext); - } -amateur printf("begina'"); -radio printf("transista'"); -{BW}of{EW} { printf("%cuh",yytext[0]);plastc();} -which | -what printf("whut"); -"don't" printf("doan'"); -does printf("duz"); -{BW}was{EW} | -{BW}were{EW} { printf("%cwuz",yytext[0]);plastc();} -{BW}understand printf("%cdig",yytext[0]); -{BW}my printf("%cmah'",yytext[0]); -again | -against printf("agin'"); -{BW}[Ii]{EW} { printf("%cah'",yytext[0]);plastc();} -meta printf("meta-fuckin'"); -cally printf("c'l"); -%% -plastc() -{ - unput(yytext[yyleng-1]); -} - -caseify(c) -char c; -{ - if (yytext[0] <= 'Z') - return (c - ' '); - else - return (c); -} - -thing(c) -char c; -{ - static short count = 0; - - putchar(c); - switch (count++ % 4) { - case 0: case 2: - printf("thang"); - break; - case 1: - printf("doohickey"); - break; - case 3: - printf("wahtahmellun"); - break; - } -} -expletive() -{ - static short count = 0; - static short which = 0; - - if (count++ % 4 == 0) { - switch (which++ % 5) { - case 0: printf(" What it is, Mama!"); break; - case 1: printf(" Ya' know?"); break; - case 2: printf(" Sheeeiit."); break; - case 3: printf(" Ya' dig?"); break; - case 4: printf(" Git down!"); break; - } - } -} - -/* - * Bugs: - * - * If a sentence starts with a keyword it doan' get converted, or: - * it do, but gets a leading space - */ diff --git a/ken.l b/ken.l deleted file mode 100644 index 6e03181..0000000 --- a/ken.l +++ /dev/null @@ -1,283 +0,0 @@ -%{ -/* - * ken: - * will turn English into Cockney, featuring (dubious) rhyming slang for a lot - * of computer terminology. - * - * Written by Stephen K Mulrine - * Make copies if you want etc.etc. - * - * ken is named after Ken the Chirpy Cockney Character from the Viz Comic (tm), - * who speaks somewhat like that. - */ -%} -%e 3000 -%p 6000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] -%{ - char buf[128]; -%} - -%% - -stairs printf("apples and pears"); -Downstairs printf("Down the apples and pears"); -downstairs printf("down the apples and pears"); -Upstairs printf("Up the apples and pears"); -upstairs printf("up the apples and pears"); -[Mm]outh printf("North and South"); -[Ff]ace printf("Boat Race"); -[Tt]rouble printf("Barney Rubble"); -wife { switch(rand()%2) - { - case 0: printf("trouble and strife"); break; - case 1: printf("ole lady"); break; - } - } -Road printf("Frog and Toad"); -" road" printf(" frog and toad"); -"pub " printf("rub-a-dub "); -" bar " printf(" boozer "); -" husband" printf(" ole man"); -Party printf("Knees-up"); -party printf("knees-up"); -Parties printf("Knees-ups"); -parties printf("knees-ups"); -My printf("Me"); -" my" printf(" me"); -Your printf("Yer"); -your printf("yer"); -"You are " printf("Yer "); -"you are " printf("yer "); -You printf("Yer"); -you printf("yer"); -Those printf("Them"); -those printf("them"); -" those" printf(" them"); -"(those" printf("(them"); -"The " { switch(rand()%5) - { - case 0: printf("The bleedin' "); break; - default: ECHO; break; - } - } -"The" ECHO; -" the " { switch(rand()%5) - { - case 0: printf(" the bleedin' "); break; - default: ECHO; break; - } - } -[" "(]the ECHO; -"the " { switch(rand()%5) - { - case 0: printf(" the bleedin' "); break; - default: ECHO; break; - } - } -[Tt]his ECHO; -[" "(]this ECHO; -[Tt]hat ECHO; -[" "(]that ECHO; -Thus printf("So"); -" thus" printf(" so"); -"(thus" printf("(so"); -"thus" printf("so"); -[Tt]han ECHO; -[" "(]than ECHO; -Who ECHO; -who ECHO; -" old " printf(" ole "); -" to " printf(" ter "); -"Aren't you " printf("Aintcha "); -"aren't you " printf("aintcha "); -"Aren't" printf("Ain't"); -"aren't" printf("ain't"); -"Isn't" printf("Ain't"); -"isn't" printf("ain't"); -"Are not " printf("Ain't"); -"are not " printf("ain't "); -"Is not " printf("Ain't "); -" is not " printf(" ain't "); -"What is th" printf("Woss"); -"what is th" printf("woss"); -"What are you " printf("Wotcher "); -"what are you " printf("wotcher "); -"What you are" printf("Wotcher"); -"what you are" printf("wotcher"); -"What you're" printf("Wotcher"); -"what you're" printf("wotcher"); -"What are your" printf("Wotcher"); -"what are your" printf("wotcher"); -"What do you " printf("Wotcher "); -"what do you " printf("wotcher "); -"What do your" printf("Wotcher"); -"what do your" printf("wotcher"); -" "H[aeu]llo printf(" Wotcher"); -" "h[aeu]llo printf(" wotcher"); -What printf("Wot"); -what printf("wot"); -Were printf("Was"); -were printf("was"); -Bother printf("Ars"); -bother printf("ars"); -Mother printf("Muvver"); -Other printf("Uvver"); -other printf("uvver"); -Father printf("Favver"); -father printf("favver"); -Rather printf("Ravver"); -rather printf("ravver"); -Weather printf("Wevver"); -weather printf("wevver"); -Leather printf("Levver"); -leather printf("levver"); -Wither printf("Wivver"); -wither printf("wivver"); -Either printf("Eever"); -either printf("eever"); -With printf("Wiv"); -with printf("wiv"); -Anything printf("Anyfink"); -anything printf("anyfink"); -Something printf("Sumfink"); -something printf("sumfink"); -Nothing printf("Nuffink"); -nothing printf("nuffink"); -guitars printf("spoons"); -guitar printf("spoons"); -drums printf("spoons"); -drum printf("spoons"); -trumpets printf("spoons"); -trumpet printf("spoons"); -violins printf("spoons"); -violin printf("spoons"); -clarinets printf("spoons"); -clarinet printf("spoons"); -trombones printf("spoons"); -trombone printf("spoons"); -oboes printf("spoons"); -oboe printf("spoons"); -flutes printf("spoons"); -flute printf("spoons"); -tubas printf("spoons"); -tuba printf("spoons"); -Data printf("Info"); -data printf("info"); -Directory printf("Lockup"); -directory printf("lockup"); -Directories printf("Lockups"); -directories printf("lockups"); -[Pp]rocess { switch(rand()%2) - { - case 0: printf("Queen Bess"); break; - case 1: printf("Rudolf 'Ess"); break; - } - } -[Cc]omputer printf("French Tutor"); -[Bb]yte printf("Jimmy White"); -[Ff]iles printf("Nobby Stiles"); -[Ff]ile printf("Royal Mile"); -[Ll]anguage printf("'Am Sandwich"); -[Zz]ero printf("Emperor Nero"); -[Jj]ob printf("Uncle Bob"); -[Ss]hell printf("Bow Bell"); -[Ss]ave printf("Chas'n'Dave"); -[Ll]oad printf("Old Kent Road"); -[Mm]ouse printf("Doll's 'Ouse"); -[Bb]uffer printf("Sausage Stuffer"); -[Kk]eyboard printf("Henry Ford"); -[Mm]anual printf("Cocker Spaniel"); -[Ss]creen printf("James Dean"); -[Pp]rinter printf("'Arold Pinter"); -[Pp]lotter printf("Pansy Potter"); -[Cc]ompiler printf("Martin Tyler"); -[Ss]tring printf("Emperor Ming"); -[Bb]rain printf("Michael Caine"); -[Pp][Aa][Ss][Cc][Aa][Ll] { switch(rand()%2) - { - case 0: printf("Pall Mall"); break; - case 1: printf("Roald Dahl"); break; - } - } -[Aa][Ll][Gg][Oo][Ll] printf("Johnny Ball"); -[Ff][Oo][Rr][Tt][Rr][Aa][Nn] printf("Manfred Mann"); -[Cc][Oo][Bb][Oo][Ll] printf("Albert Hall"); -Stopped printf("'Ad the mockers put on"); -stopped printf("'ad the mockers put on"); -Stopping printf("Putting the mockers on"); -stopping printf("putting the mockers on"); -stops printf("puts the mockers on"); -stop printf("put the mockers on"); -STOP printf("Put The Mockers On"); -[Ll]ondoner printf("Cockney"); -friend { switch(rand()%3) - { - case 0: printf("mucker"); break; - case 1: printf("mate"); break; - case 2: printf("china"); break; - } - } -"a h" printf("an '"); -"A h" printf("An '"); -" h" printf(" '"); -" H" printf(" '"); -" C-" printf(" Bruce Lee-"); -" C " { switch(rand()%4) - { - case 0: printf(" Bruce Lee "); break; - case 1: printf(" Circus Flea "); break; - case 2: printf(" Bumble Bee "); break; - case 3: printf(" Door Key "); break; - } - } -" C." printf(" Circus Flea."); -Th printf("F"); -Wh printf("W"); -wh printf("w"); -aw printf("or"); -" sing" ECHO; -" ring" ECHO; -"ing " printf("in' "); -" th" printf(" f"); -"th" printf("ff"); -". " { switch(rand()%32) - { - case 0: printf(". I'll get out me spoons. "); break; - case 1: printf(". Yer can't 'ave a knees-up wivout a joanna. "); break; - case 2: printf(". Cor blimey guv, would I lie to you. "); break; - case 3: printf(". I'll make us all a nice cup of tea. "); break; - default: ECHO; break; - } - } -"? " { switch(rand()%3) - { - case 0: printf(", mate? "); break; - case 1: printf(", guv? "); break; - case 2: printf(", squire? "); break; - } - } -"! " { switch(rand()%6) - { - case 0: printf(", cor blimey! "); break; - case 1: printf("! Struth! "); break; - case 2: printf(", guv! "); break; - case 3: printf("! Honest guv! "); break; - case 4: printf(", mate! "); break; - case 5: ECHO; break; - } - } -. printf(yytext); -\n printf("\n"); -%% - -main() -{ - srand(getpid()); - yylex(); -} diff --git a/kraut.l b/kraut.l deleted file mode 100644 index 8435e51..0000000 --- a/kraut.l +++ /dev/null @@ -1,82 +0,0 @@ -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ -#include - -char buf[128]; -%} - -%% -ing printf("ingkt"); -" the " printf(" ze "); -"The " printf("Ze "); -" with " printf(" mitt "); -"With " printf("Mitt "); -wr printf("w-r-r"); -Wr printf("W-r-r"); -R printf("R-r-r"); -"Yes " printf("Jawohl "); -" r" printf(" r-r-r"); -"Yes." printf("Jawohl."); -"Yes!" printf("Jawohl!"); -"YES!" printf("JAWOHL!"); -" yes " printf(" ja "); -" yes." printf(" ja."); -" yes!" printf(" yes!"); -"No " printf("Nein "); -"No!" printf("Nein!"); -"No?" printf("Nein?"); -" no " printf(" nein "); -" no." printf(" nein."); -" no!" printf(" nein!"); -" no?" printf(" nein?"); -[Mm]"r." printf("Herr"); -[Mm]"rs." printf("Frau"); -Miss printf("Fraulein"); -" of " printf(" uff "); -"Of " printf("Uff "); -my printf("mein"); -My printf("Mein"); -" and " printf(" undt "); -"And " printf("Undt "); -"One " printf("Ein "); -" one" printf(" ein"); -"Is " printf("Ist "); -" is " printf(" ist "); -"ow " printf("ow "); -"w " printf("w "); -sh printf("sch"); -Sh printf("Sch"); -ch printf("ch"); -Ch printf("Ch"); -" c" printf(" k"); -" C" printf(" K"); - -v printf("f"); -V printf("F"); -" w" printf(" v"); -W printf("V"); -th printf("d"); -Th printf("D"); -[Jj]ohn printf("Johann"); -[Ww]illiam printf("Wilhelm"); -[Bb]rad printf("Wilhelm"); -[Gg]ary printf("Gerhardt"); -[Jj]on printf("Hansel"); - -[a-f]"!" {sprintf(buf,"%s Naturlich!",yytext);printf(buf);} -[p-z]"!" {sprintf(buf,"%s Seig Heil!",yytext);printf(buf);} -.|'\n' ECHO; - -%% -main() -{ - yylex(); -} diff --git a/marc-barrett.l b/marc-barrett.l deleted file mode 100644 index 23cd413..0000000 --- a/marc-barrett.l +++ /dev/null @@ -1,137 +0,0 @@ -From: dankmyer@hilbert.math.grin.edu (Kirt A Dankmyer) -Newsgroups: alt.sources -Subject: mb.l -Date: 4 Dec 1992 15:08:40 -0600 -Message-ID: <9212042108.AA10484@hilbert> - -%{ - - /* Marc Barrett posting translator; - amaze your friends - To compile: lex mb.l - cc -o mb lex.yy.c -ll - To use: - mb < Your_MB_posting - */ - - char buf[128]; -%} -%a 3000 -%e 3000 -%p 5000 -%n 3000 -%% -"lots and lots" printf("few"); -"HyperCard" printf("crap"); -"real," printf("phony,"); -"real." printf("phony."); -"real " printf("phony "); -"People" printf("I"); -"numerous" printf("1 or 2 (I think)"); -" other" printf(" lamer"); -"nightmare" printf("paradise"); -"bad" printf("excellent"); -"may" printf("will"); -"UNUSABLE" printf("FAST AS HELL"); -"pokish" printf("slower than a snail"); -"junior" printf("intelligent"); -"potentially" printf("probably"); -"I know" printf("I think"); -"looks a thousand times better" printf("looks worse"); -"years ago" printf("years ago (before I bought an Amiga) "); -"no improvements" printf("many improvements"); -"As far as I know" printf("I don't really know"); -"as far as I know" printf("but what do I know"); -"totally official" printf("a wild rumor"); -"kludged" printf("designed"); -"be any" printf("be some"); -"also likely never" printf("also probably"); -"likely never" printf("probably"); -"everyone" printf("some people"); -"being unreasonable" printf("being an idiot"); -"I don't understand" printf("I dont' understand. "); -"it is unreasonable" printf("it is stupid. "); -"everybody" printf("some people"); -"have never" printf("will have"); -"must have" printf("could have"); -"will never" printf("will"); -"never will" printf("will again soon"); -"would not" printf("may"); -"the need" printf("some silly things"); -"The problem" printf("My problem"); -"the problem" printf("my problem"); -"the simple fact" printf("my opinion"); -"simply" printf("(with great difficulty)"); -"it's kind of embarassing" printf("I'm kind of embarassing"); -"I often see" printf("I never see"); -"I questioned" printf("I flamed"); -"development costs" printf("development costs (which, I'd like to remind you, I know nothing about)"); -"IMO" printf("(belch)"); -"to explain" printf("to give my wacky ideas about"); -"practically zero" printf("astronomical"); -"I think" printf("I think. "); -"don't think" printf("don't think. "); -"do not think." printf("do not think. "); -"I am trying" printf("I am flaming"); -"I've" printf("Commodore has"); -"Beware the ides of September" printf("I'm gonna flame any new stuff shown in September"); -"Sad" printf("Weird"); -"sad" printf("weird"); -"I WAS RIGHT" printf("I DON'T KNOW WHAT I'M TALKING ABOUT"); -"aren't" printf("are"); -"anymore" printf("still"); -" are " printf(" aren't "); -"lost" printf("gained"); -" low " printf(" high "); -" high " printf(" low "); -"isn't" printf("is"); -"all of" printf("none of"); -"is not" printf("is"); -"stagnates" printf("flourishes"); -"never" printf("always"); -"short-sightedness" printf("genius"); -"inferior" printf("superior"); -"superior" printf("inferior"); -"few " printf("many "); -"many" printf("few"); -"no improvements" printf("many improvements"); -"different" printf("similar"); -"the only substantial" printf("one of the many"); -"best" printf("worst"); -"worst" printf("best"); -"except for" printf("including"); -"worse" printf("better"); -"better" printf("worse"); -"nothing" printf("something"); -"something" printf("nothing"); -"no longer" printf("still"); -"biggest" printf("smallest"); -"high" printf("low"); -" low" printf(" high"); -"does not" printf("does"); -"doesn't" printf("does"); -"brilliantly" printf("inferiorly"); -"Avoid" printf("Search out"); -"lots of" printf("a few"); -"beautifully" printf("horribly"); -"wrong" printf("right"); -"right" printf("wrong"); -"tight" printf("loose"); -"loose" printf("tight"); -"same" printf("different"); -"disappointing" printf("impressive"); -"pieces of shit" printf("accomplishments"); -" NO!" printf(" YES!"); -"retrogrades" printf("leaps forward"); -"garbaged" printf("incredible"); -"reduced to garbage" printf("incredible"); -"all games" printf("no games"); -"slow" printf("fast"); -"fast" printf("slow"); -"can't" printf("can"); -"won't" printf("will"); -"will" printf("won't"); -" more" printf(" less"); -"has not" printf("has"); -%% - diff --git a/mb.l b/mb.l deleted file mode 100644 index 23cd413..0000000 --- a/mb.l +++ /dev/null @@ -1,137 +0,0 @@ -From: dankmyer@hilbert.math.grin.edu (Kirt A Dankmyer) -Newsgroups: alt.sources -Subject: mb.l -Date: 4 Dec 1992 15:08:40 -0600 -Message-ID: <9212042108.AA10484@hilbert> - -%{ - - /* Marc Barrett posting translator; - amaze your friends - To compile: lex mb.l - cc -o mb lex.yy.c -ll - To use: - mb < Your_MB_posting - */ - - char buf[128]; -%} -%a 3000 -%e 3000 -%p 5000 -%n 3000 -%% -"lots and lots" printf("few"); -"HyperCard" printf("crap"); -"real," printf("phony,"); -"real." printf("phony."); -"real " printf("phony "); -"People" printf("I"); -"numerous" printf("1 or 2 (I think)"); -" other" printf(" lamer"); -"nightmare" printf("paradise"); -"bad" printf("excellent"); -"may" printf("will"); -"UNUSABLE" printf("FAST AS HELL"); -"pokish" printf("slower than a snail"); -"junior" printf("intelligent"); -"potentially" printf("probably"); -"I know" printf("I think"); -"looks a thousand times better" printf("looks worse"); -"years ago" printf("years ago (before I bought an Amiga) "); -"no improvements" printf("many improvements"); -"As far as I know" printf("I don't really know"); -"as far as I know" printf("but what do I know"); -"totally official" printf("a wild rumor"); -"kludged" printf("designed"); -"be any" printf("be some"); -"also likely never" printf("also probably"); -"likely never" printf("probably"); -"everyone" printf("some people"); -"being unreasonable" printf("being an idiot"); -"I don't understand" printf("I dont' understand. "); -"it is unreasonable" printf("it is stupid. "); -"everybody" printf("some people"); -"have never" printf("will have"); -"must have" printf("could have"); -"will never" printf("will"); -"never will" printf("will again soon"); -"would not" printf("may"); -"the need" printf("some silly things"); -"The problem" printf("My problem"); -"the problem" printf("my problem"); -"the simple fact" printf("my opinion"); -"simply" printf("(with great difficulty)"); -"it's kind of embarassing" printf("I'm kind of embarassing"); -"I often see" printf("I never see"); -"I questioned" printf("I flamed"); -"development costs" printf("development costs (which, I'd like to remind you, I know nothing about)"); -"IMO" printf("(belch)"); -"to explain" printf("to give my wacky ideas about"); -"practically zero" printf("astronomical"); -"I think" printf("I think. "); -"don't think" printf("don't think. "); -"do not think." printf("do not think. "); -"I am trying" printf("I am flaming"); -"I've" printf("Commodore has"); -"Beware the ides of September" printf("I'm gonna flame any new stuff shown in September"); -"Sad" printf("Weird"); -"sad" printf("weird"); -"I WAS RIGHT" printf("I DON'T KNOW WHAT I'M TALKING ABOUT"); -"aren't" printf("are"); -"anymore" printf("still"); -" are " printf(" aren't "); -"lost" printf("gained"); -" low " printf(" high "); -" high " printf(" low "); -"isn't" printf("is"); -"all of" printf("none of"); -"is not" printf("is"); -"stagnates" printf("flourishes"); -"never" printf("always"); -"short-sightedness" printf("genius"); -"inferior" printf("superior"); -"superior" printf("inferior"); -"few " printf("many "); -"many" printf("few"); -"no improvements" printf("many improvements"); -"different" printf("similar"); -"the only substantial" printf("one of the many"); -"best" printf("worst"); -"worst" printf("best"); -"except for" printf("including"); -"worse" printf("better"); -"better" printf("worse"); -"nothing" printf("something"); -"something" printf("nothing"); -"no longer" printf("still"); -"biggest" printf("smallest"); -"high" printf("low"); -" low" printf(" high"); -"does not" printf("does"); -"doesn't" printf("does"); -"brilliantly" printf("inferiorly"); -"Avoid" printf("Search out"); -"lots of" printf("a few"); -"beautifully" printf("horribly"); -"wrong" printf("right"); -"right" printf("wrong"); -"tight" printf("loose"); -"loose" printf("tight"); -"same" printf("different"); -"disappointing" printf("impressive"); -"pieces of shit" printf("accomplishments"); -" NO!" printf(" YES!"); -"retrogrades" printf("leaps forward"); -"garbaged" printf("incredible"); -"reduced to garbage" printf("incredible"); -"all games" printf("no games"); -"slow" printf("fast"); -"fast" printf("slow"); -"can't" printf("can"); -"won't" printf("will"); -"will" printf("won't"); -" more" printf(" less"); -"has not" printf("has"); -%% - diff --git a/moo.l b/moo.l deleted file mode 100644 index 9da3091..0000000 --- a/moo.l +++ /dev/null @@ -1,122 +0,0 @@ -%e 2000 -%p 5000 -%n 1000 -%k 500 -%a 4000 -%o 2000 -BW [ ] -EW [ .,;!?] - -%{ -/* -** The cow filter -** by Benjamin Elijah Griffin 8 May 1994 -** -** An experiment in lex written instead of a paper on Nietzsche. -** -** compile like this: -** lex moo.l -** cc -o moo lex.yy.c -ll -** rm lex.yy.c -** -** use like this: -** moo < infile > outfile -** or -** cat infile | | moo | > outfile -** -*/ - -char WhAt[]="@(#)Benjamin Elijah Griffin's moo filter for cowtalk (c) 1994\n@(#)$Header: moo.l,v 1.1 94/05/08 23:37:53 bgriffin Final $" -; - -%} - -%% - -" and " printf(" moond "); -[Uu][Nn][Ii][Xx] printf("Moonix"); -[Mm][Ss].[Dd][Oo][Ss] printf("Moo Dos"); -news printf("moos"); -[Uu]senet printf("Moosnet"); -" man " printf(" mooster "); -" men " printf(" moosters "); -woman printf("moostress"); -women printf("moostresses"); -pig printf("cop"); -[Dd]airy.[Ff]armer printf("Pimp"); -[Dd]airy.[Ff]arm printf("Farm of Ill Repute"); -[Bb]eef.[Ff]armer printf("Slave Driver"); -[Bb]eef.[Ff]arm printf("Prison"); -yogurt printf("bacteria culture"); -cheese printf("smega"); -curds printf("moist smega"); -whey printf("bile"); -buttermilk printf("foul fluid"); -butter { printf("sphinter lubrication"); - /* A _Last Tango in Paris_ joke */ } -cream printf("honey"); -beef printf("murdered meat"); -grass printf("gourmet greenry"); -hay printf("subsistance rations"); -cereal printf("fomood"); -milkmaid printf("rapist"); -[Mm]aid.a.milkin | -[Mm]aid.a.milking printf("Christmas Rapist"); -[Mm]aids.a.milkin | -[Mm]aids.a.milking printf("Christmas Rapists"); -milking printf("rape"); -rape printf("milking"); -rapist printf("milkmaid"); -veal printf("the devil's food"); -"bull fighter" printf("Grim Reaper"); -"bull fight" printf("Game of Sorrows"); -milk printf("mead"); -Milk printf("Mead"); -"cafe con latte" | -capuccino printf("piss water"); -" "[In]"ndia " printf("Heaven"); -" "[In]"ndian " printf("heavenly"); -"sacred cow" printf("God"); -silo printf("calfeteria"); -divin printf("bovin"); -[Gg][Oo-][Dd] printf("Bovinity"); -sheep printf("dog(s)"); -relaxing printf("chewing the cud"); -relax printf("chew the cud"); -utter printf("udder"); -" udder" printf(" teat"); -" teat" printf(" udder"); -other printf("udder"); -":^)" printf("Mooooooooo!"); -":-)" printf("Moomoomoomoo!"); -"8-)" printf("Mooo! Mooo!"); - -[aeiou]"." { *(yytext+1) = 0; - printf("%s. Moo.",yytext); - } -[rtpwy]"." { *(yytext+1) = 0; - printf("%s. Moo! Moo.",yytext); - } -"?" printf("? Moo."); -"!" printf("! MOO!"); -oo printf("MOO"); -o printf("oo"); -O printf("Moo"); -you printf("moo"); -" u" printf("moo"); -" U" printf("Moo"); -"uu" printf("MOOO"); -u printf("oo"); -U printf("Oo"); - -"."\n printf(".\nMooooo. "); - -. printf("%s",yytext); - -%% - -main() -{ - yylex(); -} - diff --git a/newspeak.l b/newspeak.l deleted file mode 100644 index e291f6d..0000000 --- a/newspeak.l +++ /dev/null @@ -1,677 +0,0 @@ -%{ -*- Mode:Fundamental -*- -/* - * newspeak.l, version 1.1. - * Lex filter to transform plain English into NewSpeak. - * Copyright (c) 1991 Jamie Zawinski . - * Permission granted for noncommercial use and redistribution. - * - * To compile: - * - * flex newspeak.l - * cc -O -o newspeak lex.yy.c - * rm lex.yy.c - * - * This must be compiled with "flex", not normal "lex". Lex has - * some builtin, unchangable limits which this program exceeds. - * This has been verified to work with flex version 2.3.7, and - * may not work with flex version 2.3.6. - * - * You can get 'flex' by anonymous FTP to prep.ai.mit.edu, or - * anywhere else you get GNU software. - * - * Run this like so: "newspeak < some-text-file | more" - * - * There are some design notes near the end. Suggestions and - * improvements to this code are more than welcome. - * Hail Big Brother! - *--------------------------------------------------------------------------- - */ -#include - -unsigned int fcounter = 0; - -#define Y0 yytext[0] -#define Y1 yytext[1] -#define Y2 yytext[2] -#define Y3 yytext[3] -#define C caseify -#define C1 caseify1 - -#define CAP(string) capstring(0, (string),0) -#define WCAP(string) capstring(Y0,(string),1) - -#define COMP(string1,string2) compstring(0, (string1),(string2),0) -#define WCOMP(string1,string2) compstring(Y0,(string1),(string2),1) - -#define DUMP() printf("%s",yytext) -%} - -%e 8000 -%p 9000 -%n 2000 -%k 3000 -%a 5000 -%o 4000 - -W (([ ]?\n[ ]*)|[ ]|[\"'`]) -ES [.,;:!?/] -EW ({W}|{ES}|"'") - -YOUNG (([Yy]oung|[Ss]mall|[Ll]ittle){W}) -DEAD (([Dd]ead|[Dd]eceased){W}) -THE ([Tt]he{W}?) -ANDOR ({W}(([Aa]nd)|([Oo]r)){W}?) -COLOR (red|green|blue|yellow|cyan|magenta|purple|orange|mauve|pink|turquoise|brown|gr[ae]y) - -%% - -%{ - /****************************** - * PLUSwords * - ******************************/ -%} - -[Qq]uite{EW}/[A-Za-z][A-Za-z] CAP("plus"); -[Rr]ather{EW}/[A-Za-z][A-Za-z][A-Za-z] CAP("plus"); -[Kk]ind{EW}of{EW}/[A-Za-z][A-Za-z][A-Za-z] CAP("plus"); -[Kk]inda{EW}/[A-Za-z][A-Za-z][A-Za-z] CAP("plus"); -[Mm]ore{W}than{W}a{W}(little|bit){W} CAP("plus"); -[Pp]ro- CAP("plus"); - -[Hh]undreds{W}of{W}[Tt]housands | -[Hh]undreds{ANDOR}[Tt]housands | -[Hh]undreds{W}if{W}not{W}[Tt]housands | -[Tt]housands | -[Mm]illions CAP("doubleplusmany"); - -[Dd]ozens CAP("many"); -[Hh]undreds CAP("plusmany"); - -([Bb]right|[Ll]ight|[Ii]ntense){W}/{COLOR} CAP("plus"); -([Dd]im|[Ff]aded|[Dd]ark|[Pp]ale){W}/{COLOR} CAP("plusun"); -([Dd]im|[Ff]aded|[Dd]ark|[Pp]ale) CAP("unlight"); - -[Ee]very DUMP(); -[Vv]ery{W} | -[Rr]eally{W} | -[Tt]erribly{W} | -[Aa]wesome({W})? | -[Aa]wfully{W} CAP("doubleplus"); - -[Ww]hopping{EW} CAP("plusbig"); - -"O.K." | -[Aa]ll({W})?[Rr]ight | -[Oo][Kk][Aa][Yy] CAP("plusgood"); -{W}OK/{W} WCAP("plusgood"); - -([Tt]oo|[Oo]verly|[Tt]hat){W}[Mm]uch CAP("plusmuch"); - -{W}[Bb]ad/{EW} WCAP("ungood"); -{W}[Pp]oor/{EW} WCAP("ungood"); -{W}[Ll]ame/{EW} WCAP("ungood"); -{W}[Pp]itiful/{EW} WCAP("ungood"); -{W}[Nn]asty/{EW} WCAP("plusungood"); -{W}[Hh]orrid/{EW} WCAP("doubleplus ungood"); -{W}[Hh]orrible/{EW} WCAP("doubleplus ungood"); -{W}[Aa]wful/{W} WCAP("doubleplus ungood"); -{W}[Ee]vil/{W} WCAP("doubleplus ungood"); - -%{ - /****************************** - * Titles * - ******************************/ -%} - -{W}[Ss]ir/{EW} WCAP("citizen"); -{W}[Mm]r"."/{EW} WCAP("brother"); -[Mm]ister/{EW} CAP("brother"); -[Mm]adame? CAP("sister"); -{W}[Mm]iss/{EW} WCAP("sister"); -[Mm]a"'"?am/{EW} CAP("sister"); -{W}[Mm]r?s"."/{EW} WCAP("sister"); -Mrs/{EW} CAP("sister"); - -{YOUNG}?[Cc]hildren CAP("young citizens"); -{YOUNG}?[Bb]oys{ANDOR}[Gg]irl/s CAP("young citizens"); -{YOUNG}?([Kk]id|[Gg]irl|[Bb]oy|[Cc]hild)/{EW} CAP("young citizen"); - -[Ff]ellow CAP("citizen"); - -[Nn]on{W}?"-"?citizen CAP("unperson"); -[Nn]on{W}?"-"?member CAP("unperson"); -[Cc]riminal/s? CAP("unperson"); -{DEAD}(man|woman) CAP("unperson"); -{DEAD}(men|women) CAP("unpersons"); - -[Ii]n{W}[Pp]erson DUMP(); - -{W}[Uu]ser WCOMP("party ","worker"); -[Ss]tudent COMP("party ","worker"); -[Cc]itizen/s?{EW} COMP("party ","worker"); -[Pp]erson/s?{EW} COMP("party ","worker"); -[Pp]eople COMP("party ","workers"); - -[Ss]enator | -[Cc]ongressman | -[Ss]upervisor | -[Pp]rofessor printf("Inner Party Member"); -[Pp]rof"."/{EW} printf("Inner Party Member"); -[Pp]rof/{EW} printf("Inner Party Member"); - -Representative/s? printf("Inner Party Member"); -representatives printf("Inner Party Members"); - -[Ww]hite{W}[Cc]ollar | -[Uu]pper{W}[Cc]lass COMP("inner ","party"); -[Mm]iddle{W}[Cc]lass CAP("party"); -[Bb]lue{W}[Cc]ollar | -[Ww]orking{W}[Cc]lass | -[Ll]ower{W}[Cc]lass CAP("prole"); -([Ff]ool|[Ii]diot)/s?{EW} CAP("prole"); -[Ss]tupidity CAP("proleness"); - -%{ - /****************************** - * Organizations * - ******************************/ -%} - -[Aa]?{W}([Ww]hite{W}[Hh]ouse|[Gg]ovt\.?|[Gg]overnment){W}([Ss]ource|[Oo]fficial|[Ss]pokes(man|woman|person)) CAP("an Inner Party Member"); -{THE}?[Rr]epublican{W}[Pp]arty COMP("mini","luv"); -{THE}?[Dd]emocratic{W}[Pp]arty COMP("mini","plenty"); - -{THE}?Congress printf("MiniPax"); -{THE}?[Ss]enate printf("MiniPax"); -{THE}?[Hh]ouse{W}[Oo]f{W}[Rr]epresentatives printf("MiniPax"); -{THE}?[Ss]tate{W}[Dd]epartment printf("MiniPax"); -{THE}?[Ss]tate{W}[Dd]ept"."? printf("MiniPax"); -{THE}?[Dd]efen[cs]e{W}[Dd]epartment | -{THE}?[Dd]efen[cs]e{W}[Dd]ept"."? | -{THE}?[Ww]ar{W}[Dd]epartment | -{THE}?[Ww]ar{W}[Dd]ept"."? | -{THE}?[Hh]ouse{W}of{W}[Cc]ommons | -{THE}?Pentagon | -{THE}?[Ff]eds | -{THE}?FCC | -{THE}?D[Oo]D | -{THE}"D."[Oo]".D." | -{THE}?[Ss]ecret{W}[Ss]ervice COMP("mini","luv"); -{THE}?White{W}House | -{THE}?Kremlin printf("MiniTrue"); -{THE}?(CIA|NSA|FBI|MI"-"?5)/{EW} printf("MiniTrue"); -{THE}?("C.I.A."|"N.S.A."|"F.B.I.")/{EW} printf("MiniTrue"); -{THE}?[Aa]rchive/s? COMP("mini","rec"); -{THE}?[Ll]ibrary COMP("mini","rec"); -{THE}?[Ll]ibraries COMP("mini","recs"); - -[Tt]hought{W}[Pp]olice|[Nn]azis? COMP("think","pol"); -[Vv]ice{W}[Ss]quad COMP("sex","pol"); -PMRC|"P.M.R.C." COMP("sex","pol"); - -[Oo]fficer CAP("minister"); - -{THE}?[Dd]epartment{EW}of{EW}. | -{THE}?[Dd]ept"."?{EW}of{EW}. | -{THE}?[Uu]niversity{EW}of{EW}. | -{THE}?[Uu]niv"."?{EW}of{EW}. | -{THE}?[Dd]ept"."?{EW}of{EW}. | -{THE}?([Ss]ub"-"?)?[Cc]omm?itt?ee{EW}(of|on){EW}. | -{THE}?[Ss]chool{EW}of{EW}. { - if ((yytext[yyleng-1] >= 'A') && (yytext[yyleng-1] <= 'Z')) - /* "the school of Law" --> "MiniLaw" */ - printf("Mini%c",yytext[yyleng-1]); - else if ((yytext[yyleng-1] >= 'a') && (yytext[yyleng-1] <= 'z')) - /* "the school of law" --> "MiniLaw" (not "Minilaw") */ - printf("Mini%c",yytext[yyleng-1] - ('a' - 'A')); - /* "the school of 5 things" --> "Ministry of 5 things" */ - else printf("Ministry of %c",yytext[yyleng-1]); - } - -[Dd]epartment | -[Uu]niversity CAP("ministry"); -[Uu]niv"."?/{W} CAP("ministry"); -[Dd]ept"."?/{W} CAP("ministry"); -([Ss]ub"-"?)?[Cc]omm?itt?ee CAP("ministry"); - -{THE}[Pp]roject/{EW} CAP("the Three Year Plan"); -[Oo]ur{W}[Pp]roject/{EW} CAP("our Three Year Plan"); -[Bb]udget printf("Three Year Plan"); -[Pp]roject/{ES} printf("Three Year Plan"); - -{W}({THE}|([aa]{W}))[Pp]roject printf("%cthe Three Year Plan",Y0); - -[A-Za-z]+"'"[Ss]/{W}(law|Law|LAW|book|Book|BOOK|rule|Rule|RULE){EW} printf("Goldstein's"); - -%{ - /****************************** - * Actions * - ******************************/ -%} - -[Ii]n{W}love{EW} CAP("SexCriming"); -[Ll]ove{W}you/{EW} CAP("love Big Brother"); -[Ll]ove{W}me/{EW} CAP("love Big Brother"); - -[Cc]loning | -[Rr]eproduction | -[Cc]elibacy | -[Pp]rocreation COMP("good","sex"); - -[Cc]elibate | -[Pp]rocreate COMP("good","sexwise"); - -[Tt]elevisions? | -TVs? | -[Tt]"."[Vv]"."s? | -[Rr]adios? | -[Nn]ews{W}?[Pp]apers? | -[Jj]ournalism | -[Mm]ovies? | -[Rr]ock{EW}?"-"?(and|"&"|"'"?n"'"?){EW}?"-"?[Rr]oll({W}[Mm]usic)? | -(([Rr]ock|[Cc]lassical|[Ii]ndustrial|[Pp]op|[Dd]ance|[Rr]ap){W})?[Mm]usic | -[Tt]unes | -[Mm]oney | -[Cc]ash | -[Cc]omic{W}[Bb]ooks? | -([Ss]tar{W}?)?[Tt]rek COMP("prole","feed"); - -[Pp]eace{W}[Mm]ovement | -[Pp]eace{W}[Pp]rotest | -[Aa]nti{EW}[Ww]ar | -([Pp]assive{W})?[Rr]esistance | -[Cc]reativity | -[Tt]reason | -[Rr]esearch COMP("crime","think"); -%{ - /****************************** - * Religion * - ******************************/ -%} - -[Jj]esus{W}[Cc]hrist | -[Jj]esus | -{THE}?[Bb]uddh?a | -[Mm]ohamm?ed | -[Mm]artin{W}[Ll]uther{W}[Kk]ing | -J\.?\ ?R\.?\ \"?Bob\"?\ Dobbs printf("doubleplus crimethinker"); - -([Jj]esse{W})?[Hh]elms | -([RrDd]on(ald)?{W})?[Rr]ea?gan | -[Gg]eorge{W}[Gg]uscoria printf("doubleplus goodthinker"); - -[Jj]ewish COMP("crime","thinkwise"); -[Jj]ew | -[Cc]hristian | -[Mm]oslem | -[Bb]uddhist | -[Aa]thiest | -[Aa]gnostic COMP("crime","thinker"); - -[Ff]aith COMP("belly","feel"); - -%{ - /****************************** - * Places * - ******************************/ -%} - -[Ee]ngland|{THE}?[Uu]nited{W}[Kk]ingdom | -({THE}?[Uu]nited{W}[Ss]tates{W}[Oo]f{W})?[Aa]merica | -{THE}?[Uu]nited{W}[Ss]tates|USA|"U.S.A."|[Cc]anada | -[Gg]ermany|[Ii]srael|[Ee]urope printf("Oceana"); - -Iranian|Iraqu?i|Libyan|Russian|African|Egyptian printf("Eurasian"); -Iran|Iraq|Libya|Russia|Africa|Egypt | -([Ss]audi{W})?Arabia|{THE}?Soviet{W}Union printf("Eurasia"); -[Ss]oviet printf("Eurasian"); - -[Cc]hinese|[Jj]apanese|[Tt]aiwanese | -[Pp]hillipino|[Ii]ndian|[Aa]ustralian|[Mm]exican | -[Nn]icaraguan|[Ss]alvadori?an printf("Eastasian"); -China|[Jj]apan|[Tt]aiwan|{THE}?[Pp]hillipines|[Ii]ndia | -[Aa]ustralia|[Mm]exico|[Nn]icaragua|[Ee]l{W}[Ss]alvador printf("Eastasia"); - -[Kk]uwaiti printf("Eurasian"); -[Kk]uwait printf("The Malabar Front"); - -%{ - /****************************** - * Miscelaneous Translations * - ******************************/ -%} - -{W}[Ff]aster WCAP("plus speedful"); -{W}[Ss]lower WCAP("plus unspeedful"); -{W}[Ff]ast WCAP("speedful"); -{W}[Ss]low WCAP("unspeedful"); - -[Mm]odern CAP("plusnew"); -[Aa]ncient CAP("plusunnew"); -{W}old/{W} WCAP("plusunnew"); - -[Hh]appiness CAP("joyfulness"); -[Hh]appy CAP("joyful"); -[Qq]uick CAP("speedful"); -{W}[Ss]peedy WCAP("speedful"); -[Hh]eavy CAP("weightful"); -[Hh]eavill?y CAP("weightfully"); -[Ss]ick(ly)? CAP("unhealthful"); - -[Gg]ross | -[Ss]ickening | -[Ff]oul | -[Pp]utrid | -[Dd]isgusting COMP("crime","thinkful"); - -[Ss]mash | -[Cc]rush | -[Oo]bliterate | -[Aa]nnihilate | -[Nn]eutralize | -[Dd]emolish | -[Dd]estroy CAP("unbuild"); - -[Ii]nanimate CAP("unlifeful"); -[Ss]ociety|[Cc]ulture printf("IngSoc"); -[A-Za-z]+isi?m/{EW} printf("Goldsteinism"); -[A-Za-z]+ist/{EW} printf("Goldsteinist"); - -{W}[Dd]ead WCAP("unlifeful"); -{W}[Dd]eath WCAP("unlife"); -{W}[Ll]ie WCAP("untruth"); -{W}[Ff]alsehood WCAP("untruth"); -{W}[Mm]istake/{EW} WCAP("untruth"); -{W}[Ww]hisper WCAP("unshout"); -{W}[Pp]roud WCAP("prideful"); - -[Ff]alse CAP("untrue"); -[Dd]ark CAP("unlight"); -[Bb]lack CAP("unwhite"); -[Ff]orbidden CAP("unallowed"); -[Ff]orbid CAP("unallow"); -[Ff]ailure CAP("unsuccess"); -[Ff]ail/{EW} CAP("unwin"); - -[Ss]tatistics?/{EW} CAP("propaganda"); -{W}[Aa]n{W}[Aa]nn?ouncement WCAP("a NewsFlash"); -[Aa]nn?ouncement printf("NewsFlash"); -[Ii]nstructions? printf("B. B. DayOrder"); - -[Aa]lmost|[Nn]early CAP("within measurable distance of"); -[Ff]unny CAP("humorful"); - -[Dd]oom CAP("unsave"); -[Cc]haos CAP("unorder"); -[Cc]haotic CAP("unorderful"); -[Ee]nslaved CAP("protected"); -[Ee]nslave CAP("protect"); -[Dd]angerous CAP("unsafewise"); -[Dd]anger CAP("unsafe"); -([Bb]lind{W})?[Oo]bedience COMP("ing","soc"); -\"?[Nn]ew{W}[Ww]orld{W}[Oo]rder\"? printf("IngSoc"); - -[Pp]rivacy | -[Ii]ndividuality COMP("own","life"); - -IMHO printf("for the love of Big Brother"); - -[Ee]motion(al|s)? | -[Cc]onviction | -[Bb]elie(f|ve) | -[Aa]ccept(ance)? COMP("belly","feel"); - -[Dd]emocracy | -[Ll]iberty | -[Ff]reedom | -[Jj]ustice | -{THE}?[Aa]merican{W}[Ww]ay | -[Ss]ubversion | -[Pp]assion COMP("crime","think"); - -[Oo]bscenity | -[Pp]ornography | -[Oo]rgasm | -[Ee]rotica COMP("sex","crime"); -[Ss]exy | -[Oo]bscene | -[Pp]ornographic | -[Ee]rotic COMP("sex","crimeful"); - -[Cc]ritic/s?{W} COMP("crime","thinker"); - -[Ii]nfant{W}[Mm]ortality COMP("inf","mort"); - -[Ff]amilies | -[Pp]arents COMP("family ","units"); -[Mm]other{ANDOR}[Ff]ather | -[Bb]rother{ANDOR}[Ss]ister COMP("family ","unit"); -{W}[Pp]arent/s?{EW} WCOMP("family ","unit"); -[Ff]amily COMP("family ","unit"); - -God/{EW} printf("Big Brother"); -[Pp]res(ident|".")({W}([Bb]ush|[Rr]eagan))? printf("Big Brother"); -[Pp]rime{W}[Mm]inister printf("Big Brother"); - -([Gg][Nn][Uu]{W}([Ee]macs|EMACS){W})?[Gg]eneral{W}[Pp]ublic{W}[Ll]icense printf("NewSpeak Dictionary"); - -(questioning|murder|ass?ass?ination)/{ES} printf("interrogation"); - -[Ss]keptic/{EW} CAP("unperson"); -[Ss]illy CAP("foolhardy"); -{W}[A-Za-z][A-Za-z]?illy DUMP(); -[Ss]outhern|[Ss]outherly CAP("southwise"); -[Nn]orthern|[Nn]ortherly CAP("northwise"); -[Ee]astern|[Ee]easterly CAP("eastwise"); -[Ww]estern|[Ww]esterly CAP("westwise"); -[Pl]leasant CAP("goodwise"); -[Vv]iolent CAP("unpeacewise"); -[Vv]iolence CAP("unpeaceness"); -[Ii]ndifference CAP("uncarefulness"); -[Ii]ndifferent CAP("uncareful"); -[Bb]elly CAP("abdomen"); -[Cc]omic CAP("humorwise"); -{W}[Uu]nless WCAP("lest"); -usually printf("usualwise"); - -[Gg]uerillas COMP("party ","workers"); - -[Ww]ar/{EW} CAP("engagement"); -[Dd]efen[cs]e/{EW} CAP("peace"); -[Ii]nvasion CAP("liberation"); - -%{ - /****************************** - * Syllable Rewriting * - ****************************** - isn't ___ is un___ - not the ___ the un___ - not my ___ my un___ - anti___ un___ (etc...) - ___cally ___wise - ___ally ___wise - ___lly ___wise - ___ly ___wise - ___aic ___wise - ___lic ___wise - ___nnic ___wise - tric ___wise - ___ic ___wise - ous ___ful - ous ___eful - ___less un___ful - - */ -%} - -[Ii]sn"'"t{W}my{W} CAP("is my un"); -[Ii]s{W}not{W}my{W} CAP("is my un"); -[Ii]sn"'"t{W}[Tt]he{W} CAP("is the un"); -[Ii]s{W}not{W}[Tt]he{W} CAP("is the un"); -[Ii]sn"'"t{W}[Ii]n{W}[Tt]he{W} CAP("is in the un"); -[Ii]s{W}not{W}[Ii]n{W}[Tt]he{W} CAP("is in the un"); -[Ii]t"'"?s{W}not{W}[Tt]he{W} CAP("it's the un"); -[Ii]sn"'"t{W} CAP("is un"); -[Ii]s{W}not{W} CAP("is un"); -[Nn]ot{W}[Tt]he{W} CAP("the un"); -[Nn]ot{W}[Mm]y{W} CAP("my un"); -[Nn]ot{W}[Aa]{W} CAP("an un"); -[Nn]ot{W}have{W} CAP("has un"); -[Nn]ot{W}be{W} CAP("be un"); -[Nn]ot{W}[Oo]nly/{W} CAP("unonly"); /* avoid "unonwise" */ - -[Aa]{W}[Nn]ot{W} | -[Aa]{W}[Nn]on"-"? printf("%cn%cun",Y0,Y1); /* "a non_" -> "an un_" */ - -%{ -/* {W}[Nn]ot{W} | */ -%} -{W}[Ii]l"-"?/[a-z][a-z] WCAP("un"); -{W}[Aa]nti"-"? | -{W}[Nn]on"-"? WCAP("un"); - -robably|ventually|[Oo]bvious|[Bb]asic|{W}[Oo]nly|otally | -[Aa]rctic|holic|{EW}ally|{EW}[Aa]pply|{W}[Tt]opic DUMP(); - -{W}([Tt]raf|[Pp]aci|[Ss]peci)fi/c{W} DUMP(); -{W}(ma|tra)gi/c{W} DUMP(); -{W}(pub|cyc|re|fro|gar)li/c{W} DUMP(); -{W}(eth|cli|to)ni/c{W} DUMP(); -{W}(E|cle|met|cit)ri/c{W} DUMP(); -{W}(ch|ep|tr?op|t|mus|stat|att)i/c{W} DUMP(); -{W}only/{W} DUMP(); -{W}[Aa]tlantic DUMP(); - -[ \t\n][drstwDRSTW]ally printf("%c%cally", Y0, Y1); - -[a-z]ically/{W} printf("%cwise", Y0); -[a-z]ally/{W} printf("%cwise", Y0); -[a-z][a-z]lly/{W} printf("%c%cwise", Y0,Y1); -[a-z][a-z][a-z]ly/{W} printf("%c%c%cwise", Y0,Y1,Y2); -[a-z]ical/{W} printf("%cwise", Y0); - -[a-km-qs-z]aic/{EW} printf("%cwise", Y0); /* not laic, raic */ -[a-z]lic/{EW} printf("%clwise", Y0); -[a-z]nnic/{EW} printf("%cnwise", Y0); -[a-z][aeiou]tric/{EW} printf("%c%ctwise", Y0, Y1); -[a-z]tric/{EW} printf("%cwise", Y0); -[a-z]ic/{EW} printf("%cwise", Y0); -[a-z]lly/{EW} printf("%cwise", Y0); -[a-z]ly/{EW} printf("%cwise", Y0); - -[aeiouy][^aeiouy]ous/{EW} printf("%c%cful",Y0,Y1); -[^aeiouy]ous/{EW} printf("%ceful",Y0); -[^e]ous/{EW} printf("%cful",Y0); - -[A-Za-z]+less/{EW} { yytext[yyleng-4] = '\0'; - if (((yytext[1] < 'A') || (yytext[1] > 'Z')) && - (yytext[0] >= 'A') && (yytext[0] <= 'Z')) - yytext[0] = yytext[0] - ('a' - 'A'); - printf("%cn%sful",C('u'), yytext); - } - -". " { printf("%s",yytext); - fcounter &= 15; - if (14 == fcounter++) printf("(fnord) "); - } - -[.,!?]\"([^\n\".!]+[.!])?\n/[\n\t ] printf("%c Hail Big Brother!\"%s",Y0,yytext+1); -\"([.,!?][^\n\".!]+[.!])?\n/[\n\t ] printf("%c Hail Big Brother!\"%s",Y1,yytext+2); - -. printf(yytext); -\n printf("\n"); - -%{ -/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * - * Brief description of Orwell's NewSpeak: - * --------------------------------------- - * Each word was made to serve as noun, verb, adjective and adverb. In - * particular, nouns and verbs were made exactly the same -- hence "think" - * replaced "thought" as a noun (viz. "crimethink" = thought crime, "thinkpol" - * = thought police). Adjectives were formed by adding "-ful" to a noun/verb; - * adverbs were formed by adding "-wise." Hence "speedful" = fast, - * "speedwise" = quickly, "unspeedwise" = slowly. - * - * The decision on which word should be negated was made fairly randomly; - * "dark" could be "unlight," or "light" could be "undark". But in all cases - * the most important objective (aside from ideological restriction) was - * euphony; the words had to be easily pronounceable. - * - * Most verb inflections were made regular; "he thinked," "he goed," "he - * eated"; only the auxiliaries and modals (to be, to have, may, shall, will, - * etc.) were allowed to inflect irregularly. Plurals were also regularized: - * "mans," "oxes," "childs." [This isn't implemented here.] - * - * There were three sets of words. The A vocabulary was for everyday use: - * car, man, red, good, etc. It was restricted to fairly simple words. - * - * The B vocabulary consisted of political/ideological words with very - * complicated connotations. All of the B words were compound words -- - * bellyfeel (blind emotional acceptance of the ideology), oldthink (the way - * of thought before the Revolution), crimethink, Ingsoc, goodsex (intercourse - * solely for the purpose of making babies and with no physical enjoyment on - * the part of the female), sexcrime (any kind of sex but goodsex, including - * sex for its own sake), goodthink (thinking in accordance with Ingsoc), and - * so on. These words were also subject to the modifications mentioned - * above--hence "goodthinker," "goodthinkful," "goodthinkwise." - * - * The C vocabulary consisted of scientific and technical words (though there - * was no longer any word for "science," any connotation it might have being - * subsumed into "Ingsoc"). - * - * Implementing a translator for all of this would be really complicated -- - * I'd need rather extensive lists of the "irregular" words (so they could be - * regularized), as well as lists of politically meaningful words (so they - * could be excised or translated into either "goodthink" or "crimethink," as - * appropriate). Any kind of sexual topic should become "sexcrime" (it being - * unlikely that any talk of sex these days would fit into "goodsex"). - * - * Basically, the reason it's hard is that NewSpeak was intended to *decrease* - * the vocabulary, and subsume complicated ideas into politically correct - * words so that you wouldn't have to understand the ideas anymore; you'd just - * have to emit the right words. So to properly "translate" anything into - * NewSpeak, you have to cut the vocabulary way down. - * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * - */ -%} - -%% -main() -{ - yylex(); - printf("\nHail Big Brother!\n"); -} - - -capstring(firstchar,string,i) - char firstchar, *string; - int i; -{ - if (firstchar != 0) putchar(firstchar); - putchar( (yytext[i] <= 'Z') ? (string[0] - ' ') : string[0]); - printf("%s",string+1); -} - -compstring(firstchar,string1,string2,i) - char firstchar, *string1, *string2; - int i; -{ - capstring(firstchar,string1,i); - capstring(0,string2,i); -} - -_caseify(c,i) - char c; - int i; -{ - if (yytext[i] <= 'Z') return (c - ' '); - else return (c); -} - -caseify(c) - char c; -{ _caseify(c,0); } - -caseify1(c) - char c; -{ _caseify(c,1); } diff --git a/nyc.l b/nyc.l deleted file mode 100644 index 8505c16..0000000 --- a/nyc.l +++ /dev/null @@ -1,97 +0,0 @@ -%{ -/* - * Lex filter to transform plain English into Brooklyn English. - * No racial or societal slurs are intended. For amusement only. - * - * Copyright 1986 by Daniel Klein. - * - * Reproduction permitted so long as this notice is retained. - */ -%} -BW [ \t] -SP [ \t] -EW [ \t.,;!\?$] -%% -".so ".*$ printf("%s", yytext); -[ao]ther printf("%cdder", yytext[0]=='a'?'a':'u'); -[Nn]othing printf("%cuttin'", yytext[0]); -[Tt]hin printf("%cin", yytext[0]); -[Tt]hir printf("%coi", yytext[0]); -[Tt]h[ei] printf("%c%c", caseify('d'), yytext[yyleng-1]); -[Tt]hat printf("%cat", caseify('d')); -I'm{SP}going{SP}to printf("I'manna"); -going{SP}to printf("gonna"); -want{SP}to printf("wanna"); -t{SP}you printf("tcha"); -[Dd]id{SP}you{SP}[eaiou] printf("%c'j%c", yytext[0], yytext[yyleng-1]); -[Dd]id{SP}you printf("%c'ja", yytext[0]); -[Yy]ou printf("%cuh", yytext[0]); -[Hh]ow{SP}are{SP}you printf("%cowahrya", yytext[0]); -[Ww]ith printf("%cit'", yytext[0]); -[Dd]on't printf("%coan", yytext[0]); -ldn't | -dn't printf("n't"); -isn't printf("ain't"); -er{EW} { printf("uh"); plastc(); } -ing{EW} { printf("in'"); plastc(); } -[Ww]ord | -[Hh]eard | -[BbGgLlPpSs]urg | -[CcHh][eu]r[ntv] printf("%coi%c", yytext[0], yytext[yyleng-1]); -[^Mm]mer[^aeiouhrs] printf("%cmoi%c", yytext[0], yytext[yyleng-1]); -[Oo]re{EW} { printf("%cwh", caseify('a')); plastc(); } -[Oo]r printf("%cwh", caseify('a')); -[Oo]f printf("%chv", caseify('u')); -tion printf("shun"); -alk | -our[st] | -or[st] printf("awh%c", yytext[yyleng-1]); -ause printf("awze"); -[Oo]ff printf("%cwhf", caseify('a')); -[Ss]tupid printf("%ctoopid", yytext[0]); -{BW}under printf(" unner"); -{BW}to{EW} { printf(" tuh"); plastc(); } -[Aa]ctual printf("%cckshul", yytext[0]); -negro printf("spade"); -[Pp]uerto{SP}[Rr]ican printf("%cpic", caseify('s')); -[Ii]talian printf("%creaser", caseify('g')); -[Jj]ewish printf("%cew boy", yytext[0]); -[Jj]ew printf("%cebe", caseify('h')); -[a-z]":" { *(yytext+1) = ','; - printf("%s like, uhh:",yytext); - } -[a-z]"?" { *(yytext+1) = ','; - printf("%s or what?",yytext); - } -! printf("! Okay?"); -[a-z]"." { printf("%s", yytext);expletive();} -%% -plastc() -{ - unput(yytext[yyleng-1]); -} - -caseify(c) -char c; -{ - if (yytext[0] <= 'Z') - return (c - ' '); - else - return (c); -} - -short count = 0; -short which = 0; - -expletive() -{ - if (count++ % 4 == 0) { - switch (which++ % 5) { - case 0: printf(" Okay?"); break; - case 1: printf(" Right?"); break; - case 2: printf(" Yuh got me so fahr?"); break; - case 3: printf(" Ya' dig?"); break; - case 4: printf(" Yuh with me?"); break; - } - } -} diff --git a/valspeak.l b/valspeak.l deleted file mode 100644 index d177d78..0000000 --- a/valspeak.l +++ /dev/null @@ -1,134 +0,0 @@ - -T [" .!?,"]* - -%% - -" bad" printf(" mean"); -" big" printf(" bitchin'est"); -" body" printf(" bod"); -" bore" printf(" drag"); -" car " printf(" rod "); -" dirty" printf(" grodie"); -" filthy" printf(" grodie to thuh max"); -" food" printf(" munchies"); -" girl" printf(" chick"); -" good" printf(" bitchin'"); -" great" printf(" awesum"); -" gross" printf(" grodie"); -" guy" printf(" dude"); -" her " printf(" that chick "); -" her." printf(" that chick."); -" him " printf(" that dude "); -" him." printf(" that dude."); -" can be " | -" can't be " | -" should have been " | -" shouldn't have been " | -" should be " | -" shouldn't be " | -" was " | -" wasn't " | -" will be " | -" won't be " | -" is " { - ECHO; - switch(rand() % 6) - { - case 0: - printf("like, ya know, "); break; - case 1: - printf(""); break; - case 2: - printf("like wow! "); break; - case 3: - printf("ya know, like, "); break; - case 4: - printf(""); break; - case 5: - printf(""); break; - } - } -" house" printf(" pad"); -" interesting" printf(" cool"); -" large" printf(" awesum"); -" leave" printf(" blow"); -" man " printf(" nerd "); -" maybe " { - switch(rand() % 6) - { - case 0: - printf(" if you're a Pisces "); break; - case 1: - printf(" if the moon is full "); break; - case 2: - printf(" if the vibes are right "); break; - case 3: - printf(" when you get the feeling "); break; - case 4: - printf(" maybe "); break; - case 5: - printf(" maybe "); break; - } - } -" meeting" printf(" party"); -" movie" printf(" flick"); -" music " printf(" tunes "); -" neat" printf(" keen"); -" nice" printf(" class"); -" no way" printf(" just no way"); -" people" printf(" guys"); -" really" printf(" totally"); -" strange" printf(" freaky"); -" the " printf(" thuh "); -" very" printf(" super"); -" want" printf(" want"); -" weird" printf(" far out"); -" yes" printf(" fer shure"); -"But " printf("Man, "); -"He " printf("That dude "); -"I like" printf("I can dig"); -"No," printf("Like, no way,"); -Sir printf("Man"); -"She " printf("That fox "); -This printf("Like, ya know, this"); -There printf("Like, there"); -"We " printf("Us guys "); -"Yes," printf("Like,"); -", " { - switch(rand() % 6) - { - case 0: - printf(", like, "); break; - case 1: - printf(", fer shure, "); break; - case 2: - printf(", like, wow, "); break; - case 3: - printf(", oh, baby, "); break; - case 4: - printf(", man, "); break; - case 5: - printf(", mostly, "); break; - } - } -! { - switch(rand() % 3) - { - case 0: - printf("! Gag me with a SPOOOOON!"); break; - case 1: - printf("! Gag me with a pitchfork!"); break; - case 2: - printf("! Oh, wow!"); - } - } - -ing printf("in'"); -. ECHO; -%% - -main() -{ - srand(getpid()); - yylex(); -} -- 2.30.2