New answers tagged

0

C# (.NET Framework), 190 bytes using System;class P{static void Main(){for(int j=0;j<52;j++)for(int i=0;i<3;i++){Console.ForegroundColor=(ConsoleColor)new[]{9,15,12}[i];Console.Write("".PadRight(26,'F')+(i>1?"\n":""));}}}


0

Processing, 111 bytes size(78,52);noStroke();fill(#0055a4);rect(0,0,26,52);fill(255);rect(26,0,26,52);fill(#ef4135);rect(52,0,26,52);


2

Integral, 416 Bytes ⌡1 2 Fizz 4 Buzz Fizz 7 8 Fizz Buzz 11 Fizz 13 14 FizzBuzz 16 17 Fizz 19 Buzz Fizz 22 23 Fizz Buzz 26 Fizz 28 29 FizzBuzz 31 32 Fizz 34 Buzz Fizz 37 38 Fizz Buzz 41 Fizz 43 44 FizzBuzz 46 47 Fizz 49 Buzz Fizz 52 53 Fizz Buzz 56 Fizz 58 59 FizzBuzz 61 62 Fizz 64 Buzz Fizz 67 68 Fizz Buzz 71 Fizz 73 74 FizzBuzz 76 77 Fizz 79 Buzz Fizz 82 ...


1

Dotty, cracks @user's answer This was kinda hard, but kinda easy and really fun! object Main; def main(using Array[String]) = print("" + 58.toChar + 92.toChar + 123.toChar); You can try this on: https://scastie.scala-lang.org/Sthw2Vr7QG26mbMHQuirkg As of today, it produces the expected output: DISCLAIMER!!!! This answer is HEAVILY based on https:/...


0

Processing, 172 bytes noStroke();background(255);fill(0);for(float i=-60;i<=300;i+=120)arc(50,50,100,100,radians(i),radians(i+60),PIE);fill(255);circle(50,50,30);fill(0);circle(50,50,20); Un-minified code: noStroke(); background(255); fill(0); for(float i=-60;i<=300;i+=120)arc(50,50,100,100,radians(i),radians(i+60),PIE); fill(255); circle(50,50,30); ...


1

Python 2, 73 77 bytes, link edit: Even shorter, thanks to @Dingus + removing parenthesis: for n in range(1,101):print[[n,"Buzz"],["Fizz","FizzBuzz"]][n%3<1][n%5<1] original: Here's my matrix-inspired approach: for n in range(1,101): print([[n,"Buzz"],["Fizz","FizzBuzz"]][n%3<1][n%5<...


0

Stack Cats, Score: 3 )*( All Stack Cats programs are symmetrical, and the reflection of a command undoes the original. As a result, every program with an even length either runs forever or does some work, then immediately undoes that work, and devolves into a cat program. The only way to write something else is to use an odd number of characters and let the ...


3

Integral, 13 bytes ÷Hello, W╗ld! Try it! Sadly, Integral cannot yet compress capital letters, so it could not do much compression. ÷ means start compressed string. Ignoring punctuation and capitalization yields Integral, 9 bytes ÷▓llo═╗ld Try it! See also: Showcase


1

Perl 5, cracks @Gilles 'SO- stop being evil''s answer 10359 bytes Note that the link below includes /, but the code for Perl 5.20.3 uses ? instead to meet the rules. TIO has a newer Perl and doesn't support the ?...? syntax. [$_=[$?..$=]]&[$__=$$_[//]]&[$_=[$__..$=]]&[$___=$$_[//]]&[$_=[$___..$=]]&[$____=$$_[//]]&[$_=[$____..$=]]&...


2

Rust, score 3 pwx No extern possible this time, so no calling C functions! (or other crates, but that wouldn't be allowed anyways) Pretty challenging to output to stdout without being able to type print or write! Rust version: rustc 1.45.1 (c367798cf 2020-07-26)


2

Rust, cracks madlaina's (edited) answer extern "C" { fn system(x: &str) -> &str; } fn main() { unsafe { system("echo -en '\x70\x77'"); } } Relies on undefined behavior (C string != &str) but it seems to work. Try it online!


2

Fortran (GFortran), cracks Dingus's answer INTEGER :: Izero = AND(BIT_SIZE(Izero), NOT(BIT_SIZE(Izero))) CHARACTER(BIT_SIZE(Izero)) :: out CHARACTER(BIT_SIZE(Izero)) :: fmt I = IBSET(Izero, Izero) I_ = SHIFTL(I, I) I__ = SHIFTL(I_, I) I___ = SHIFTL(I__, I) I____ = SHIFTL(I___, I) I_____ = SHIFTL(I____, I) ...


5

Mornington Crescent, 15909 bytes, cracks Discrete lizard's second answer The battle for London is on, and I have been proven as the victor Take Northern Line to King's Cross St. Pancras Take Victoria Line to Seven Sisters Take Victoria Line to Victoria Take Circle Line to Victoria Take Circle Line to Cannon Street Take Circle Line to Victoria Take Victoria ...


2

Haskell, cracks Ad Hoc Garf Hunter's answer main|[uuuuuuuuu,iiiiiiiiiiiii,iiiiiiiiiiii,iiiiiiiiiii,iiiiiiiiii,iiiiiiiii,iiiiiiii,iiiiiii,iiiiii,iiiii,iiii,iii,ii,i,nnnnnnn,nnnnnn,nnnnn,uuuuuuuu,nnnn,uuuuuuu,aaaaaaaaaaaaai,aaaaaaaaaaaai,aaaaaaaaaaai,aaaaaaaaaai,aaaaaaaaai,aaaaaaaai,aaaaaaai,aaaaaai,aaaaai,aaaai,aaai,aai,ai,aaaaaaaaaaaaa,aaaaaaaaaaaa,...


1

Ruby, cracks Dingus's fourth answer RUBY_VERSION =~ /\D/ DOT = $& RUBY_VERSION =~ // EMPTY_STRING = $& $_ = $LOADED_FEATURES * EMPTY_STRING $_ =~ /C/i; LC_C = $& $_ =~ /H/i; LC_H = $& $_ =~ /R/i; LC_R = $& H_DOT_CHR = LC_H + DOT + LC_C + LC_H + LC_R emit = EMPTY_STRING h = 112; emit += eval H_DOT_CHR h = 117; emit += eval H_DOT_CHR h = ...


2

SimpleTemplate, 175 bytes, cracks @IsmaelMiguel's answer {@set j "b"}{@set k "{@in\x63 j}"}{@eval k}{@print j}{@set j "g"}{@set k "{@in\x63 j}"}{@eval k}{@print j}{@set j "n"}{@set k "{@in\x63 j}"}{@eval k}{@print j}{@print VERSION} Try it online! I had a hunch that 0.84 would be a hardcoded ...


2

Malbolge, cracks Pizgenal Filegav's answer String to print: To Solution: DCBA@?"7[54XE7UB.-2bNMLKK8k)GXD}Ce/yba= Try it online! I have no idea how this works! I found the solution with this generator, then decided against posting it, since that didn't seem to fit the spirit of the challenge. But I decided I'd post it anyway when I saw Dingus's Dupdog ...


3

Dupdog, 1813 bytes, cracks @HighlyRadioactive's answer This should be really really trivial . . . The answer is suspiciously short Safe to say this is not the intended answer then: a?a???????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????????...


1

Dirty, 2 bytes, cracks @HighlyRadioactive's answer 0Ḃ Try it online! Seems to work with any digit(s) preceding Ḃ, which is described in the docs as the 'bytes to UTF8' operator.


2

Ruby, Score: 16, Cracked cdopr.`'"?%([{:< OK, fourth and final take! The score has actually dropped now that I've realised (thanks to chief nemesis @Gilles'SO-stopbeingevil') that banning digits is redundant. But there will be no more String or Array (r), no more Float (o), and no more interpolation into regexps ({), thank you very much. I'll ...


4

Ruby, cracks Dingus's third answer ZERO = $$ - $$ S_ZERO = String ZERO ONE = -~ZERO S_ONE = String ONE S_TWO = String ONE + ONE S_THREE = String ONE + ONE + ONE S_FOUR = String ONE + ONE + ONE + ONE S_FIVE = String ONE + ONE + ONE + ONE + ONE S_SIX = String ONE + ONE + ONE + ONE + ONE + ONE S_SEVEN = String ONE + ONE + ONE + ONE + ONE + ONE + ONE S_EIGHT = ...


4

Rust, score 2 32, Cracked pw pw?@ABCDEFGHIJKLMNOPQSTUXYZ!"#$% Pretty challenging to output to stdout without being able to type print or write! Rust version: rustc 1.45.1 (c367798cf 2020-07-26)


0

Pyth, 4 Bytes "pYTH Simple prints the string pYTH to stdout.


2

Ruby, Score: 23, Cracked cdp0123456789.`'"?%([:< Take 3, and hopefully this time I've better captured my intentions! The score has more than doubled over the previous iteration, largely thanks to the digits. Also now banned are c and d. For what it's worth, my code has hardly changed. Previous challenges in the series: Take 1 (score 9), cracked by @...


3

Dirty, Score: 8 - Cracked hd of [] This is way too easy for people who knows this language... (I don't.) Intended Solution: 1 Yeah, you read that right.


3

Ruby, cracks Dingus's answer #!/usr/bin/env ruby class Fixnum def ! chr end end s = !112 + !46 + !96 + !39 + !92 + !34 + !63 + !37 + !40 + !91 + !58 + !60 eval !112 + !114 + !105 + !110 + !116 + !34 + s + !34 Can't call methods without .? Yes you can, if they're operators. Try it online!


3

Ruby, Score: 11, Cracked p.`'"?%([:< Take 2, after @DomHastings and @Gilles'SO-stopbeingevil' found unintended weaknesses in the original. I've fortified this version by adding p and ` to the list of forbidden characters. As before, my code outputs to STDOUT with no trailing newline and works for Ruby 1.8.7 onwards.


0

C (gcc), 77 bytes *s;f(){for(s=L"pp!'JO~S<kx`[zQ]g kf YVDp ";*s;)printf("%d",*s++-' ');} Assumes that wchar_t and int have the same size. This way we can make the string wide and we can omit the type when declaring s. A naive approach: group the digits in blocks of 1–3, each of which is an integer between 0 and 127 with no ...


0

PicoLisp, cracks @Wezl's answer 5 bytes Marking this community wiki as @Dingus Googled the error and found a solution and I applied the previous crack's style and removed bits. [[0]] Try it online!


3

Malbolge, score: 2, Cracked To In Malbolge, the "print X" part of the challenge should be hard enough by itself. Original solution:


1

Ruby, cracks @Dingus' answer, 77 bytes I imagine this is almost certainly not the crack in mind, but this was the other solution I found before posting the crack for @Histocrat's second cop. print`echo -n \x27\x2e\x27\\\x27\x27\x22\x3f\x25\x28\x29\x5b\x5d\x3a\x3c\x27` Try it online!


8

Mornington Crescent, Score: 4, Cracked X = myHp You may have survived the 7UBES, but the real challenge begins now. Face me in battle! First, allow me to rid us of some distractions. Four lines are closed. Over half of the special stations are unavailable. In spite of this ruin, victory remains possible. Even for the likes of you, but it won't come easily... ...


1

Dotty 0.20.0-RC1, cracks user's answer? I don't know if this right or not, but I should be able to crack it like this: print(""+46.toChar+92.toChar+ 123.toChar) This should work considering that Dotty is the new version of Scala, but if it's wrong then please tell me.


1

Ruby, Score: 9, Cracked .'"?%([:< My code outputs with no trailing newline and works for Ruby 1.8.7 onwards. By design, string creation is difficult. Edit: I've posted a new version hardened against the weaknesses found by @DomHastings and @Gilles'SO-stopbeingevil'. Because my code is almost unchanged I'll hold off on revealing it.


1

Perl 5.20 (packable with pp from PAR::Packer), Score: 87, Cracked The ASCII control characters ^F^O^V^X and !"%'(*+,-/0123456789:;<>@ABCDEFGHIJKLMNOPQRSTUVWXYZ\^`abcdefghijklmnopqrstuvwxyz{|~ As a Perl string: "\x06\x0f\x16\x18" . '!"%\'(*+,-/0123456789:;<>@ABCDEFGHIJKLMNOPQRSTUVWXYZ\\^`abcdefghijklmnopqrstuvwxyz{|~' As hex: ...


5

Perl 5 cracks @Gilles 'SO- stop being evil''s answer, 5845 (!) bytes Note: the original program contains \x18 which is used as ^X in this answer. ($__=()=())=>($___=()=(_))=>($____=()=(_=>_))=>($_____=()=(_=>_=>_))=>($______=()=(_=>_=>_=>_))=>($_______=()=(_=>_=>_=>_=>_))=>($________=()=(_=>_=>_=>_=&...


0

Scala, 155 bytes printf("S%2$s by%1$s shells%3$sare seashells, I'm sure.\nSo if s%2$s on%1$sn I'm sure%3$sshells."," the seashore,\nThe","he sells seashells"," she sells ") Try it online!


4

BBC BASIC II, cracks Martin Rosenau's challenge The string to print is VP Solution: 10 MODE 7 20 A%=HIMEM 30 ?A%=80 40 A%?1=86 50 GOTO 50 Tested on BeebEm emulator and should work directly on BBC model 'B'. How? MODE 7 is a low-resolution graphics mode, intended to display 'teletext'. Each character on the display is encoded by a single byte in memory: ...


3

QBasic 1.1, cracks DLosc's second answer The string to print is: C,c Solution: X$ = MKL$(543370307) PRINT RTRIM$(X$) This was much trickier than the first version. This time I couldn't use a comma. That was mainly to prevent writing memory with POKE, but it also ruled out every other function with multiple arguments. After all my initial ideas failed, I ...


2

Wolfram Language (Mathematica), score: 71 AbCdEfGhIjKlMnOpQrStUvWxYz ⁢{@[0 & ], \" <-> (.|), +*/, 123456789[]} There are 4 characters preceding the { on the second line: invisible times (U+2062) followed by 3 private use characters (U+F39E, U+F765, U+F76D), in ascending order.


0

QBasic 1.1, score: 3, Cracked C,c POKE should be impossible now. You can run QBasic 1.1 at Archive.org. My solution:


5

QBasic 1.1, cracks DLosc's answer The string to print is: Cc Thanks to QBasic's complete lack of memory safety, my solution creates an arbitrary two character string, gets its memory address, directly changes the memory into the right ASCII codes, and prints the result: X$ = "aa" A = SADD(X$) POKE A, 67 POKE A + 1, 99 PRINT X$


0

QBasic 1.1, score: 2, Cracked Cc I'm specifying QBasic 1.1 in order to exclude QB64 with its extra features. You can run it at Archive.org.


2

APL (Dyalog Unicode), 112 bytes, Cracks Bubbler's answer a←'a'(⎕NCREATE⍠'IfExists' 'Replace')0⋄117 118 85 86 ¯30 ¯108 ¯68⎕NREPLACE a 0⋄⍞←⊃⎕NGET'a' Isn't too impressive I'm afraid, just writes the bytes to a file then reads it back as text. Couldn't use ⎕ARBOUT to write out the file because of the O, but ⎕NREPLACE works fine. Try it online!


0

Part 2: PicoLisp, score: 18 cracked Segmentation fault or (similar): Segmentation fault (core dumped) (output to STDERR) A bit harder than my previous answer. . .


4

Mornington Crescent, 5015 bytes, cracks Discrete lizard's answer I've braved the depths of London, and I came out alive ... Take Northern Line to Charing Cross Take Northern Line to Moorgate Take Circle Line to Moorgate Take Circle Line to Paddington Take Circle Line to Moorgate Take Northern Line to Finchley Central Take Northern Line to Charing Cross Take ...


1

T-SQL DECLARE @String VARCHAR SELECT @String = 0x28 SELECT @String Outputs ( but doesn't contain ( by using implicit type coercion.


2

Dotty 0.20.0-RC1, score: 3 (Cracked) :\{ Edit: Previously, I had the language marked as Dotty 0.20.0-RC1, but it appears there's an alternate crack(s) that also works on the latest versions of Dotty. This also means that you don't have to download Dotty 0.20, you can just test out your code in Scastie right in your browser. Note: This The previous solution ...


3

Dupdog, Score: 10 - Cracked [\x0e][\x0c] [\x10][\x0e][\x18][\x16] 39 May I join the fun? Inside brackets are escape characters. Assuming linux line-breaks. Intended Solution ~!!?* I love short codes.


3

Perl 5, Score: 80, Cracked !"'*+,-0123456789:;<?@ABCDEFGHIJKLMNOPQRSTUVWXYZ\^`abcdefghijklmnopqrstuvwxyz{|~ This means that the following printable ASCII characters are permitted: #$%&()./=>[]_} Inspired by Dom Hastings's challenges (1, 2, 3) and my solutions (1, 2, 3).


Top 50 recent answers are included