Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

last one, i swear

  • Loading branch information...
commit 207ebc68de69a8163677cc7398daeb497b0bc95a 1 parent 662d2b2
@jckarter jckarter authored
View
62 Dictionaries/Chorus.pl
@@ -0,0 +1,62 @@
+[
+q{
+ And we were singin'
+ Bye bye miss American pie
+ Drove my Chevy to the levee but the levee was dry
+ Them good ol' boys were drinking whisky and rye
+ Singin' this'll be the day that I die
+ This'll be the day that I die
+},
+q{
+ You can get anything you want at Alice's Restaurant
+},
+q{
+ 'Cause I'm <Boss_monster>, yes I'm the real <$0>
+ All you other <$0>s are just imitating
+ So won't the real <$0> please stand up
+ Please stand up
+ Please stand up
+},
+q{
+ We didn't start the fire
+ It was always burnin'
+ Since the world's been turnin'
+
+ We didn't start the fire
+ It was always burnin'
+ Since the world's been turnin'
+},
+q{
+ Sweet home <*Location>
+ Where the skies are so blue
+ And the <Monster>'s true
+ Sweet home <*$0>
+ Lord I'm comin' home to you
+},
+q{
+ The answer my friend
+ Is <Verb>ing in the wind
+ The answer is <$0>ing in the wind
+},
+q{
+ <^It> loves you, yeah yeah yeah
+ <^$0> loves you, yeah yeah yeah
+ With a love like that, you know you should be glad
+},
+q{
+ And I say to myself
+ What a wonderful world
+},
+q{
+ [?Ow,Yow,Hoo,Ee-hee,Alright]! Take it to the bridge!
+},
+q{
+ <^Location> Park is melting in the dark
+ All the sweet, green icing flowing down
+ Someone left the cake out in the rain
+
+ I don't think I can take it
+ 'Cause it took so long to bake it
+ And I'll never have that recipe again
+},
+];
View
11 Dictionaries/Fable.pl
@@ -215,10 +215,13 @@
And they're all made out of <$Ticky>
And they all look just the same.
},
-q{
+q{[Chorus=<Chorus>]
+<Fable>
+<$Chorus>
+<Fable>
+<$Chorus>
+<Fable>
+<$Chorus>
<Fable>
-
- And I say to myself
- What a wonderful world
},
];
View
2  Dictionaries/Failure.pl
@@ -5,7 +5,7 @@
'<_MOVE_><$Opponent> throws you in the back of <Its> <Vehicle> and takes you to <$Player.location> against your will!',
'[$Player.sep_sidekick=<$Player.sidekick>][$Player.sidekick=]<_WOUND_><_MOVE_><$Opponent> clocks you over the head with your <$Loot> and takes you to <$Player.location> against your will![Player.sep_sidekick? You get separated from <$Player.sep_sidekick>!:]',
'[$Player.sep_sidekick=<$Player.sidekick>][$Player.sidekick=]<&Failure>[Player.sep_sidekick?
-Meanwhile, the City of Los Angeles buys out your <$Player.sep_sidekick> franchise, which will now be known as the L.A. Super <$Player.sep_sidekick>s.]',
+Meanwhile, the City of Los Angeles buys out your <$Player.sep_sidekick> franchise, which will now be known as the L.A. Super <$Player.sep_sidekick>s.:]',
'<_WOUND_><$Opponent> smacks you right in the <Body_part>!',
'<$Opponent> "accidentally" strokes your <Body_part> with <Its> <Body_part>!',
'<_WOUND_><$Opponent> insults your mother whilst kicking dirt in your eye.',
View
2  Dictionaries/License_plate.pl
@@ -20,4 +20,6 @@
'REVOEVOM',
'<1-9><0-9><0-9>-<Alphabet><Alphabet><Alphabet>',
'<Alphabet><Alphabet><Alphabet>-<1-9><0-9><0-9>',
+ 'MR AWESM',
+ 'HESTHE1',
];
View
17 Dictionaries/Protip.pl
@@ -39,7 +39,7 @@
'Let the wookie win.',
'Let the <Monster> win.',
'Don\'t run with a <Weapon>. You might put a <Body_part> out.',
- '<Animal> <Body_part> meat is considered a delicacy in some parts of <Location>.',
+ '<&Animal> <Body_part> meat is considered a delicacy in some parts of <Location>.',
'<&Policy_violation>ing is grounds for severe punishment, but we usually just make you <Policy_compliance>.',
'Family, friends, religion . . . These are the demons you must slay if you want to succeed at game.pl.',
'Family, <Monster>s, religion . . . These are the demons you must slay if you want to succeed at game.pl.',
@@ -56,6 +56,7 @@
'It is better to <Policy_compliance> than to <Policy_violation>.',
'A stitch in time saves nine.',
'The <Language> alphabet only contains 12 letters (a, e, i, o, u, h, k, l, m, n, u, and w)',
+ 'The <Language> grammar only contains 12 kinds of tokens, but <1-11> of them are significant whitespace.',
'Vision is the art of seeing things invisible to others.',
'If you would like to see further than others, try standing on the shoulders of giants.',
'Some character types are uniquely suited to certain tasks. For instance, <Monster>s have nimble <Body_part>s and are good at SQL queries, whereas <Monster>s excel at UI-intensive tasks.',
@@ -64,16 +65,16 @@
'The deadlier creatures will choose you over a piglet because they can always go back and get the piglet.',
'If you are in <$Player.location>, don\'t drink the water.',
'If you experience <Status_affliction>, <Status_affliction>, <Status_affliction> or other symptoms of <Status_affliction>, seek immediate medical attention.',
- '<Food> should be cooked to an internal temperatue of <32-1000> degrees fahrenheit.',
+ '<&Food> should be cooked to an internal temperatue of <32-1000> degrees fahrenheit.',
'When you <Verb> a <Monster>, always use a <Loot> to reduce the chance of contracting <Status_affliction>.',
'Unless your name is <Boss_monster>, you\'d better <Policy_compliance> before you <Policy_violation>.',
"Since <Planet> doesn't have a moon, <God> exists.",
'If your tests are failing, you may feel like <Policy_violation>ing, but don\'t give in to temptation! In the long run, it\'s much better to <Policy_compliance>.',
'If your tests are failing, try <Policy_compliance>ing to increase your karma score.',
- '<Monster>s have no kneecaps.',
- '<Animal>s are the only animals that can\'t jump.',
+ '<&Monster>s have no kneecaps.',
+ '<&Animal>s are the only animals that can\'t jump.',
'Googling for "<Verb>ing" is not worksafe.',
- '"<Verb>ing" is slang for "<Verb>ing" in <Location>.',
+ '"<&Verb>ing" is slang for "<Verb>ing" in <Location>.',
'Heed the wise advice of <Boss_monster>, who said "<Protip>"',
'Don\'t cry over spilled <Soft_drink>.',
'Time heals all wounds, but if you\'re in a hurry, try using <Liquor>.',
@@ -91,5 +92,9 @@
'Never go with a <Monster> to a second location.',
'Failure to <Policy_compliance> may cause dry socket.',
'A <Animal> in the <Body_part> is worth two in <Location>.',
- '<Soft_drink> is not a real doctor.',
+ '<&Soft_drink> is not a real doctor.',
+ '<&Material> sharpeneth <$0>, so a <Monster> sharpeneth the countenance of <Its> friend.',
+ 'It\'s not <Status_affliction> if the <Body_part>s don\'t touch.',
+ 'It is insensitive to refer to a <Alien_race> as a "<~Adjective><~Body_part>".',
+ 'Don\'t let the name throw you. The "<Verb>ing floor" isn\'t really a floor: it\'s more of a steel grating that allows [?<Soft_drink>,<Liquor>] to sluice through it for gathering and export.',
];
View
1  Dictionaries/Scroll_label.pl
@@ -13,4 +13,5 @@
'MOAR',
'IMMA CHARGIN MAH LAZER',
'NOT TO BE TAKEN AWAY',
+ 'NOT TO BE TAKEN INTERNALLY',
];
View
35 Dictionaries/Sidekick_assists.pl
@@ -36,8 +36,14 @@
"Excellent idea, sir!"',
'"Smithers, <Verb> my <Body_part>," you demand.
"With pleasure, sir!"',
+ '"Smithers," you declare, "I feel like <Policy_violation>ing."
+"I\'ll prepare the <Loot>, sir."',
'You ask, "Smithers, who was that <Animal>?"
"Sir, that was <$Opponent>, one of your <Loot>s from <Initech_affiliate>."',
+ '"Smithers," you muse, "I think I\'ll <Policy_compliance>. . . WHEN <!Animal>s FLY! Haha!"
+Suddenly, you see a <$1> flying through the air.
+Smithers asks, "Sir, will you be <$0>ing now?"
+"No, I\'d still prefer not."',
]));
},
'John Freeman' => sub {
@@ -66,19 +72,24 @@
},
'Fozzie Bear' => sub {
my $opponent = singular(one_of(['<*$Opponent>']));
- $opponent =~ s/^.*\s(\w+)$/$1/;
- if ($opponent =~ /r$/) {
- return qq{Fozzie quips, "$opponent? I don't even know 'er! Wokka wokka wokka!"};
- } elsif ($opponent =~ /m$/) {
- return qq{Fozzie quips, "$opponent? I don't even know 'em! Wokka wokka wokka!"};
- } elsif ($opponent =~ /[aeiouy]s$/) {
- return qq{Fozzie quips, "$opponent? I don't even know us! Wokka wokka wokka!"};
- } elsif ($opponent =~ /(oo|u)$/) {
- return qq{Fozzie quips, "$opponent? I don't even know you! Wokka wokka wokka!"};
- } elsif ($opponent =~ /(ee|[bcdfghjklmnpqrstvwxz]y|i)$/) {
- return qq{Fozzie quips, "$opponent? I don't even know ye! Wokka wokka wokka!"};
+ if ($opponent =~ /\w+r\b/) {
+ return qq{Fozzie quips, "$&? I don't even know 'er! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+m\b/) {
+ return qq{Fozzie quips, "$&? I don't even know 'em! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+[eio]tt?\b/) {
+ return qq{Fozzie quips, "$&? I don't even know it! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+[aeiou]ss?\b/) {
+ return qq{Fozzie quips, "$&? I don't even know us! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+(oo|u)\b/) {
+ return qq{Fozzie quips, "$&? I don't even know you! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+(ee|[bcdefghjklmnpqrstvwxz]y|i)\b/) {
+ return qq{Fozzie quips, "$&? I don't even know ye! Wokka wokka wokka!"};
+ } elsif ($opponent =~ /\w+[bcdfghjklmnpqrstvwxz]a\b/) {
+ my $accented = $&;
+ $accented =~ s/a$/er/g;
+ return qq{Fozzie quips, "$accented? I don't even know 'er! Wokka wokka wokka!"};
} else {
- return qq{Fozzie quips, "Wokka wokka wokka!"};
+ return qq{Fozzie thinks for a moment, then quips, "Wokka wokka wokka!"};
}
},
Chewbacca => sub {
Please sign in to comment.
Something went wrong with that request. Please try again.