Output the Arecibo Message












18












$begingroup$



The Arecibo message is a 1974 interstellar radio message carrying basic information about humanity and Earth sent to globular star cluster M13 in the hope that extraterrestrial intelligence might receive and decipher it... The message consisted of 1,679 binary digits, approximately 210 bytes...



The number 1,679 was chosen because it is a semiprime (the product of two prime numbers), to be arranged rectangularly as 73 rows by 23 columns. The alternative arrangement, 23 rows by 73 columns, produces an unintelligible set of characters (as do all other X/Y formats).



The Arecibo Message



This is the message with color added to highlight its separate parts. The actual binary transmission carried no color information.




Source: Wikipedia





Your task is to output the Arecibo Message in the exact 23x73 arrangement shown in the image. Any of these output formats is acceptable:




  • Text, using one character for ones and another for zeros (using the usual rules for row separation)

  • A 2D array of two distinct values

  • A 23x73 image with two distinct colors

  • Aan uninterrupted stream of 1679 distinct values (i.e. any of the above formats, but flat.)

  • A 1679-bit integer. Indicate bit and byte order in your solution.


For your convenience, here is a copy-pastable version (also an example output in text format):



00000010101010000000000
00101000001010000000100
10001000100010010110010
10101010101010100100100
00000000000000000000000
00000000000011000000000
00000000001101000000000
00000000001101000000000
00000000010101000000000
00000000011111000000000
00000000000000000000000
11000011100011000011000
10000000000000110010000
11010001100011000011010
11111011111011111011111
00000000000000000000000
00010000000000000000010
00000000000000000000000
00001000000000000000001
11111000000000000011111
00000000000000000000000
11000011000011100011000
10000000100000000010000
11010000110001110011010
11111011111011111011111
00000000000000000000000
00010000001100000000010
00000000001100000000000
00001000001100000000001
11111000001100000011111
00000000001100000000000
00100000000100000000100
00010000001100000001000
00001100001100000010000
00000011000100001100000
00000000001100110000000
00000011000100001100000
00001100001100000010000
00010000001000000001000
00100000001100000000100
01000000001100000000100
01000000000100000001000
00100000001000000010000
00010000000000001100000
00001100000000110000000
00100011101011000000000
00100000001000000000000
00100000111110000000000
00100001011101001011011
00000010011100100111111
10111000011100000110111
00000000010100000111011
00100000010100000111111
00100000010100000110000
00100000110110000000000
00000000000000000000000
00111000001000000000000
00111010100010101010101
00111000000000101010100
00000000000000101000000
00000000111110000000000
00000011111111100000000
00001110000000111000000
00011000000000001100000
00110100000000010110000
01100110000000110011000
01000101000001010001000
01000100100010010001000
00000100010100010000000
00000100001000010000000
00000100000000010000000
00000001001010000000000
01111001111101001111000


If your language, for some reason, has a builtin for the Arecibo Message, you may not use that builtin.



Good Luck!










share|improve this question











$endgroup$








  • 3




    $begingroup$
    If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
    $endgroup$
    – Luis felipe De jesus Munoz
    10 hours ago








  • 2




    $begingroup$
    Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
    $endgroup$
    – Beefster
    10 hours ago










  • $begingroup$
    @RobertS. no because there are other valid formats besides text.
    $endgroup$
    – Beefster
    9 hours ago






  • 2




    $begingroup$
    In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
    $endgroup$
    – Adám
    8 hours ago










  • $begingroup$
    Are we allowed go return an array of strings, that do not represent lines?
    $endgroup$
    – Embodiment of Ignorance
    6 hours ago
















18












$begingroup$



The Arecibo message is a 1974 interstellar radio message carrying basic information about humanity and Earth sent to globular star cluster M13 in the hope that extraterrestrial intelligence might receive and decipher it... The message consisted of 1,679 binary digits, approximately 210 bytes...



The number 1,679 was chosen because it is a semiprime (the product of two prime numbers), to be arranged rectangularly as 73 rows by 23 columns. The alternative arrangement, 23 rows by 73 columns, produces an unintelligible set of characters (as do all other X/Y formats).



The Arecibo Message



This is the message with color added to highlight its separate parts. The actual binary transmission carried no color information.




Source: Wikipedia





Your task is to output the Arecibo Message in the exact 23x73 arrangement shown in the image. Any of these output formats is acceptable:




  • Text, using one character for ones and another for zeros (using the usual rules for row separation)

  • A 2D array of two distinct values

  • A 23x73 image with two distinct colors

  • Aan uninterrupted stream of 1679 distinct values (i.e. any of the above formats, but flat.)

  • A 1679-bit integer. Indicate bit and byte order in your solution.


For your convenience, here is a copy-pastable version (also an example output in text format):



00000010101010000000000
00101000001010000000100
10001000100010010110010
10101010101010100100100
00000000000000000000000
00000000000011000000000
00000000001101000000000
00000000001101000000000
00000000010101000000000
00000000011111000000000
00000000000000000000000
11000011100011000011000
10000000000000110010000
11010001100011000011010
11111011111011111011111
00000000000000000000000
00010000000000000000010
00000000000000000000000
00001000000000000000001
11111000000000000011111
00000000000000000000000
11000011000011100011000
10000000100000000010000
11010000110001110011010
11111011111011111011111
00000000000000000000000
00010000001100000000010
00000000001100000000000
00001000001100000000001
11111000001100000011111
00000000001100000000000
00100000000100000000100
00010000001100000001000
00001100001100000010000
00000011000100001100000
00000000001100110000000
00000011000100001100000
00001100001100000010000
00010000001000000001000
00100000001100000000100
01000000001100000000100
01000000000100000001000
00100000001000000010000
00010000000000001100000
00001100000000110000000
00100011101011000000000
00100000001000000000000
00100000111110000000000
00100001011101001011011
00000010011100100111111
10111000011100000110111
00000000010100000111011
00100000010100000111111
00100000010100000110000
00100000110110000000000
00000000000000000000000
00111000001000000000000
00111010100010101010101
00111000000000101010100
00000000000000101000000
00000000111110000000000
00000011111111100000000
00001110000000111000000
00011000000000001100000
00110100000000010110000
01100110000000110011000
01000101000001010001000
01000100100010010001000
00000100010100010000000
00000100001000010000000
00000100000000010000000
00000001001010000000000
01111001111101001111000


If your language, for some reason, has a builtin for the Arecibo Message, you may not use that builtin.



Good Luck!










share|improve this question











$endgroup$








  • 3




    $begingroup$
    If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
    $endgroup$
    – Luis felipe De jesus Munoz
    10 hours ago








  • 2




    $begingroup$
    Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
    $endgroup$
    – Beefster
    10 hours ago










  • $begingroup$
    @RobertS. no because there are other valid formats besides text.
    $endgroup$
    – Beefster
    9 hours ago






  • 2




    $begingroup$
    In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
    $endgroup$
    – Adám
    8 hours ago










  • $begingroup$
    Are we allowed go return an array of strings, that do not represent lines?
    $endgroup$
    – Embodiment of Ignorance
    6 hours ago














18












18








18


1



$begingroup$



The Arecibo message is a 1974 interstellar radio message carrying basic information about humanity and Earth sent to globular star cluster M13 in the hope that extraterrestrial intelligence might receive and decipher it... The message consisted of 1,679 binary digits, approximately 210 bytes...



The number 1,679 was chosen because it is a semiprime (the product of two prime numbers), to be arranged rectangularly as 73 rows by 23 columns. The alternative arrangement, 23 rows by 73 columns, produces an unintelligible set of characters (as do all other X/Y formats).



The Arecibo Message



This is the message with color added to highlight its separate parts. The actual binary transmission carried no color information.




Source: Wikipedia





Your task is to output the Arecibo Message in the exact 23x73 arrangement shown in the image. Any of these output formats is acceptable:




  • Text, using one character for ones and another for zeros (using the usual rules for row separation)

  • A 2D array of two distinct values

  • A 23x73 image with two distinct colors

  • Aan uninterrupted stream of 1679 distinct values (i.e. any of the above formats, but flat.)

  • A 1679-bit integer. Indicate bit and byte order in your solution.


For your convenience, here is a copy-pastable version (also an example output in text format):



00000010101010000000000
00101000001010000000100
10001000100010010110010
10101010101010100100100
00000000000000000000000
00000000000011000000000
00000000001101000000000
00000000001101000000000
00000000010101000000000
00000000011111000000000
00000000000000000000000
11000011100011000011000
10000000000000110010000
11010001100011000011010
11111011111011111011111
00000000000000000000000
00010000000000000000010
00000000000000000000000
00001000000000000000001
11111000000000000011111
00000000000000000000000
11000011000011100011000
10000000100000000010000
11010000110001110011010
11111011111011111011111
00000000000000000000000
00010000001100000000010
00000000001100000000000
00001000001100000000001
11111000001100000011111
00000000001100000000000
00100000000100000000100
00010000001100000001000
00001100001100000010000
00000011000100001100000
00000000001100110000000
00000011000100001100000
00001100001100000010000
00010000001000000001000
00100000001100000000100
01000000001100000000100
01000000000100000001000
00100000001000000010000
00010000000000001100000
00001100000000110000000
00100011101011000000000
00100000001000000000000
00100000111110000000000
00100001011101001011011
00000010011100100111111
10111000011100000110111
00000000010100000111011
00100000010100000111111
00100000010100000110000
00100000110110000000000
00000000000000000000000
00111000001000000000000
00111010100010101010101
00111000000000101010100
00000000000000101000000
00000000111110000000000
00000011111111100000000
00001110000000111000000
00011000000000001100000
00110100000000010110000
01100110000000110011000
01000101000001010001000
01000100100010010001000
00000100010100010000000
00000100001000010000000
00000100000000010000000
00000001001010000000000
01111001111101001111000


If your language, for some reason, has a builtin for the Arecibo Message, you may not use that builtin.



Good Luck!










share|improve this question











$endgroup$





The Arecibo message is a 1974 interstellar radio message carrying basic information about humanity and Earth sent to globular star cluster M13 in the hope that extraterrestrial intelligence might receive and decipher it... The message consisted of 1,679 binary digits, approximately 210 bytes...



The number 1,679 was chosen because it is a semiprime (the product of two prime numbers), to be arranged rectangularly as 73 rows by 23 columns. The alternative arrangement, 23 rows by 73 columns, produces an unintelligible set of characters (as do all other X/Y formats).



The Arecibo Message



This is the message with color added to highlight its separate parts. The actual binary transmission carried no color information.




Source: Wikipedia





Your task is to output the Arecibo Message in the exact 23x73 arrangement shown in the image. Any of these output formats is acceptable:




  • Text, using one character for ones and another for zeros (using the usual rules for row separation)

  • A 2D array of two distinct values

  • A 23x73 image with two distinct colors

  • Aan uninterrupted stream of 1679 distinct values (i.e. any of the above formats, but flat.)

  • A 1679-bit integer. Indicate bit and byte order in your solution.


For your convenience, here is a copy-pastable version (also an example output in text format):



00000010101010000000000
00101000001010000000100
10001000100010010110010
10101010101010100100100
00000000000000000000000
00000000000011000000000
00000000001101000000000
00000000001101000000000
00000000010101000000000
00000000011111000000000
00000000000000000000000
11000011100011000011000
10000000000000110010000
11010001100011000011010
11111011111011111011111
00000000000000000000000
00010000000000000000010
00000000000000000000000
00001000000000000000001
11111000000000000011111
00000000000000000000000
11000011000011100011000
10000000100000000010000
11010000110001110011010
11111011111011111011111
00000000000000000000000
00010000001100000000010
00000000001100000000000
00001000001100000000001
11111000001100000011111
00000000001100000000000
00100000000100000000100
00010000001100000001000
00001100001100000010000
00000011000100001100000
00000000001100110000000
00000011000100001100000
00001100001100000010000
00010000001000000001000
00100000001100000000100
01000000001100000000100
01000000000100000001000
00100000001000000010000
00010000000000001100000
00001100000000110000000
00100011101011000000000
00100000001000000000000
00100000111110000000000
00100001011101001011011
00000010011100100111111
10111000011100000110111
00000000010100000111011
00100000010100000111111
00100000010100000110000
00100000110110000000000
00000000000000000000000
00111000001000000000000
00111010100010101010101
00111000000000101010100
00000000000000101000000
00000000111110000000000
00000011111111100000000
00001110000000111000000
00011000000000001100000
00110100000000010110000
01100110000000110011000
01000101000001010001000
01000100100010010001000
00000100010100010000000
00000100001000010000000
00000100000000010000000
00000001001010000000000
01111001111101001111000


If your language, for some reason, has a builtin for the Arecibo Message, you may not use that builtin.



Good Luck!







code-golf kolmogorov-complexity






share|improve this question















share|improve this question













share|improve this question




share|improve this question








edited 8 hours ago







Beefster

















asked 10 hours ago









BeefsterBeefster

2,5371142




2,5371142








  • 3




    $begingroup$
    If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
    $endgroup$
    – Luis felipe De jesus Munoz
    10 hours ago








  • 2




    $begingroup$
    Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
    $endgroup$
    – Beefster
    10 hours ago










  • $begingroup$
    @RobertS. no because there are other valid formats besides text.
    $endgroup$
    – Beefster
    9 hours ago






  • 2




    $begingroup$
    In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
    $endgroup$
    – Adám
    8 hours ago










  • $begingroup$
    Are we allowed go return an array of strings, that do not represent lines?
    $endgroup$
    – Embodiment of Ignorance
    6 hours ago














  • 3




    $begingroup$
    If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
    $endgroup$
    – Luis felipe De jesus Munoz
    10 hours ago








  • 2




    $begingroup$
    Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
    $endgroup$
    – Beefster
    10 hours ago










  • $begingroup$
    @RobertS. no because there are other valid formats besides text.
    $endgroup$
    – Beefster
    9 hours ago






  • 2




    $begingroup$
    In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
    $endgroup$
    – Adám
    8 hours ago










  • $begingroup$
    Are we allowed go return an array of strings, that do not represent lines?
    $endgroup$
    – Embodiment of Ignorance
    6 hours ago








3




3




$begingroup$
If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
$endgroup$
– Luis felipe De jesus Munoz
10 hours ago






$begingroup$
If a language has a built in for Arecibo message, I can tell, with all certainty, that I've seen everything in this world c:
$endgroup$
– Luis felipe De jesus Munoz
10 hours ago






2




2




$begingroup$
Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
$endgroup$
– Beefster
10 hours ago




$begingroup$
Mathematica (IIRC) has an image builtin for Lena, so it wouldn't surprise me if it also has an Aricebo message as well.
$endgroup$
– Beefster
10 hours ago












$begingroup$
@RobertS. no because there are other valid formats besides text.
$endgroup$
– Beefster
9 hours ago




$begingroup$
@RobertS. no because there are other valid formats besides text.
$endgroup$
– Beefster
9 hours ago




2




2




$begingroup$
In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
$endgroup$
– Adám
8 hours ago




$begingroup$
In the spirit of the original format, a flat result/output should be allowed. The whole point of 1679 bits is exactly that the proper number of rows and columns can be inferred from the signal length.
$endgroup$
– Adám
8 hours ago












$begingroup$
Are we allowed go return an array of strings, that do not represent lines?
$endgroup$
– Embodiment of Ignorance
6 hours ago




$begingroup$
Are we allowed go return an array of strings, that do not represent lines?
$endgroup$
– Embodiment of Ignorance
6 hours ago










11 Answers
11






active

oldest

votes


















5












$begingroup$


Jelly, 213 bytes



“H²ɓ¶Ṡḷ€ẹ]ƒf*ḳḢ&ƁṇOḥ{ḄṫwỊ+oLạʋߢH9¢¹÷ỴɗÇ⁶ƲƙæḊẋ3³=1!VƇƁ'D⁺3Ỵɱ©⁵%fȯez#ƈjƒżṆo.ZF⁶ċṢ⁶ọṛb9Ȯƒd?ƁUĠt4ẇ,ḞġƒµƭfʠƁP§÷øȤŻPɲẋ(¢ß¢(⁽3¶ṙėɗy@ṁYȮL~e⁷ƤĊ§nỊṅµṠ°@7ẠB>Ġ⁻İ}uy¡½:esOpḢt}qS©HÞṬĖṛṇḣ9÷;ESḢ,Ẉ^ṙpƲ©tṃwçnẒṆ¡⁻Jıƒị£-&Ɱ*ẋʂżoȯÑḢɼ’


Try it online!



I played around with Huffman coding, but the improvements in data size were outweighed by the extra code. As such, this is simply a base-250 encoded version of the desired output. Output consists of an integer that when decoded as bijective base 2 will yield the 1D list of 1s and 2s. Thanks @Emigna for pointing out the change in rules.



Try it online - with further decoding to demonstrate output!



If a more conventional binary encoding is preferred, here is one that encodes an integer representation of the inverted binary message. The most significant bit of the integer represents the beginning of the message.






share|improve this answer











$endgroup$





















    4












    $begingroup$


    05AB1E, 215 bytes



    •1cDÕχ´ã.RÓñîι1¼Ć®r₁Àā&ëÕβ₁œÑ|γy^;J}½ƶ³øy2ƒÑÐÆ›]Y4(ûXéÅrλ∞½X?Nô“jÒG‰"Œ»ZΘζÚ¢£,Ť.Q4ǝ&èOO1¶o!øт‰Γ>Já
    ‹”¤ó¹¬q¤ζ₄ômm»₃}Hx±÷+₄SHÇcGƵ~Ω˜Ô/i1Σ$8ÖÀ"ÉE›u.ZÐŒ·>λïU7ÏδÓxƶÂΓ¡†āNÔû×ÒŽ(3}IÃhÄÿ*À}„§—4Ô¬¸ʒ¦ü€”{ÒDÐ[É7ûõöεŠÐî*$•b¦


    Try it online!
    or with Additional formatting



    Base-255 encoded binary string with a prepended 1.

    Hoping there's a better way of doing this but haven't found it yet.






    share|improve this answer











    $endgroup$





















      2












      $begingroup$


      Perl 6, 368 bytes



      .say for :36('FJXOE0PDDNF5Y5EHGB8M9SWMXQOXIKIT9F6ZKWWDEACHCBGXL1N2H60CN0CJ4EMKF7D6MODSKYJVNR4SFTDR6NSM421LQ67B6MWF0G5BQATFOJJJBQ0UFQM64T0MWSQN41C4S5D1QR5KJM2L9UTYMMKUBBQWY45YCMRGO8ZRGTQH7LXMZBUASLCTKX30IH0AYKYEPHO8HFHX8GAY5WM38YOSUX0HABYSH2PPBLRDRZIN5ANAQ3V8PLOZ6EHC0UI95EVJVYD1820T6J14HGX85NWFQET2NWOMSNUT0JW4LHMY90X094TEE9KXJXSNN6YPERFQW').base(2).substr(1).comb(23)


      Try it online!



      The long string is the message as a single base-36 number (with a single prefixed 1 bit to preserve the leading zeroes) which is then converted back to binary and printed 23 bits at a time.






      share|improve this answer









      $endgroup$













      • $begingroup$
        You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
        $endgroup$
        – Jo King
        6 hours ago












      • $begingroup$
        Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
        $endgroup$
        – Sean
        5 hours ago










      • $begingroup$
        There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
        $endgroup$
        – Jo King
        3 hours ago





















      2












      $begingroup$

      Java, 688 678 590 bytes



      I'm pretty sure this can be golfed more. Returns a stream of String objects.



      v->java.util.Arrays.asList(87040,1315844,4474034,5592356,0,1536,6656,6656,10752,15872,0,6407704,4194704,6866458,8255455,0,524290,0,262145,8126495,0,6391576,4210704,6841242,8255455,0,530434,6144,268289,8132639,6144,1050628,530440,399376,100448,6528,100448,399376,528392,1054724,2103300,2099208,1052688,524384,393600,1168896,1052672,1080320,1096283,80191,6043703,10299,1058879,1058864,1076224,0,1839104,1918293,1835348,320,31744,130816,459200,786528,1704112,3342744,2261640,2245768,141440,135296,131200,37888,3996280).stream().map(s->"".format("%23s",Long.toBinaryString(s)).replace(" ","0"))


      -10 bytes by returning the raw stream

      -88 bytes by using base 10 numerics (thanks @ceilingcat!)
      Try it online!



      Explanation:



      v->
      java.util.Arrays.asList(...) // Create a list of the rows of the message in base 16 (hex)
      .stream() // Stream/iterate over the elements of the list
      .map(s->"".format("%23s",Long.toBinaryString(s)) // Convert to binary and pad the result
      .replace(" ","0")) // Replace padding with "0"
      // Implicit return





      share|improve this answer











      $endgroup$













      • $begingroup$
        @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
        $endgroup$
        – Benjamin Urquhart
        4 hours ago



















      1












      $begingroup$

      Bubblegum, 275 bytes



      00000000: e006 d601 0b5d 0018 6988 6507 9cf6 752c  .....]..i.e...u,
      00000010: 9e9a 501a 87a7 98b4 844f 9fcf daaf 8773 ..P......O.....s
      00000020: 3b9d 8239 48c8 16d8 60a9 3876 7f6c b812 ;..9H...`.8v.l..
      00000030: 99f3 e8a6 38ef fe30 68c0 e096 a894 9c81 ....8..0h.......
      00000040: d706 7dff 3ec4 4e5d f185 b3a4 8e5b 5857 ..}.>.N].....[XW
      00000050: 7243 86e8 c37c fbd5 c856 b126 14ee 78ec rC...|...V.&..x.
      00000060: c41d f4db 3b04 c0c1 9ec6 2f83 14e3 8315 ....;...../.....
      00000070: 85ac d55c 1c86 8066 b518 6ec1 3dff 5db6 ......f..n.=.].
      00000080: 435a 6cec e6f9 cbbd 1475 ab7c 710f 0f63 CZl......u.|q..c
      00000090: f97a e5ae 3b56 a8c0 f3e5 5000 5503 698a .z..;V....P.U.i.
      000000a0: eaf3 f8c3 015d 741f 3fa0 8919 5407 d4c8 .....]t.?...T...
      000000b0: 77c3 dd4e 2ca9 a7ea da07 0f53 99ce e73c w..N,......S...<
      000000c0: 71e6 fc67 2e31 44f7 b80f a923 ba44 87de q..g.1D....#.D..
      000000d0: b29c f8ef 1dc2 288e 131a 0d26 68bb 572e ......(....&h.W.
      000000e0: d743 5e63 9d50 83be 986f 74b6 33ff 2060 .C^c.P...ot.3. `
      000000f0: 33d7 e3a2 bb1f 4331 33af e12d 2f10 e459 3.....C13..-/..Y
      00000100: 9091 9aa4 7e0a ab1d 00b4 1cfb 2c73 7d33 ....~.......,s}3
      00000110: 7e3a 00 ~:.


      Try it online!






      share|improve this answer









      $endgroup$





















        1












        $begingroup$


        Perl 5, 460 bytes





        printf"%023b",oct"0x$_"for qw/15400 141404 4444b2 555524 0 600 1a00 1a00 2a00 3e00 0 61c618 400190 68c61a 7df7df 0 80002 0 40001 7c001f 0 618718 404010 68639a 7df7df 0 81802 1800 41801 7c181f 1800 100804 81808 61810 18860 1980 18860 61810 81008 101804 201804 200808 101010 80060 60180 11d600 101000 107c00 10ba5b 1393f 5c3837 283b 10283f 102830 106c00 0 1c1000 1d4555 1c0154 140 7c00 1ff00 701c0 c0060 1a00b0 330198 228288 224488 22880 21080 20080 9400 3cfa78/


        Try it online!






        share|improve this answer









        $endgroup$





















          1












          $begingroup$


          Deadfish~, 1115 bytes



          ooooooiodoiodoiodoiod{o}{i}c{d}ooiodoiodoooooiodoiodoooooooiodoo{i}c{d}iodoooiodoooiodoooiodooiodoioodooiodo{i}c{d}iodoiodoiodoiodoiodoiodoiodoiodooiodooiodoo{i}c{d}{oo}ooo{i}c{d}{o}ooioodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}oooooooooiodoiodoiodooooooooo{i}c{d}oooooooooiooooodooooooooo{i}c{d}{oo}ooo{i}c{d}ioodooooiooodoooioodooooioodooo{i}c{d}iod{o}oooioodooiodoooo{i}c{d}ioodoiodoooioodoooioodooooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiod{o}oooooooiodo{i}c{d}{oo}ooo{i}c{d}ooooiod{o}oooooooiod{i}c{d}ioooood{o}oooioooood{i}c{d}{oo}ooo{i}c{d}ioodooooioodooooiooodoooioodooo{i}c{d}iodoooooooiodoooooooooiodoooo{i}c{d}ioodoiodooooioodoooiooodooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiodooooooioodoooooooooiodo{i}c{d}{o}iood{o}o{i}c{d}ooooiodoooooiood{o}iod{i}c{d}iooooodoooooioodooooooioooood{i}c{d}{o}iood{o}o{i}c{d}ooiodooooooooiodooooooooiodoo{i}c{d}oooiodooooooioodoooooooiodooo{i}c{d}ooooioodooooioodooooooiodoooo{i}c{d}ooooooioodoooiodooooioodooooo{i}c{d}{o}ioodooioodooooooo{i}c{d}ooooooioodoooiodooooioodooooo


          Try it online!



          If someone has the patience to golf this further, I salute you ahead of time. :P






          share|improve this answer









          $endgroup$





















            1












            $begingroup$

            Brainfuck, 2360 2008 bytes



            -[>+<-----]>---......+.-.+.-.+.-.+.-............+.-.+.-.....+.-.+.-.......+.-..+.-...+.-...+.-...+.-..+.-.+..-.<+++++++++[->.+.-<]>..+.-..+.-<++++++[->......<]>.+.<++[->.-...................+..-.+<]>.-..................+.-.+.-.+.-..................+.....-................................+..-....+...-...+..-....+..-...+.-.............+..-..+.-....+..-.+.-...+..-...+..-....+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-<++[->.................+.-...........<]>......+......-.............+.....-.......................+..-....+..-....+...-...+..-...+.-.......+.-.........+.-....+..-.+.-....+..-...+...-..+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-......+..-.........+.-...........+..-...............+.-.....+..-..........+......-.....+..-......+.....-..........+..-.............+.-........+.-........+.-.....+.-......+..-.......+.-.......+..-....+..-......+.-..........+..-...+.-....+..-...............+..-..+..-.............+..-...+.-....+..-.........+..-....+..-......+.-.......+.-......+.-........+.-.....+.-<++[->.......+..-........+.-...+.-.<]>........+.-.......+.-<++++[->.....+.-..<]>..........+..-.........+..-........+..-.........+.-...+...-.+.-.+..-...........+.-.......+.-..............+.-.....+.....-............+.-....+.-.+...-.+.-..+.-.+..-.+..-......+.-..+...-..+.-..+.......-.+...-....+...-.....+..-.+...-.........+.-.+.-.....+...-.+..-..+.-......+.-.+.-.....+......-..+.-......+.-.+.-.....+..-......+.-.....+..-.+..-<+++++++[->.....<]>+...-.....+.-..............+...-.+.-.+.-...+.-.+.-.+.-.+.-.+.-.+.-..+...-.........+.-.+.-.+.-.+.-................+.-.+.-..............+.....-................+.........-............+...-.......+...-.........+..-...........+..-.......+..-.+.-.........+.-.+..-.....+..-..+..-.......+..-..+..-....+.-...+.-.+.-.....+.-.+.-...+.-....+.-...+.-..+.-...+.-..+.-...+.-........+.-...+.-.+.-...+.-............+.-....+.-....+.-............+.-.........+.-..............+.-..+.-.+.-...........+....-..+.....-.+.-..+....-...


            Try it online!



            I will probably golf this further soon.






            share|improve this answer











            $endgroup$





















              1












              $begingroup$


              Wolfram Language (Mathematica), 383 bytes



              StringPartition[Uncompress@"1:eJylVNsRwjAM44s92KBaBTZgAUZhZXqtHUuOWrgjfSRRHFlO4tyer/vjfb1clq0gHirZLRjby986hppcT5p+L3BmgJ3t4Ul4GsNyG++7YbaXLh0ZTPhXa4Sn+X/s9Qfk3Hx2cOaSIuNYaVu5laschvgzSqAjHeZBhilKgKBDEhw0upJRg+HOK4MyNC29sfbc3RV0VPDqeLiRTsG1ulExq1IitpunOa7asnYM9siDZ6eidUCkEzBOUbCkGIig4aTyUGBYWAX6W6aXIWGGI/HlhmsqzSU0QTZjkMVpaX5sBsm1OGKVg1qdjKP0EdyqZBRLhukn8DLBQav6kccgz8OKfgBzjj6Z",23]


              Try it online!






              share|improve this answer









              $endgroup$





















                1












                $begingroup$


                Node.js, 333 bytes



                Returns a binary string of 1,679 characters.





                _=>Buffer(")SI)=.);1K?>>>2333A3,93/I3>3)g33)AEAAI)5JQZJTddda3)*3*33+3,e)*e3)//0/1+)1C/7Cgggg3395)9)A3IY)h*IH),39+)995*)AA-)59Y)*O3Z,)//*)91**)A*-)Y+1)I11+)I1)/)5)Y*0?)+)I)-0Y)1@;_*7<gaE/a)Q7[*9HM+IY16I33)a1)*^.><I+S3.38I)*hY)7)a)Y)A,9*A5Y/A:9=9K:1I-=9)19I)9*329)GH<").map(x=>s+=(x-51&&x-41).toString(2).padStart(x-51?6:12,0),s='')&&s


                Try it online! (with formatted output)





                JavaScript (ES8), 413 bytes



                Returns a binary string of 1,679 characters.





                _=>atob('AsKoAFBQEiIlwpVVUk!!ABwo!DQ!Gg!V!Aw7g!!GHGHCi!yGjHChsK+w7vDr8K!!Q!Q!!g!/DgAHDs!AGGHDhiAgCGhjwprDu8Ovwr4!ABAw4AQAcK!MKDAD8GB8OAD!QCAQQMBAYYEAMQwABwpgAMQwBwoYEBAgEEBgEQDAIwoAgIMKAwoDCgMKABgDDgDAEdcKACAgAEHwAIXTCtgTDpMO+w6HDgcK4AsKDwrIFB8OkCgwINg!!A4IAB1FVTDoArCo!U!/CgAB/w4ADwoDDoAwAYDQBYMOMBmEUFEIkSMKARR!woQgAQB!MKUAHnDtA'.split`!`.join`AA`).replace(/[sS]/g,c=>c.charCodeAt().toString(2).padStart(8,0))


                Try it online! (with formatted output)






                share|improve this answer











                $endgroup$





















                  0












                  $begingroup$


                  C# (Visual C# Interactive Compiler), 366 332 329 bytes





                  int i;foreach(var g in@"RШʪЬࢰӚ૒Ռ(((ب+Ȩ+Ȩ-Ȩ/ب((ౠـࠨƸീق࿦ࠇ((Ĩ*((¨)ྨG((ౘ݀࠰8ഴς࿦ࠇ((ī*+(«)ྫG+(ȩ,ī0ë8Yˆ+ƨYˆë8Ī0ȫ,Ы,Щ0Ȫ8ĨˆèƨɢبȪ(ȷШȿʃOŧய_-cȭgȭXȵШ((Ϊ(ϐսΨż(Ũ7ШgܨĈǨƨˆͨØڈǀѸʰѰҰm¨j¨h¨:Ш߇ʠ")Write(Convert.ToString(g-40,2).PadLeft(12-i++%2,'0'));


                  Can be 3 bytes less if my device supported rendering unprinatable characters.



                  Try it online!






                  share|improve this answer











                  $endgroup$














                    Your Answer





                    StackExchange.ifUsing("editor", function () {
                    return StackExchange.using("mathjaxEditing", function () {
                    StackExchange.MarkdownEditor.creationCallbacks.add(function (editor, postfix) {
                    StackExchange.mathjaxEditing.prepareWmdForMathJax(editor, postfix, [["\$", "\$"]]);
                    });
                    });
                    }, "mathjax-editing");

                    StackExchange.ifUsing("editor", function () {
                    StackExchange.using("externalEditor", function () {
                    StackExchange.using("snippets", function () {
                    StackExchange.snippets.init();
                    });
                    });
                    }, "code-snippets");

                    StackExchange.ready(function() {
                    var channelOptions = {
                    tags: "".split(" "),
                    id: "200"
                    };
                    initTagRenderer("".split(" "), "".split(" "), channelOptions);

                    StackExchange.using("externalEditor", function() {
                    // Have to fire editor after snippets, if snippets enabled
                    if (StackExchange.settings.snippets.snippetsEnabled) {
                    StackExchange.using("snippets", function() {
                    createEditor();
                    });
                    }
                    else {
                    createEditor();
                    }
                    });

                    function createEditor() {
                    StackExchange.prepareEditor({
                    heartbeatType: 'answer',
                    autoActivateHeartbeat: false,
                    convertImagesToLinks: false,
                    noModals: true,
                    showLowRepImageUploadWarning: true,
                    reputationToPostImages: null,
                    bindNavPrevention: true,
                    postfix: "",
                    imageUploader: {
                    brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
                    contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
                    allowUrls: true
                    },
                    onDemand: true,
                    discardSelector: ".discard-answer"
                    ,immediatelyShowMarkdownHelp:true
                    });


                    }
                    });














                    draft saved

                    draft discarded


















                    StackExchange.ready(
                    function () {
                    StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fcodegolf.stackexchange.com%2fquestions%2f182924%2foutput-the-arecibo-message%23new-answer', 'question_page');
                    }
                    );

                    Post as a guest















                    Required, but never shown

























                    11 Answers
                    11






                    active

                    oldest

                    votes








                    11 Answers
                    11






                    active

                    oldest

                    votes









                    active

                    oldest

                    votes






                    active

                    oldest

                    votes









                    5












                    $begingroup$


                    Jelly, 213 bytes



                    “H²ɓ¶Ṡḷ€ẹ]ƒf*ḳḢ&ƁṇOḥ{ḄṫwỊ+oLạʋߢH9¢¹÷ỴɗÇ⁶ƲƙæḊẋ3³=1!VƇƁ'D⁺3Ỵɱ©⁵%fȯez#ƈjƒżṆo.ZF⁶ċṢ⁶ọṛb9Ȯƒd?ƁUĠt4ẇ,ḞġƒµƭfʠƁP§÷øȤŻPɲẋ(¢ß¢(⁽3¶ṙėɗy@ṁYȮL~e⁷ƤĊ§nỊṅµṠ°@7ẠB>Ġ⁻İ}uy¡½:esOpḢt}qS©HÞṬĖṛṇḣ9÷;ESḢ,Ẉ^ṙpƲ©tṃwçnẒṆ¡⁻Jıƒị£-&Ɱ*ẋʂżoȯÑḢɼ’


                    Try it online!



                    I played around with Huffman coding, but the improvements in data size were outweighed by the extra code. As such, this is simply a base-250 encoded version of the desired output. Output consists of an integer that when decoded as bijective base 2 will yield the 1D list of 1s and 2s. Thanks @Emigna for pointing out the change in rules.



                    Try it online - with further decoding to demonstrate output!



                    If a more conventional binary encoding is preferred, here is one that encodes an integer representation of the inverted binary message. The most significant bit of the integer represents the beginning of the message.






                    share|improve this answer











                    $endgroup$


















                      5












                      $begingroup$


                      Jelly, 213 bytes



                      “H²ɓ¶Ṡḷ€ẹ]ƒf*ḳḢ&ƁṇOḥ{ḄṫwỊ+oLạʋߢH9¢¹÷ỴɗÇ⁶ƲƙæḊẋ3³=1!VƇƁ'D⁺3Ỵɱ©⁵%fȯez#ƈjƒżṆo.ZF⁶ċṢ⁶ọṛb9Ȯƒd?ƁUĠt4ẇ,ḞġƒµƭfʠƁP§÷øȤŻPɲẋ(¢ß¢(⁽3¶ṙėɗy@ṁYȮL~e⁷ƤĊ§nỊṅµṠ°@7ẠB>Ġ⁻İ}uy¡½:esOpḢt}qS©HÞṬĖṛṇḣ9÷;ESḢ,Ẉ^ṙpƲ©tṃwçnẒṆ¡⁻Jıƒị£-&Ɱ*ẋʂżoȯÑḢɼ’


                      Try it online!



                      I played around with Huffman coding, but the improvements in data size were outweighed by the extra code. As such, this is simply a base-250 encoded version of the desired output. Output consists of an integer that when decoded as bijective base 2 will yield the 1D list of 1s and 2s. Thanks @Emigna for pointing out the change in rules.



                      Try it online - with further decoding to demonstrate output!



                      If a more conventional binary encoding is preferred, here is one that encodes an integer representation of the inverted binary message. The most significant bit of the integer represents the beginning of the message.






                      share|improve this answer











                      $endgroup$
















                        5












                        5








                        5





                        $begingroup$


                        Jelly, 213 bytes



                        “H²ɓ¶Ṡḷ€ẹ]ƒf*ḳḢ&ƁṇOḥ{ḄṫwỊ+oLạʋߢH9¢¹÷ỴɗÇ⁶ƲƙæḊẋ3³=1!VƇƁ'D⁺3Ỵɱ©⁵%fȯez#ƈjƒżṆo.ZF⁶ċṢ⁶ọṛb9Ȯƒd?ƁUĠt4ẇ,ḞġƒµƭfʠƁP§÷øȤŻPɲẋ(¢ß¢(⁽3¶ṙėɗy@ṁYȮL~e⁷ƤĊ§nỊṅµṠ°@7ẠB>Ġ⁻İ}uy¡½:esOpḢt}qS©HÞṬĖṛṇḣ9÷;ESḢ,Ẉ^ṙpƲ©tṃwçnẒṆ¡⁻Jıƒị£-&Ɱ*ẋʂżoȯÑḢɼ’


                        Try it online!



                        I played around with Huffman coding, but the improvements in data size were outweighed by the extra code. As such, this is simply a base-250 encoded version of the desired output. Output consists of an integer that when decoded as bijective base 2 will yield the 1D list of 1s and 2s. Thanks @Emigna for pointing out the change in rules.



                        Try it online - with further decoding to demonstrate output!



                        If a more conventional binary encoding is preferred, here is one that encodes an integer representation of the inverted binary message. The most significant bit of the integer represents the beginning of the message.






                        share|improve this answer











                        $endgroup$




                        Jelly, 213 bytes



                        “H²ɓ¶Ṡḷ€ẹ]ƒf*ḳḢ&ƁṇOḥ{ḄṫwỊ+oLạʋߢH9¢¹÷ỴɗÇ⁶ƲƙæḊẋ3³=1!VƇƁ'D⁺3Ỵɱ©⁵%fȯez#ƈjƒżṆo.ZF⁶ċṢ⁶ọṛb9Ȯƒd?ƁUĠt4ẇ,ḞġƒµƭfʠƁP§÷øȤŻPɲẋ(¢ß¢(⁽3¶ṙėɗy@ṁYȮL~e⁷ƤĊ§nỊṅµṠ°@7ẠB>Ġ⁻İ}uy¡½:esOpḢt}qS©HÞṬĖṛṇḣ9÷;ESḢ,Ẉ^ṙpƲ©tṃwçnẒṆ¡⁻Jıƒị£-&Ɱ*ẋʂżoȯÑḢɼ’


                        Try it online!



                        I played around with Huffman coding, but the improvements in data size were outweighed by the extra code. As such, this is simply a base-250 encoded version of the desired output. Output consists of an integer that when decoded as bijective base 2 will yield the 1D list of 1s and 2s. Thanks @Emigna for pointing out the change in rules.



                        Try it online - with further decoding to demonstrate output!



                        If a more conventional binary encoding is preferred, here is one that encodes an integer representation of the inverted binary message. The most significant bit of the integer represents the beginning of the message.







                        share|improve this answer














                        share|improve this answer



                        share|improve this answer








                        edited 7 hours ago

























                        answered 8 hours ago









                        Nick KennedyNick Kennedy

                        1,46649




                        1,46649























                            4












                            $begingroup$


                            05AB1E, 215 bytes



                            •1cDÕχ´ã.RÓñîι1¼Ć®r₁Àā&ëÕβ₁œÑ|γy^;J}½ƶ³øy2ƒÑÐÆ›]Y4(ûXéÅrλ∞½X?Nô“jÒG‰"Œ»ZΘζÚ¢£,Ť.Q4ǝ&èOO1¶o!øт‰Γ>Já
                            ‹”¤ó¹¬q¤ζ₄ômm»₃}Hx±÷+₄SHÇcGƵ~Ω˜Ô/i1Σ$8ÖÀ"ÉE›u.ZÐŒ·>λïU7ÏδÓxƶÂΓ¡†āNÔû×ÒŽ(3}IÃhÄÿ*À}„§—4Ô¬¸ʒ¦ü€”{ÒDÐ[É7ûõöεŠÐî*$•b¦


                            Try it online!
                            or with Additional formatting



                            Base-255 encoded binary string with a prepended 1.

                            Hoping there's a better way of doing this but haven't found it yet.






                            share|improve this answer











                            $endgroup$


















                              4












                              $begingroup$


                              05AB1E, 215 bytes



                              •1cDÕχ´ã.RÓñîι1¼Ć®r₁Àā&ëÕβ₁œÑ|γy^;J}½ƶ³øy2ƒÑÐÆ›]Y4(ûXéÅrλ∞½X?Nô“jÒG‰"Œ»ZΘζÚ¢£,Ť.Q4ǝ&èOO1¶o!øт‰Γ>Já
                              ‹”¤ó¹¬q¤ζ₄ômm»₃}Hx±÷+₄SHÇcGƵ~Ω˜Ô/i1Σ$8ÖÀ"ÉE›u.ZÐŒ·>λïU7ÏδÓxƶÂΓ¡†āNÔû×ÒŽ(3}IÃhÄÿ*À}„§—4Ô¬¸ʒ¦ü€”{ÒDÐ[É7ûõöεŠÐî*$•b¦


                              Try it online!
                              or with Additional formatting



                              Base-255 encoded binary string with a prepended 1.

                              Hoping there's a better way of doing this but haven't found it yet.






                              share|improve this answer











                              $endgroup$
















                                4












                                4








                                4





                                $begingroup$


                                05AB1E, 215 bytes



                                •1cDÕχ´ã.RÓñîι1¼Ć®r₁Àā&ëÕβ₁œÑ|γy^;J}½ƶ³øy2ƒÑÐÆ›]Y4(ûXéÅrλ∞½X?Nô“jÒG‰"Œ»ZΘζÚ¢£,Ť.Q4ǝ&èOO1¶o!øт‰Γ>Já
                                ‹”¤ó¹¬q¤ζ₄ômm»₃}Hx±÷+₄SHÇcGƵ~Ω˜Ô/i1Σ$8ÖÀ"ÉE›u.ZÐŒ·>λïU7ÏδÓxƶÂΓ¡†āNÔû×ÒŽ(3}IÃhÄÿ*À}„§—4Ô¬¸ʒ¦ü€”{ÒDÐ[É7ûõöεŠÐî*$•b¦


                                Try it online!
                                or with Additional formatting



                                Base-255 encoded binary string with a prepended 1.

                                Hoping there's a better way of doing this but haven't found it yet.






                                share|improve this answer











                                $endgroup$




                                05AB1E, 215 bytes



                                •1cDÕχ´ã.RÓñîι1¼Ć®r₁Àā&ëÕβ₁œÑ|γy^;J}½ƶ³øy2ƒÑÐÆ›]Y4(ûXéÅrλ∞½X?Nô“jÒG‰"Œ»ZΘζÚ¢£,Ť.Q4ǝ&èOO1¶o!øт‰Γ>Já
                                ‹”¤ó¹¬q¤ζ₄ômm»₃}Hx±÷+₄SHÇcGƵ~Ω˜Ô/i1Σ$8ÖÀ"ÉE›u.ZÐŒ·>λïU7ÏδÓxƶÂΓ¡†āNÔû×ÒŽ(3}IÃhÄÿ*À}„§—4Ô¬¸ʒ¦ü€”{ÒDÐ[É7ûõöεŠÐî*$•b¦


                                Try it online!
                                or with Additional formatting



                                Base-255 encoded binary string with a prepended 1.

                                Hoping there's a better way of doing this but haven't found it yet.







                                share|improve this answer














                                share|improve this answer



                                share|improve this answer








                                edited 7 hours ago

























                                answered 8 hours ago









                                EmignaEmigna

                                47.8k433145




                                47.8k433145























                                    2












                                    $begingroup$


                                    Perl 6, 368 bytes



                                    .say for :36('FJXOE0PDDNF5Y5EHGB8M9SWMXQOXIKIT9F6ZKWWDEACHCBGXL1N2H60CN0CJ4EMKF7D6MODSKYJVNR4SFTDR6NSM421LQ67B6MWF0G5BQATFOJJJBQ0UFQM64T0MWSQN41C4S5D1QR5KJM2L9UTYMMKUBBQWY45YCMRGO8ZRGTQH7LXMZBUASLCTKX30IH0AYKYEPHO8HFHX8GAY5WM38YOSUX0HABYSH2PPBLRDRZIN5ANAQ3V8PLOZ6EHC0UI95EVJVYD1820T6J14HGX85NWFQET2NWOMSNUT0JW4LHMY90X094TEE9KXJXSNN6YPERFQW').base(2).substr(1).comb(23)


                                    Try it online!



                                    The long string is the message as a single base-36 number (with a single prefixed 1 bit to preserve the leading zeroes) which is then converted back to binary and printed 23 bits at a time.






                                    share|improve this answer









                                    $endgroup$













                                    • $begingroup$
                                      You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                      $endgroup$
                                      – Jo King
                                      6 hours ago












                                    • $begingroup$
                                      Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                      $endgroup$
                                      – Sean
                                      5 hours ago










                                    • $begingroup$
                                      There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                      $endgroup$
                                      – Jo King
                                      3 hours ago


















                                    2












                                    $begingroup$


                                    Perl 6, 368 bytes



                                    .say for :36('FJXOE0PDDNF5Y5EHGB8M9SWMXQOXIKIT9F6ZKWWDEACHCBGXL1N2H60CN0CJ4EMKF7D6MODSKYJVNR4SFTDR6NSM421LQ67B6MWF0G5BQATFOJJJBQ0UFQM64T0MWSQN41C4S5D1QR5KJM2L9UTYMMKUBBQWY45YCMRGO8ZRGTQH7LXMZBUASLCTKX30IH0AYKYEPHO8HFHX8GAY5WM38YOSUX0HABYSH2PPBLRDRZIN5ANAQ3V8PLOZ6EHC0UI95EVJVYD1820T6J14HGX85NWFQET2NWOMSNUT0JW4LHMY90X094TEE9KXJXSNN6YPERFQW').base(2).substr(1).comb(23)


                                    Try it online!



                                    The long string is the message as a single base-36 number (with a single prefixed 1 bit to preserve the leading zeroes) which is then converted back to binary and printed 23 bits at a time.






                                    share|improve this answer









                                    $endgroup$













                                    • $begingroup$
                                      You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                      $endgroup$
                                      – Jo King
                                      6 hours ago












                                    • $begingroup$
                                      Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                      $endgroup$
                                      – Sean
                                      5 hours ago










                                    • $begingroup$
                                      There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                      $endgroup$
                                      – Jo King
                                      3 hours ago
















                                    2












                                    2








                                    2





                                    $begingroup$


                                    Perl 6, 368 bytes



                                    .say for :36('FJXOE0PDDNF5Y5EHGB8M9SWMXQOXIKIT9F6ZKWWDEACHCBGXL1N2H60CN0CJ4EMKF7D6MODSKYJVNR4SFTDR6NSM421LQ67B6MWF0G5BQATFOJJJBQ0UFQM64T0MWSQN41C4S5D1QR5KJM2L9UTYMMKUBBQWY45YCMRGO8ZRGTQH7LXMZBUASLCTKX30IH0AYKYEPHO8HFHX8GAY5WM38YOSUX0HABYSH2PPBLRDRZIN5ANAQ3V8PLOZ6EHC0UI95EVJVYD1820T6J14HGX85NWFQET2NWOMSNUT0JW4LHMY90X094TEE9KXJXSNN6YPERFQW').base(2).substr(1).comb(23)


                                    Try it online!



                                    The long string is the message as a single base-36 number (with a single prefixed 1 bit to preserve the leading zeroes) which is then converted back to binary and printed 23 bits at a time.






                                    share|improve this answer









                                    $endgroup$




                                    Perl 6, 368 bytes



                                    .say for :36('FJXOE0PDDNF5Y5EHGB8M9SWMXQOXIKIT9F6ZKWWDEACHCBGXL1N2H60CN0CJ4EMKF7D6MODSKYJVNR4SFTDR6NSM421LQ67B6MWF0G5BQATFOJJJBQ0UFQM64T0MWSQN41C4S5D1QR5KJM2L9UTYMMKUBBQWY45YCMRGO8ZRGTQH7LXMZBUASLCTKX30IH0AYKYEPHO8HFHX8GAY5WM38YOSUX0HABYSH2PPBLRDRZIN5ANAQ3V8PLOZ6EHC0UI95EVJVYD1820T6J14HGX85NWFQET2NWOMSNUT0JW4LHMY90X094TEE9KXJXSNN6YPERFQW').base(2).substr(1).comb(23)


                                    Try it online!



                                    The long string is the message as a single base-36 number (with a single prefixed 1 bit to preserve the leading zeroes) which is then converted back to binary and printed 23 bits at a time.







                                    share|improve this answer












                                    share|improve this answer



                                    share|improve this answer










                                    answered 7 hours ago









                                    SeanSean

                                    3,54637




                                    3,54637












                                    • $begingroup$
                                      You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                      $endgroup$
                                      – Jo King
                                      6 hours ago












                                    • $begingroup$
                                      Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                      $endgroup$
                                      – Sean
                                      5 hours ago










                                    • $begingroup$
                                      There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                      $endgroup$
                                      – Jo King
                                      3 hours ago




















                                    • $begingroup$
                                      You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                      $endgroup$
                                      – Jo King
                                      6 hours ago












                                    • $begingroup$
                                      Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                      $endgroup$
                                      – Sean
                                      5 hours ago










                                    • $begingroup$
                                      There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                      $endgroup$
                                      – Jo King
                                      3 hours ago


















                                    $begingroup$
                                    You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                    $endgroup$
                                    – Jo King
                                    6 hours ago






                                    $begingroup$
                                    You can use >>.say and &{S/.//} to save bytes. Have you thought about using a different base instead?
                                    $endgroup$
                                    – Jo King
                                    6 hours ago














                                    $begingroup$
                                    Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                    $endgroup$
                                    – Sean
                                    5 hours ago




                                    $begingroup$
                                    Yes, I tried using base 65536/Unicode, but the message runs into some forbidden surrogate codepoints. I was able to avoid that by adding a fixed offset to each codepoint, but astonishingly, some of the generated strings crashed Emacs a few times. Resolving the issues started taking more time than I could afford to commit. I'll probably revisit the problem later.
                                    $endgroup$
                                    – Sean
                                    5 hours ago












                                    $begingroup$
                                    There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                    $endgroup$
                                    – Jo King
                                    3 hours ago






                                    $begingroup$
                                    There's no point going into multiple byte characters, since that increases your byte count. 289 bytes by implementing my tips from above and using base 122 (to avoid carriage returns)
                                    $endgroup$
                                    – Jo King
                                    3 hours ago













                                    2












                                    $begingroup$

                                    Java, 688 678 590 bytes



                                    I'm pretty sure this can be golfed more. Returns a stream of String objects.



                                    v->java.util.Arrays.asList(87040,1315844,4474034,5592356,0,1536,6656,6656,10752,15872,0,6407704,4194704,6866458,8255455,0,524290,0,262145,8126495,0,6391576,4210704,6841242,8255455,0,530434,6144,268289,8132639,6144,1050628,530440,399376,100448,6528,100448,399376,528392,1054724,2103300,2099208,1052688,524384,393600,1168896,1052672,1080320,1096283,80191,6043703,10299,1058879,1058864,1076224,0,1839104,1918293,1835348,320,31744,130816,459200,786528,1704112,3342744,2261640,2245768,141440,135296,131200,37888,3996280).stream().map(s->"".format("%23s",Long.toBinaryString(s)).replace(" ","0"))


                                    -10 bytes by returning the raw stream

                                    -88 bytes by using base 10 numerics (thanks @ceilingcat!)
                                    Try it online!



                                    Explanation:



                                    v->
                                    java.util.Arrays.asList(...) // Create a list of the rows of the message in base 16 (hex)
                                    .stream() // Stream/iterate over the elements of the list
                                    .map(s->"".format("%23s",Long.toBinaryString(s)) // Convert to binary and pad the result
                                    .replace(" ","0")) // Replace padding with "0"
                                    // Implicit return





                                    share|improve this answer











                                    $endgroup$













                                    • $begingroup$
                                      @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                      $endgroup$
                                      – Benjamin Urquhart
                                      4 hours ago
















                                    2












                                    $begingroup$

                                    Java, 688 678 590 bytes



                                    I'm pretty sure this can be golfed more. Returns a stream of String objects.



                                    v->java.util.Arrays.asList(87040,1315844,4474034,5592356,0,1536,6656,6656,10752,15872,0,6407704,4194704,6866458,8255455,0,524290,0,262145,8126495,0,6391576,4210704,6841242,8255455,0,530434,6144,268289,8132639,6144,1050628,530440,399376,100448,6528,100448,399376,528392,1054724,2103300,2099208,1052688,524384,393600,1168896,1052672,1080320,1096283,80191,6043703,10299,1058879,1058864,1076224,0,1839104,1918293,1835348,320,31744,130816,459200,786528,1704112,3342744,2261640,2245768,141440,135296,131200,37888,3996280).stream().map(s->"".format("%23s",Long.toBinaryString(s)).replace(" ","0"))


                                    -10 bytes by returning the raw stream

                                    -88 bytes by using base 10 numerics (thanks @ceilingcat!)
                                    Try it online!



                                    Explanation:



                                    v->
                                    java.util.Arrays.asList(...) // Create a list of the rows of the message in base 16 (hex)
                                    .stream() // Stream/iterate over the elements of the list
                                    .map(s->"".format("%23s",Long.toBinaryString(s)) // Convert to binary and pad the result
                                    .replace(" ","0")) // Replace padding with "0"
                                    // Implicit return





                                    share|improve this answer











                                    $endgroup$













                                    • $begingroup$
                                      @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                      $endgroup$
                                      – Benjamin Urquhart
                                      4 hours ago














                                    2












                                    2








                                    2





                                    $begingroup$

                                    Java, 688 678 590 bytes



                                    I'm pretty sure this can be golfed more. Returns a stream of String objects.



                                    v->java.util.Arrays.asList(87040,1315844,4474034,5592356,0,1536,6656,6656,10752,15872,0,6407704,4194704,6866458,8255455,0,524290,0,262145,8126495,0,6391576,4210704,6841242,8255455,0,530434,6144,268289,8132639,6144,1050628,530440,399376,100448,6528,100448,399376,528392,1054724,2103300,2099208,1052688,524384,393600,1168896,1052672,1080320,1096283,80191,6043703,10299,1058879,1058864,1076224,0,1839104,1918293,1835348,320,31744,130816,459200,786528,1704112,3342744,2261640,2245768,141440,135296,131200,37888,3996280).stream().map(s->"".format("%23s",Long.toBinaryString(s)).replace(" ","0"))


                                    -10 bytes by returning the raw stream

                                    -88 bytes by using base 10 numerics (thanks @ceilingcat!)
                                    Try it online!



                                    Explanation:



                                    v->
                                    java.util.Arrays.asList(...) // Create a list of the rows of the message in base 16 (hex)
                                    .stream() // Stream/iterate over the elements of the list
                                    .map(s->"".format("%23s",Long.toBinaryString(s)) // Convert to binary and pad the result
                                    .replace(" ","0")) // Replace padding with "0"
                                    // Implicit return





                                    share|improve this answer











                                    $endgroup$



                                    Java, 688 678 590 bytes



                                    I'm pretty sure this can be golfed more. Returns a stream of String objects.



                                    v->java.util.Arrays.asList(87040,1315844,4474034,5592356,0,1536,6656,6656,10752,15872,0,6407704,4194704,6866458,8255455,0,524290,0,262145,8126495,0,6391576,4210704,6841242,8255455,0,530434,6144,268289,8132639,6144,1050628,530440,399376,100448,6528,100448,399376,528392,1054724,2103300,2099208,1052688,524384,393600,1168896,1052672,1080320,1096283,80191,6043703,10299,1058879,1058864,1076224,0,1839104,1918293,1835348,320,31744,130816,459200,786528,1704112,3342744,2261640,2245768,141440,135296,131200,37888,3996280).stream().map(s->"".format("%23s",Long.toBinaryString(s)).replace(" ","0"))


                                    -10 bytes by returning the raw stream

                                    -88 bytes by using base 10 numerics (thanks @ceilingcat!)
                                    Try it online!



                                    Explanation:



                                    v->
                                    java.util.Arrays.asList(...) // Create a list of the rows of the message in base 16 (hex)
                                    .stream() // Stream/iterate over the elements of the list
                                    .map(s->"".format("%23s",Long.toBinaryString(s)) // Convert to binary and pad the result
                                    .replace(" ","0")) // Replace padding with "0"
                                    // Implicit return






                                    share|improve this answer














                                    share|improve this answer



                                    share|improve this answer








                                    edited 4 hours ago

























                                    answered 9 hours ago









                                    Benjamin UrquhartBenjamin Urquhart

                                    40017




                                    40017












                                    • $begingroup$
                                      @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                      $endgroup$
                                      – Benjamin Urquhart
                                      4 hours ago


















                                    • $begingroup$
                                      @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                      $endgroup$
                                      – Benjamin Urquhart
                                      4 hours ago
















                                    $begingroup$
                                    @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                    $endgroup$
                                    – Benjamin Urquhart
                                    4 hours ago




                                    $begingroup$
                                    @ceilingcat I went back and forth on using decimals. Looks like they are shorter.
                                    $endgroup$
                                    – Benjamin Urquhart
                                    4 hours ago











                                    1












                                    $begingroup$

                                    Bubblegum, 275 bytes



                                    00000000: e006 d601 0b5d 0018 6988 6507 9cf6 752c  .....]..i.e...u,
                                    00000010: 9e9a 501a 87a7 98b4 844f 9fcf daaf 8773 ..P......O.....s
                                    00000020: 3b9d 8239 48c8 16d8 60a9 3876 7f6c b812 ;..9H...`.8v.l..
                                    00000030: 99f3 e8a6 38ef fe30 68c0 e096 a894 9c81 ....8..0h.......
                                    00000040: d706 7dff 3ec4 4e5d f185 b3a4 8e5b 5857 ..}.>.N].....[XW
                                    00000050: 7243 86e8 c37c fbd5 c856 b126 14ee 78ec rC...|...V.&..x.
                                    00000060: c41d f4db 3b04 c0c1 9ec6 2f83 14e3 8315 ....;...../.....
                                    00000070: 85ac d55c 1c86 8066 b518 6ec1 3dff 5db6 ......f..n.=.].
                                    00000080: 435a 6cec e6f9 cbbd 1475 ab7c 710f 0f63 CZl......u.|q..c
                                    00000090: f97a e5ae 3b56 a8c0 f3e5 5000 5503 698a .z..;V....P.U.i.
                                    000000a0: eaf3 f8c3 015d 741f 3fa0 8919 5407 d4c8 .....]t.?...T...
                                    000000b0: 77c3 dd4e 2ca9 a7ea da07 0f53 99ce e73c w..N,......S...<
                                    000000c0: 71e6 fc67 2e31 44f7 b80f a923 ba44 87de q..g.1D....#.D..
                                    000000d0: b29c f8ef 1dc2 288e 131a 0d26 68bb 572e ......(....&h.W.
                                    000000e0: d743 5e63 9d50 83be 986f 74b6 33ff 2060 .C^c.P...ot.3. `
                                    000000f0: 33d7 e3a2 bb1f 4331 33af e12d 2f10 e459 3.....C13..-/..Y
                                    00000100: 9091 9aa4 7e0a ab1d 00b4 1cfb 2c73 7d33 ....~.......,s}3
                                    00000110: 7e3a 00 ~:.


                                    Try it online!






                                    share|improve this answer









                                    $endgroup$


















                                      1












                                      $begingroup$

                                      Bubblegum, 275 bytes



                                      00000000: e006 d601 0b5d 0018 6988 6507 9cf6 752c  .....]..i.e...u,
                                      00000010: 9e9a 501a 87a7 98b4 844f 9fcf daaf 8773 ..P......O.....s
                                      00000020: 3b9d 8239 48c8 16d8 60a9 3876 7f6c b812 ;..9H...`.8v.l..
                                      00000030: 99f3 e8a6 38ef fe30 68c0 e096 a894 9c81 ....8..0h.......
                                      00000040: d706 7dff 3ec4 4e5d f185 b3a4 8e5b 5857 ..}.>.N].....[XW
                                      00000050: 7243 86e8 c37c fbd5 c856 b126 14ee 78ec rC...|...V.&..x.
                                      00000060: c41d f4db 3b04 c0c1 9ec6 2f83 14e3 8315 ....;...../.....
                                      00000070: 85ac d55c 1c86 8066 b518 6ec1 3dff 5db6 ......f..n.=.].
                                      00000080: 435a 6cec e6f9 cbbd 1475 ab7c 710f 0f63 CZl......u.|q..c
                                      00000090: f97a e5ae 3b56 a8c0 f3e5 5000 5503 698a .z..;V....P.U.i.
                                      000000a0: eaf3 f8c3 015d 741f 3fa0 8919 5407 d4c8 .....]t.?...T...
                                      000000b0: 77c3 dd4e 2ca9 a7ea da07 0f53 99ce e73c w..N,......S...<
                                      000000c0: 71e6 fc67 2e31 44f7 b80f a923 ba44 87de q..g.1D....#.D..
                                      000000d0: b29c f8ef 1dc2 288e 131a 0d26 68bb 572e ......(....&h.W.
                                      000000e0: d743 5e63 9d50 83be 986f 74b6 33ff 2060 .C^c.P...ot.3. `
                                      000000f0: 33d7 e3a2 bb1f 4331 33af e12d 2f10 e459 3.....C13..-/..Y
                                      00000100: 9091 9aa4 7e0a ab1d 00b4 1cfb 2c73 7d33 ....~.......,s}3
                                      00000110: 7e3a 00 ~:.


                                      Try it online!






                                      share|improve this answer









                                      $endgroup$
















                                        1












                                        1








                                        1





                                        $begingroup$

                                        Bubblegum, 275 bytes



                                        00000000: e006 d601 0b5d 0018 6988 6507 9cf6 752c  .....]..i.e...u,
                                        00000010: 9e9a 501a 87a7 98b4 844f 9fcf daaf 8773 ..P......O.....s
                                        00000020: 3b9d 8239 48c8 16d8 60a9 3876 7f6c b812 ;..9H...`.8v.l..
                                        00000030: 99f3 e8a6 38ef fe30 68c0 e096 a894 9c81 ....8..0h.......
                                        00000040: d706 7dff 3ec4 4e5d f185 b3a4 8e5b 5857 ..}.>.N].....[XW
                                        00000050: 7243 86e8 c37c fbd5 c856 b126 14ee 78ec rC...|...V.&..x.
                                        00000060: c41d f4db 3b04 c0c1 9ec6 2f83 14e3 8315 ....;...../.....
                                        00000070: 85ac d55c 1c86 8066 b518 6ec1 3dff 5db6 ......f..n.=.].
                                        00000080: 435a 6cec e6f9 cbbd 1475 ab7c 710f 0f63 CZl......u.|q..c
                                        00000090: f97a e5ae 3b56 a8c0 f3e5 5000 5503 698a .z..;V....P.U.i.
                                        000000a0: eaf3 f8c3 015d 741f 3fa0 8919 5407 d4c8 .....]t.?...T...
                                        000000b0: 77c3 dd4e 2ca9 a7ea da07 0f53 99ce e73c w..N,......S...<
                                        000000c0: 71e6 fc67 2e31 44f7 b80f a923 ba44 87de q..g.1D....#.D..
                                        000000d0: b29c f8ef 1dc2 288e 131a 0d26 68bb 572e ......(....&h.W.
                                        000000e0: d743 5e63 9d50 83be 986f 74b6 33ff 2060 .C^c.P...ot.3. `
                                        000000f0: 33d7 e3a2 bb1f 4331 33af e12d 2f10 e459 3.....C13..-/..Y
                                        00000100: 9091 9aa4 7e0a ab1d 00b4 1cfb 2c73 7d33 ....~.......,s}3
                                        00000110: 7e3a 00 ~:.


                                        Try it online!






                                        share|improve this answer









                                        $endgroup$



                                        Bubblegum, 275 bytes



                                        00000000: e006 d601 0b5d 0018 6988 6507 9cf6 752c  .....]..i.e...u,
                                        00000010: 9e9a 501a 87a7 98b4 844f 9fcf daaf 8773 ..P......O.....s
                                        00000020: 3b9d 8239 48c8 16d8 60a9 3876 7f6c b812 ;..9H...`.8v.l..
                                        00000030: 99f3 e8a6 38ef fe30 68c0 e096 a894 9c81 ....8..0h.......
                                        00000040: d706 7dff 3ec4 4e5d f185 b3a4 8e5b 5857 ..}.>.N].....[XW
                                        00000050: 7243 86e8 c37c fbd5 c856 b126 14ee 78ec rC...|...V.&..x.
                                        00000060: c41d f4db 3b04 c0c1 9ec6 2f83 14e3 8315 ....;...../.....
                                        00000070: 85ac d55c 1c86 8066 b518 6ec1 3dff 5db6 ......f..n.=.].
                                        00000080: 435a 6cec e6f9 cbbd 1475 ab7c 710f 0f63 CZl......u.|q..c
                                        00000090: f97a e5ae 3b56 a8c0 f3e5 5000 5503 698a .z..;V....P.U.i.
                                        000000a0: eaf3 f8c3 015d 741f 3fa0 8919 5407 d4c8 .....]t.?...T...
                                        000000b0: 77c3 dd4e 2ca9 a7ea da07 0f53 99ce e73c w..N,......S...<
                                        000000c0: 71e6 fc67 2e31 44f7 b80f a923 ba44 87de q..g.1D....#.D..
                                        000000d0: b29c f8ef 1dc2 288e 131a 0d26 68bb 572e ......(....&h.W.
                                        000000e0: d743 5e63 9d50 83be 986f 74b6 33ff 2060 .C^c.P...ot.3. `
                                        000000f0: 33d7 e3a2 bb1f 4331 33af e12d 2f10 e459 3.....C13..-/..Y
                                        00000100: 9091 9aa4 7e0a ab1d 00b4 1cfb 2c73 7d33 ....~.......,s}3
                                        00000110: 7e3a 00 ~:.


                                        Try it online!







                                        share|improve this answer












                                        share|improve this answer



                                        share|improve this answer










                                        answered 8 hours ago









                                        orthoplexorthoplex

                                        1014




                                        1014























                                            1












                                            $begingroup$


                                            Perl 5, 460 bytes





                                            printf"%023b",oct"0x$_"for qw/15400 141404 4444b2 555524 0 600 1a00 1a00 2a00 3e00 0 61c618 400190 68c61a 7df7df 0 80002 0 40001 7c001f 0 618718 404010 68639a 7df7df 0 81802 1800 41801 7c181f 1800 100804 81808 61810 18860 1980 18860 61810 81008 101804 201804 200808 101010 80060 60180 11d600 101000 107c00 10ba5b 1393f 5c3837 283b 10283f 102830 106c00 0 1c1000 1d4555 1c0154 140 7c00 1ff00 701c0 c0060 1a00b0 330198 228288 224488 22880 21080 20080 9400 3cfa78/


                                            Try it online!






                                            share|improve this answer









                                            $endgroup$


















                                              1












                                              $begingroup$


                                              Perl 5, 460 bytes





                                              printf"%023b",oct"0x$_"for qw/15400 141404 4444b2 555524 0 600 1a00 1a00 2a00 3e00 0 61c618 400190 68c61a 7df7df 0 80002 0 40001 7c001f 0 618718 404010 68639a 7df7df 0 81802 1800 41801 7c181f 1800 100804 81808 61810 18860 1980 18860 61810 81008 101804 201804 200808 101010 80060 60180 11d600 101000 107c00 10ba5b 1393f 5c3837 283b 10283f 102830 106c00 0 1c1000 1d4555 1c0154 140 7c00 1ff00 701c0 c0060 1a00b0 330198 228288 224488 22880 21080 20080 9400 3cfa78/


                                              Try it online!






                                              share|improve this answer









                                              $endgroup$
















                                                1












                                                1








                                                1





                                                $begingroup$


                                                Perl 5, 460 bytes





                                                printf"%023b",oct"0x$_"for qw/15400 141404 4444b2 555524 0 600 1a00 1a00 2a00 3e00 0 61c618 400190 68c61a 7df7df 0 80002 0 40001 7c001f 0 618718 404010 68639a 7df7df 0 81802 1800 41801 7c181f 1800 100804 81808 61810 18860 1980 18860 61810 81008 101804 201804 200808 101010 80060 60180 11d600 101000 107c00 10ba5b 1393f 5c3837 283b 10283f 102830 106c00 0 1c1000 1d4555 1c0154 140 7c00 1ff00 701c0 c0060 1a00b0 330198 228288 224488 22880 21080 20080 9400 3cfa78/


                                                Try it online!






                                                share|improve this answer









                                                $endgroup$




                                                Perl 5, 460 bytes





                                                printf"%023b",oct"0x$_"for qw/15400 141404 4444b2 555524 0 600 1a00 1a00 2a00 3e00 0 61c618 400190 68c61a 7df7df 0 80002 0 40001 7c001f 0 618718 404010 68639a 7df7df 0 81802 1800 41801 7c181f 1800 100804 81808 61810 18860 1980 18860 61810 81008 101804 201804 200808 101010 80060 60180 11d600 101000 107c00 10ba5b 1393f 5c3837 283b 10283f 102830 106c00 0 1c1000 1d4555 1c0154 140 7c00 1ff00 701c0 c0060 1a00b0 330198 228288 224488 22880 21080 20080 9400 3cfa78/


                                                Try it online!







                                                share|improve this answer












                                                share|improve this answer



                                                share|improve this answer










                                                answered 7 hours ago









                                                XcaliXcali

                                                5,475520




                                                5,475520























                                                    1












                                                    $begingroup$


                                                    Deadfish~, 1115 bytes



                                                    ooooooiodoiodoiodoiod{o}{i}c{d}ooiodoiodoooooiodoiodoooooooiodoo{i}c{d}iodoooiodoooiodoooiodooiodoioodooiodo{i}c{d}iodoiodoiodoiodoiodoiodoiodoiodooiodooiodoo{i}c{d}{oo}ooo{i}c{d}{o}ooioodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}oooooooooiodoiodoiodooooooooo{i}c{d}oooooooooiooooodooooooooo{i}c{d}{oo}ooo{i}c{d}ioodooooiooodoooioodooooioodooo{i}c{d}iod{o}oooioodooiodoooo{i}c{d}ioodoiodoooioodoooioodooooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiod{o}oooooooiodo{i}c{d}{oo}ooo{i}c{d}ooooiod{o}oooooooiod{i}c{d}ioooood{o}oooioooood{i}c{d}{oo}ooo{i}c{d}ioodooooioodooooiooodoooioodooo{i}c{d}iodoooooooiodoooooooooiodoooo{i}c{d}ioodoiodooooioodoooiooodooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiodooooooioodoooooooooiodo{i}c{d}{o}iood{o}o{i}c{d}ooooiodoooooiood{o}iod{i}c{d}iooooodoooooioodooooooioooood{i}c{d}{o}iood{o}o{i}c{d}ooiodooooooooiodooooooooiodoo{i}c{d}oooiodooooooioodoooooooiodooo{i}c{d}ooooioodooooioodooooooiodoooo{i}c{d}ooooooioodoooiodooooioodooooo{i}c{d}{o}ioodooioodooooooo{i}c{d}ooooooioodoooiodooooioodooooo


                                                    Try it online!



                                                    If someone has the patience to golf this further, I salute you ahead of time. :P






                                                    share|improve this answer









                                                    $endgroup$


















                                                      1












                                                      $begingroup$


                                                      Deadfish~, 1115 bytes



                                                      ooooooiodoiodoiodoiod{o}{i}c{d}ooiodoiodoooooiodoiodoooooooiodoo{i}c{d}iodoooiodoooiodoooiodooiodoioodooiodo{i}c{d}iodoiodoiodoiodoiodoiodoiodoiodooiodooiodoo{i}c{d}{oo}ooo{i}c{d}{o}ooioodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}oooooooooiodoiodoiodooooooooo{i}c{d}oooooooooiooooodooooooooo{i}c{d}{oo}ooo{i}c{d}ioodooooiooodoooioodooooioodooo{i}c{d}iod{o}oooioodooiodoooo{i}c{d}ioodoiodoooioodoooioodooooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiod{o}oooooooiodo{i}c{d}{oo}ooo{i}c{d}ooooiod{o}oooooooiod{i}c{d}ioooood{o}oooioooood{i}c{d}{oo}ooo{i}c{d}ioodooooioodooooiooodoooioodooo{i}c{d}iodoooooooiodoooooooooiodoooo{i}c{d}ioodoiodooooioodoooiooodooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiodooooooioodoooooooooiodo{i}c{d}{o}iood{o}o{i}c{d}ooooiodoooooiood{o}iod{i}c{d}iooooodoooooioodooooooioooood{i}c{d}{o}iood{o}o{i}c{d}ooiodooooooooiodooooooooiodoo{i}c{d}oooiodooooooioodoooooooiodooo{i}c{d}ooooioodooooioodooooooiodoooo{i}c{d}ooooooioodoooiodooooioodooooo{i}c{d}{o}ioodooioodooooooo{i}c{d}ooooooioodoooiodooooioodooooo


                                                      Try it online!



                                                      If someone has the patience to golf this further, I salute you ahead of time. :P






                                                      share|improve this answer









                                                      $endgroup$
















                                                        1












                                                        1








                                                        1





                                                        $begingroup$


                                                        Deadfish~, 1115 bytes



                                                        ooooooiodoiodoiodoiod{o}{i}c{d}ooiodoiodoooooiodoiodoooooooiodoo{i}c{d}iodoooiodoooiodoooiodooiodoioodooiodo{i}c{d}iodoiodoiodoiodoiodoiodoiodoiodooiodooiodoo{i}c{d}{oo}ooo{i}c{d}{o}ooioodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}oooooooooiodoiodoiodooooooooo{i}c{d}oooooooooiooooodooooooooo{i}c{d}{oo}ooo{i}c{d}ioodooooiooodoooioodooooioodooo{i}c{d}iod{o}oooioodooiodoooo{i}c{d}ioodoiodoooioodoooioodooooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiod{o}oooooooiodo{i}c{d}{oo}ooo{i}c{d}ooooiod{o}oooooooiod{i}c{d}ioooood{o}oooioooood{i}c{d}{oo}ooo{i}c{d}ioodooooioodooooiooodoooioodooo{i}c{d}iodoooooooiodoooooooooiodoooo{i}c{d}ioodoiodooooioodoooiooodooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiodooooooioodoooooooooiodo{i}c{d}{o}iood{o}o{i}c{d}ooooiodoooooiood{o}iod{i}c{d}iooooodoooooioodooooooioooood{i}c{d}{o}iood{o}o{i}c{d}ooiodooooooooiodooooooooiodoo{i}c{d}oooiodooooooioodoooooooiodooo{i}c{d}ooooioodooooioodooooooiodoooo{i}c{d}ooooooioodoooiodooooioodooooo{i}c{d}{o}ioodooioodooooooo{i}c{d}ooooooioodoooiodooooioodooooo


                                                        Try it online!



                                                        If someone has the patience to golf this further, I salute you ahead of time. :P






                                                        share|improve this answer









                                                        $endgroup$




                                                        Deadfish~, 1115 bytes



                                                        ooooooiodoiodoiodoiod{o}{i}c{d}ooiodoiodoooooiodoiodoooooooiodoo{i}c{d}iodoooiodoooiodoooiodooiodoioodooiodo{i}c{d}iodoiodoiodoiodoiodoiodoiodoiodooiodooiodoo{i}c{d}{oo}ooo{i}c{d}{o}ooioodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}{o}ioodoiodooooooooo{i}c{d}oooooooooiodoiodoiodooooooooo{i}c{d}oooooooooiooooodooooooooo{i}c{d}{oo}ooo{i}c{d}ioodooooiooodoooioodooooioodooo{i}c{d}iod{o}oooioodooiodoooo{i}c{d}ioodoiodoooioodoooioodooooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiod{o}oooooooiodo{i}c{d}{oo}ooo{i}c{d}ooooiod{o}oooooooiod{i}c{d}ioooood{o}oooioooood{i}c{d}{oo}ooo{i}c{d}ioodooooioodooooiooodoooioodooo{i}c{d}iodoooooooiodoooooooooiodoooo{i}c{d}ioodoiodooooioodoooiooodooioodoiodo{i}c{d}iooooodoiooooodoiooooodoioooood{i}c{d}{oo}ooo{i}c{d}oooiodooooooioodoooooooooiodo{i}c{d}{o}iood{o}o{i}c{d}ooooiodoooooiood{o}iod{i}c{d}iooooodoooooioodooooooioooood{i}c{d}{o}iood{o}o{i}c{d}ooiodooooooooiodooooooooiodoo{i}c{d}oooiodooooooioodoooooooiodooo{i}c{d}ooooioodooooioodooooooiodoooo{i}c{d}ooooooioodoooiodooooioodooooo{i}c{d}{o}ioodooioodooooooo{i}c{d}ooooooioodoooiodooooioodooooo


                                                        Try it online!



                                                        If someone has the patience to golf this further, I salute you ahead of time. :P







                                                        share|improve this answer












                                                        share|improve this answer



                                                        share|improve this answer










                                                        answered 7 hours ago









                                                        squidsquid

                                                        1114




                                                        1114























                                                            1












                                                            $begingroup$

                                                            Brainfuck, 2360 2008 bytes



                                                            -[>+<-----]>---......+.-.+.-.+.-.+.-............+.-.+.-.....+.-.+.-.......+.-..+.-...+.-...+.-...+.-..+.-.+..-.<+++++++++[->.+.-<]>..+.-..+.-<++++++[->......<]>.+.<++[->.-...................+..-.+<]>.-..................+.-.+.-.+.-..................+.....-................................+..-....+...-...+..-....+..-...+.-.............+..-..+.-....+..-.+.-...+..-...+..-....+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-<++[->.................+.-...........<]>......+......-.............+.....-.......................+..-....+..-....+...-...+..-...+.-.......+.-.........+.-....+..-.+.-....+..-...+...-..+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-......+..-.........+.-...........+..-...............+.-.....+..-..........+......-.....+..-......+.....-..........+..-.............+.-........+.-........+.-.....+.-......+..-.......+.-.......+..-....+..-......+.-..........+..-...+.-....+..-...............+..-..+..-.............+..-...+.-....+..-.........+..-....+..-......+.-.......+.-......+.-........+.-.....+.-<++[->.......+..-........+.-...+.-.<]>........+.-.......+.-<++++[->.....+.-..<]>..........+..-.........+..-........+..-.........+.-...+...-.+.-.+..-...........+.-.......+.-..............+.-.....+.....-............+.-....+.-.+...-.+.-..+.-.+..-.+..-......+.-..+...-..+.-..+.......-.+...-....+...-.....+..-.+...-.........+.-.+.-.....+...-.+..-..+.-......+.-.+.-.....+......-..+.-......+.-.+.-.....+..-......+.-.....+..-.+..-<+++++++[->.....<]>+...-.....+.-..............+...-.+.-.+.-...+.-.+.-.+.-.+.-.+.-.+.-..+...-.........+.-.+.-.+.-.+.-................+.-.+.-..............+.....-................+.........-............+...-.......+...-.........+..-...........+..-.......+..-.+.-.........+.-.+..-.....+..-..+..-.......+..-..+..-....+.-...+.-.+.-.....+.-.+.-...+.-....+.-...+.-..+.-...+.-..+.-...+.-........+.-...+.-.+.-...+.-............+.-....+.-....+.-............+.-.........+.-..............+.-..+.-.+.-...........+....-..+.....-.+.-..+....-...


                                                            Try it online!



                                                            I will probably golf this further soon.






                                                            share|improve this answer











                                                            $endgroup$


















                                                              1












                                                              $begingroup$

                                                              Brainfuck, 2360 2008 bytes



                                                              -[>+<-----]>---......+.-.+.-.+.-.+.-............+.-.+.-.....+.-.+.-.......+.-..+.-...+.-...+.-...+.-..+.-.+..-.<+++++++++[->.+.-<]>..+.-..+.-<++++++[->......<]>.+.<++[->.-...................+..-.+<]>.-..................+.-.+.-.+.-..................+.....-................................+..-....+...-...+..-....+..-...+.-.............+..-..+.-....+..-.+.-...+..-...+..-....+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-<++[->.................+.-...........<]>......+......-.............+.....-.......................+..-....+..-....+...-...+..-...+.-.......+.-.........+.-....+..-.+.-....+..-...+...-..+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-......+..-.........+.-...........+..-...............+.-.....+..-..........+......-.....+..-......+.....-..........+..-.............+.-........+.-........+.-.....+.-......+..-.......+.-.......+..-....+..-......+.-..........+..-...+.-....+..-...............+..-..+..-.............+..-...+.-....+..-.........+..-....+..-......+.-.......+.-......+.-........+.-.....+.-<++[->.......+..-........+.-...+.-.<]>........+.-.......+.-<++++[->.....+.-..<]>..........+..-.........+..-........+..-.........+.-...+...-.+.-.+..-...........+.-.......+.-..............+.-.....+.....-............+.-....+.-.+...-.+.-..+.-.+..-.+..-......+.-..+...-..+.-..+.......-.+...-....+...-.....+..-.+...-.........+.-.+.-.....+...-.+..-..+.-......+.-.+.-.....+......-..+.-......+.-.+.-.....+..-......+.-.....+..-.+..-<+++++++[->.....<]>+...-.....+.-..............+...-.+.-.+.-...+.-.+.-.+.-.+.-.+.-.+.-..+...-.........+.-.+.-.+.-.+.-................+.-.+.-..............+.....-................+.........-............+...-.......+...-.........+..-...........+..-.......+..-.+.-.........+.-.+..-.....+..-..+..-.......+..-..+..-....+.-...+.-.+.-.....+.-.+.-...+.-....+.-...+.-..+.-...+.-..+.-...+.-........+.-...+.-.+.-...+.-............+.-....+.-....+.-............+.-.........+.-..............+.-..+.-.+.-...........+....-..+.....-.+.-..+....-...


                                                              Try it online!



                                                              I will probably golf this further soon.






                                                              share|improve this answer











                                                              $endgroup$
















                                                                1












                                                                1








                                                                1





                                                                $begingroup$

                                                                Brainfuck, 2360 2008 bytes



                                                                -[>+<-----]>---......+.-.+.-.+.-.+.-............+.-.+.-.....+.-.+.-.......+.-..+.-...+.-...+.-...+.-..+.-.+..-.<+++++++++[->.+.-<]>..+.-..+.-<++++++[->......<]>.+.<++[->.-...................+..-.+<]>.-..................+.-.+.-.+.-..................+.....-................................+..-....+...-...+..-....+..-...+.-.............+..-..+.-....+..-.+.-...+..-...+..-....+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-<++[->.................+.-...........<]>......+......-.............+.....-.......................+..-....+..-....+...-...+..-...+.-.......+.-.........+.-....+..-.+.-....+..-...+...-..+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-......+..-.........+.-...........+..-...............+.-.....+..-..........+......-.....+..-......+.....-..........+..-.............+.-........+.-........+.-.....+.-......+..-.......+.-.......+..-....+..-......+.-..........+..-...+.-....+..-...............+..-..+..-.............+..-...+.-....+..-.........+..-....+..-......+.-.......+.-......+.-........+.-.....+.-<++[->.......+..-........+.-...+.-.<]>........+.-.......+.-<++++[->.....+.-..<]>..........+..-.........+..-........+..-.........+.-...+...-.+.-.+..-...........+.-.......+.-..............+.-.....+.....-............+.-....+.-.+...-.+.-..+.-.+..-.+..-......+.-..+...-..+.-..+.......-.+...-....+...-.....+..-.+...-.........+.-.+.-.....+...-.+..-..+.-......+.-.+.-.....+......-..+.-......+.-.+.-.....+..-......+.-.....+..-.+..-<+++++++[->.....<]>+...-.....+.-..............+...-.+.-.+.-...+.-.+.-.+.-.+.-.+.-.+.-..+...-.........+.-.+.-.+.-.+.-................+.-.+.-..............+.....-................+.........-............+...-.......+...-.........+..-...........+..-.......+..-.+.-.........+.-.+..-.....+..-..+..-.......+..-..+..-....+.-...+.-.+.-.....+.-.+.-...+.-....+.-...+.-..+.-...+.-..+.-...+.-........+.-...+.-.+.-...+.-............+.-....+.-....+.-............+.-.........+.-..............+.-..+.-.+.-...........+....-..+.....-.+.-..+....-...


                                                                Try it online!



                                                                I will probably golf this further soon.






                                                                share|improve this answer











                                                                $endgroup$



                                                                Brainfuck, 2360 2008 bytes



                                                                -[>+<-----]>---......+.-.+.-.+.-.+.-............+.-.+.-.....+.-.+.-.......+.-..+.-...+.-...+.-...+.-..+.-.+..-.<+++++++++[->.+.-<]>..+.-..+.-<++++++[->......<]>.+.<++[->.-...................+..-.+<]>.-..................+.-.+.-.+.-..................+.....-................................+..-....+...-...+..-....+..-...+.-.............+..-..+.-....+..-.+.-...+..-...+..-....+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-<++[->.................+.-...........<]>......+......-.............+.....-.......................+..-....+..-....+...-...+..-...+.-.......+.-.........+.-....+..-.+.-....+..-...+...-..+..-.+.-.+.....-.+.....-.+.....-.+.....-..........................+.-......+..-.........+.-...........+..-...............+.-.....+..-..........+......-.....+..-......+.....-..........+..-.............+.-........+.-........+.-.....+.-......+..-.......+.-.......+..-....+..-......+.-..........+..-...+.-....+..-...............+..-..+..-.............+..-...+.-....+..-.........+..-....+..-......+.-.......+.-......+.-........+.-.....+.-<++[->.......+..-........+.-...+.-.<]>........+.-.......+.-<++++[->.....+.-..<]>..........+..-.........+..-........+..-.........+.-...+...-.+.-.+..-...........+.-.......+.-..............+.-.....+.....-............+.-....+.-.+...-.+.-..+.-.+..-.+..-......+.-..+...-..+.-..+.......-.+...-....+...-.....+..-.+...-.........+.-.+.-.....+...-.+..-..+.-......+.-.+.-.....+......-..+.-......+.-.+.-.....+..-......+.-.....+..-.+..-<+++++++[->.....<]>+...-.....+.-..............+...-.+.-.+.-...+.-.+.-.+.-.+.-.+.-.+.-..+...-.........+.-.+.-.+.-.+.-................+.-.+.-..............+.....-................+.........-............+...-.......+...-.........+..-...........+..-.......+..-.+.-.........+.-.+..-.....+..-..+..-.......+..-..+..-....+.-...+.-.+.-.....+.-.+.-...+.-....+.-...+.-..+.-...+.-..+.-...+.-........+.-...+.-.+.-...+.-............+.-....+.-....+.-............+.-.........+.-..............+.-..+.-.+.-...........+....-..+.....-.+.-..+....-...


                                                                Try it online!



                                                                I will probably golf this further soon.







                                                                share|improve this answer














                                                                share|improve this answer



                                                                share|improve this answer








                                                                edited 6 hours ago

























                                                                answered 7 hours ago









                                                                orthoplexorthoplex

                                                                1014




                                                                1014























                                                                    1












                                                                    $begingroup$


                                                                    Wolfram Language (Mathematica), 383 bytes



                                                                    StringPartition[Uncompress@"1:eJylVNsRwjAM44s92KBaBTZgAUZhZXqtHUuOWrgjfSRRHFlO4tyer/vjfb1clq0gHirZLRjby986hppcT5p+L3BmgJ3t4Ul4GsNyG++7YbaXLh0ZTPhXa4Sn+X/s9Qfk3Hx2cOaSIuNYaVu5laschvgzSqAjHeZBhilKgKBDEhw0upJRg+HOK4MyNC29sfbc3RV0VPDqeLiRTsG1ulExq1IitpunOa7asnYM9siDZ6eidUCkEzBOUbCkGIig4aTyUGBYWAX6W6aXIWGGI/HlhmsqzSU0QTZjkMVpaX5sBsm1OGKVg1qdjKP0EdyqZBRLhukn8DLBQav6kccgz8OKfgBzjj6Z",23]


                                                                    Try it online!






                                                                    share|improve this answer









                                                                    $endgroup$


















                                                                      1












                                                                      $begingroup$


                                                                      Wolfram Language (Mathematica), 383 bytes



                                                                      StringPartition[Uncompress@"1:eJylVNsRwjAM44s92KBaBTZgAUZhZXqtHUuOWrgjfSRRHFlO4tyer/vjfb1clq0gHirZLRjby986hppcT5p+L3BmgJ3t4Ul4GsNyG++7YbaXLh0ZTPhXa4Sn+X/s9Qfk3Hx2cOaSIuNYaVu5laschvgzSqAjHeZBhilKgKBDEhw0upJRg+HOK4MyNC29sfbc3RV0VPDqeLiRTsG1ulExq1IitpunOa7asnYM9siDZ6eidUCkEzBOUbCkGIig4aTyUGBYWAX6W6aXIWGGI/HlhmsqzSU0QTZjkMVpaX5sBsm1OGKVg1qdjKP0EdyqZBRLhukn8DLBQav6kccgz8OKfgBzjj6Z",23]


                                                                      Try it online!






                                                                      share|improve this answer









                                                                      $endgroup$
















                                                                        1












                                                                        1








                                                                        1





                                                                        $begingroup$


                                                                        Wolfram Language (Mathematica), 383 bytes



                                                                        StringPartition[Uncompress@"1:eJylVNsRwjAM44s92KBaBTZgAUZhZXqtHUuOWrgjfSRRHFlO4tyer/vjfb1clq0gHirZLRjby986hppcT5p+L3BmgJ3t4Ul4GsNyG++7YbaXLh0ZTPhXa4Sn+X/s9Qfk3Hx2cOaSIuNYaVu5laschvgzSqAjHeZBhilKgKBDEhw0upJRg+HOK4MyNC29sfbc3RV0VPDqeLiRTsG1ulExq1IitpunOa7asnYM9siDZ6eidUCkEzBOUbCkGIig4aTyUGBYWAX6W6aXIWGGI/HlhmsqzSU0QTZjkMVpaX5sBsm1OGKVg1qdjKP0EdyqZBRLhukn8DLBQav6kccgz8OKfgBzjj6Z",23]


                                                                        Try it online!






                                                                        share|improve this answer









                                                                        $endgroup$




                                                                        Wolfram Language (Mathematica), 383 bytes



                                                                        StringPartition[Uncompress@"1:eJylVNsRwjAM44s92KBaBTZgAUZhZXqtHUuOWrgjfSRRHFlO4tyer/vjfb1clq0gHirZLRjby986hppcT5p+L3BmgJ3t4Ul4GsNyG++7YbaXLh0ZTPhXa4Sn+X/s9Qfk3Hx2cOaSIuNYaVu5laschvgzSqAjHeZBhilKgKBDEhw0upJRg+HOK4MyNC29sfbc3RV0VPDqeLiRTsG1ulExq1IitpunOa7asnYM9siDZ6eidUCkEzBOUbCkGIig4aTyUGBYWAX6W6aXIWGGI/HlhmsqzSU0QTZjkMVpaX5sBsm1OGKVg1qdjKP0EdyqZBRLhukn8DLBQav6kccgz8OKfgBzjj6Z",23]


                                                                        Try it online!







                                                                        share|improve this answer












                                                                        share|improve this answer



                                                                        share|improve this answer










                                                                        answered 6 hours ago









                                                                        J42161217J42161217

                                                                        13.9k21353




                                                                        13.9k21353























                                                                            1












                                                                            $begingroup$


                                                                            Node.js, 333 bytes



                                                                            Returns a binary string of 1,679 characters.





                                                                            _=>Buffer(")SI)=.);1K?>>>2333A3,93/I3>3)g33)AEAAI)5JQZJTddda3)*3*33+3,e)*e3)//0/1+)1C/7Cgggg3395)9)A3IY)h*IH),39+)995*)AA-)59Y)*O3Z,)//*)91**)A*-)Y+1)I11+)I1)/)5)Y*0?)+)I)-0Y)1@;_*7<gaE/a)Q7[*9HM+IY16I33)a1)*^.><I+S3.38I)*hY)7)a)Y)A,9*A5Y/A:9=9K:1I-=9)19I)9*329)GH<").map(x=>s+=(x-51&&x-41).toString(2).padStart(x-51?6:12,0),s='')&&s


                                                                            Try it online! (with formatted output)





                                                                            JavaScript (ES8), 413 bytes



                                                                            Returns a binary string of 1,679 characters.





                                                                            _=>atob('AsKoAFBQEiIlwpVVUk!!ABwo!DQ!Gg!V!Aw7g!!GHGHCi!yGjHChsK+w7vDr8K!!Q!Q!!g!/DgAHDs!AGGHDhiAgCGhjwprDu8Ovwr4!ABAw4AQAcK!MKDAD8GB8OAD!QCAQQMBAYYEAMQwABwpgAMQwBwoYEBAgEEBgEQDAIwoAgIMKAwoDCgMKABgDDgDAEdcKACAgAEHwAIXTCtgTDpMO+w6HDgcK4AsKDwrIFB8OkCgwINg!!A4IAB1FVTDoArCo!U!/CgAB/w4ADwoDDoAwAYDQBYMOMBmEUFEIkSMKARR!woQgAQB!MKUAHnDtA'.split`!`.join`AA`).replace(/[sS]/g,c=>c.charCodeAt().toString(2).padStart(8,0))


                                                                            Try it online! (with formatted output)






                                                                            share|improve this answer











                                                                            $endgroup$


















                                                                              1












                                                                              $begingroup$


                                                                              Node.js, 333 bytes



                                                                              Returns a binary string of 1,679 characters.





                                                                              _=>Buffer(")SI)=.);1K?>>>2333A3,93/I3>3)g33)AEAAI)5JQZJTddda3)*3*33+3,e)*e3)//0/1+)1C/7Cgggg3395)9)A3IY)h*IH),39+)995*)AA-)59Y)*O3Z,)//*)91**)A*-)Y+1)I11+)I1)/)5)Y*0?)+)I)-0Y)1@;_*7<gaE/a)Q7[*9HM+IY16I33)a1)*^.><I+S3.38I)*hY)7)a)Y)A,9*A5Y/A:9=9K:1I-=9)19I)9*329)GH<").map(x=>s+=(x-51&&x-41).toString(2).padStart(x-51?6:12,0),s='')&&s


                                                                              Try it online! (with formatted output)





                                                                              JavaScript (ES8), 413 bytes



                                                                              Returns a binary string of 1,679 characters.





                                                                              _=>atob('AsKoAFBQEiIlwpVVUk!!ABwo!DQ!Gg!V!Aw7g!!GHGHCi!yGjHChsK+w7vDr8K!!Q!Q!!g!/DgAHDs!AGGHDhiAgCGhjwprDu8Ovwr4!ABAw4AQAcK!MKDAD8GB8OAD!QCAQQMBAYYEAMQwABwpgAMQwBwoYEBAgEEBgEQDAIwoAgIMKAwoDCgMKABgDDgDAEdcKACAgAEHwAIXTCtgTDpMO+w6HDgcK4AsKDwrIFB8OkCgwINg!!A4IAB1FVTDoArCo!U!/CgAB/w4ADwoDDoAwAYDQBYMOMBmEUFEIkSMKARR!woQgAQB!MKUAHnDtA'.split`!`.join`AA`).replace(/[sS]/g,c=>c.charCodeAt().toString(2).padStart(8,0))


                                                                              Try it online! (with formatted output)






                                                                              share|improve this answer











                                                                              $endgroup$
















                                                                                1












                                                                                1








                                                                                1





                                                                                $begingroup$


                                                                                Node.js, 333 bytes



                                                                                Returns a binary string of 1,679 characters.





                                                                                _=>Buffer(")SI)=.);1K?>>>2333A3,93/I3>3)g33)AEAAI)5JQZJTddda3)*3*33+3,e)*e3)//0/1+)1C/7Cgggg3395)9)A3IY)h*IH),39+)995*)AA-)59Y)*O3Z,)//*)91**)A*-)Y+1)I11+)I1)/)5)Y*0?)+)I)-0Y)1@;_*7<gaE/a)Q7[*9HM+IY16I33)a1)*^.><I+S3.38I)*hY)7)a)Y)A,9*A5Y/A:9=9K:1I-=9)19I)9*329)GH<").map(x=>s+=(x-51&&x-41).toString(2).padStart(x-51?6:12,0),s='')&&s


                                                                                Try it online! (with formatted output)





                                                                                JavaScript (ES8), 413 bytes



                                                                                Returns a binary string of 1,679 characters.





                                                                                _=>atob('AsKoAFBQEiIlwpVVUk!!ABwo!DQ!Gg!V!Aw7g!!GHGHCi!yGjHChsK+w7vDr8K!!Q!Q!!g!/DgAHDs!AGGHDhiAgCGhjwprDu8Ovwr4!ABAw4AQAcK!MKDAD8GB8OAD!QCAQQMBAYYEAMQwABwpgAMQwBwoYEBAgEEBgEQDAIwoAgIMKAwoDCgMKABgDDgDAEdcKACAgAEHwAIXTCtgTDpMO+w6HDgcK4AsKDwrIFB8OkCgwINg!!A4IAB1FVTDoArCo!U!/CgAB/w4ADwoDDoAwAYDQBYMOMBmEUFEIkSMKARR!woQgAQB!MKUAHnDtA'.split`!`.join`AA`).replace(/[sS]/g,c=>c.charCodeAt().toString(2).padStart(8,0))


                                                                                Try it online! (with formatted output)






                                                                                share|improve this answer











                                                                                $endgroup$




                                                                                Node.js, 333 bytes



                                                                                Returns a binary string of 1,679 characters.





                                                                                _=>Buffer(")SI)=.);1K?>>>2333A3,93/I3>3)g33)AEAAI)5JQZJTddda3)*3*33+3,e)*e3)//0/1+)1C/7Cgggg3395)9)A3IY)h*IH),39+)995*)AA-)59Y)*O3Z,)//*)91**)A*-)Y+1)I11+)I1)/)5)Y*0?)+)I)-0Y)1@;_*7<gaE/a)Q7[*9HM+IY16I33)a1)*^.><I+S3.38I)*hY)7)a)Y)A,9*A5Y/A:9=9K:1I-=9)19I)9*329)GH<").map(x=>s+=(x-51&&x-41).toString(2).padStart(x-51?6:12,0),s='')&&s


                                                                                Try it online! (with formatted output)





                                                                                JavaScript (ES8), 413 bytes



                                                                                Returns a binary string of 1,679 characters.





                                                                                _=>atob('AsKoAFBQEiIlwpVVUk!!ABwo!DQ!Gg!V!Aw7g!!GHGHCi!yGjHChsK+w7vDr8K!!Q!Q!!g!/DgAHDs!AGGHDhiAgCGhjwprDu8Ovwr4!ABAw4AQAcK!MKDAD8GB8OAD!QCAQQMBAYYEAMQwABwpgAMQwBwoYEBAgEEBgEQDAIwoAgIMKAwoDCgMKABgDDgDAEdcKACAgAEHwAIXTCtgTDpMO+w6HDgcK4AsKDwrIFB8OkCgwINg!!A4IAB1FVTDoArCo!U!/CgAB/w4ADwoDDoAwAYDQBYMOMBmEUFEIkSMKARR!woQgAQB!MKUAHnDtA'.split`!`.join`AA`).replace(/[sS]/g,c=>c.charCodeAt().toString(2).padStart(8,0))


                                                                                Try it online! (with formatted output)







                                                                                share|improve this answer














                                                                                share|improve this answer



                                                                                share|improve this answer








                                                                                edited 6 hours ago

























                                                                                answered 7 hours ago









                                                                                ArnauldArnauld

                                                                                80.7k797334




                                                                                80.7k797334























                                                                                    0












                                                                                    $begingroup$


                                                                                    C# (Visual C# Interactive Compiler), 366 332 329 bytes





                                                                                    int i;foreach(var g in@"RШʪЬࢰӚ૒Ռ(((ب+Ȩ+Ȩ-Ȩ/ب((ౠـࠨƸീق࿦ࠇ((Ĩ*((¨)ྨG((ౘ݀࠰8ഴς࿦ࠇ((ī*+(«)ྫG+(ȩ,ī0ë8Yˆ+ƨYˆë8Ī0ȫ,Ы,Щ0Ȫ8ĨˆèƨɢبȪ(ȷШȿʃOŧய_-cȭgȭXȵШ((Ϊ(ϐսΨż(Ũ7ШgܨĈǨƨˆͨØڈǀѸʰѰҰm¨j¨h¨:Ш߇ʠ")Write(Convert.ToString(g-40,2).PadLeft(12-i++%2,'0'));


                                                                                    Can be 3 bytes less if my device supported rendering unprinatable characters.



                                                                                    Try it online!






                                                                                    share|improve this answer











                                                                                    $endgroup$


















                                                                                      0












                                                                                      $begingroup$


                                                                                      C# (Visual C# Interactive Compiler), 366 332 329 bytes





                                                                                      int i;foreach(var g in@"RШʪЬࢰӚ૒Ռ(((ب+Ȩ+Ȩ-Ȩ/ب((ౠـࠨƸീق࿦ࠇ((Ĩ*((¨)ྨG((ౘ݀࠰8ഴς࿦ࠇ((ī*+(«)ྫG+(ȩ,ī0ë8Yˆ+ƨYˆë8Ī0ȫ,Ы,Щ0Ȫ8ĨˆèƨɢبȪ(ȷШȿʃOŧய_-cȭgȭXȵШ((Ϊ(ϐսΨż(Ũ7ШgܨĈǨƨˆͨØڈǀѸʰѰҰm¨j¨h¨:Ш߇ʠ")Write(Convert.ToString(g-40,2).PadLeft(12-i++%2,'0'));


                                                                                      Can be 3 bytes less if my device supported rendering unprinatable characters.



                                                                                      Try it online!






                                                                                      share|improve this answer











                                                                                      $endgroup$
















                                                                                        0












                                                                                        0








                                                                                        0





                                                                                        $begingroup$


                                                                                        C# (Visual C# Interactive Compiler), 366 332 329 bytes





                                                                                        int i;foreach(var g in@"RШʪЬࢰӚ૒Ռ(((ب+Ȩ+Ȩ-Ȩ/ب((ౠـࠨƸീق࿦ࠇ((Ĩ*((¨)ྨG((ౘ݀࠰8ഴς࿦ࠇ((ī*+(«)ྫG+(ȩ,ī0ë8Yˆ+ƨYˆë8Ī0ȫ,Ы,Щ0Ȫ8ĨˆèƨɢبȪ(ȷШȿʃOŧய_-cȭgȭXȵШ((Ϊ(ϐսΨż(Ũ7ШgܨĈǨƨˆͨØڈǀѸʰѰҰm¨j¨h¨:Ш߇ʠ")Write(Convert.ToString(g-40,2).PadLeft(12-i++%2,'0'));


                                                                                        Can be 3 bytes less if my device supported rendering unprinatable characters.



                                                                                        Try it online!






                                                                                        share|improve this answer











                                                                                        $endgroup$




                                                                                        C# (Visual C# Interactive Compiler), 366 332 329 bytes





                                                                                        int i;foreach(var g in@"RШʪЬࢰӚ૒Ռ(((ب+Ȩ+Ȩ-Ȩ/ب((ౠـࠨƸീق࿦ࠇ((Ĩ*((¨)ྨG((ౘ݀࠰8ഴς࿦ࠇ((ī*+(«)ྫG+(ȩ,ī0ë8Yˆ+ƨYˆë8Ī0ȫ,Ы,Щ0Ȫ8ĨˆèƨɢبȪ(ȷШȿʃOŧய_-cȭgȭXȵШ((Ϊ(ϐսΨż(Ũ7ШgܨĈǨƨˆͨØڈǀѸʰѰҰm¨j¨h¨:Ш߇ʠ")Write(Convert.ToString(g-40,2).PadLeft(12-i++%2,'0'));


                                                                                        Can be 3 bytes less if my device supported rendering unprinatable characters.



                                                                                        Try it online!







                                                                                        share|improve this answer














                                                                                        share|improve this answer



                                                                                        share|improve this answer








                                                                                        edited 6 hours ago

























                                                                                        answered 7 hours ago









                                                                                        Embodiment of IgnoranceEmbodiment of Ignorance

                                                                                        2,886127




                                                                                        2,886127






























                                                                                            draft saved

                                                                                            draft discarded




















































                                                                                            If this is an answer to a challenge…




                                                                                            • …Be sure to follow the challenge specification. However, please refrain from exploiting obvious loopholes. Answers abusing any of the standard loopholes are considered invalid. If you think a specification is unclear or underspecified, comment on the question instead.


                                                                                            • …Try to optimize your score. For instance, answers to code-golf challenges should attempt to be as short as possible. You can always include a readable version of the code in addition to the competitive one.
                                                                                              Explanations of your answer make it more interesting to read and are very much encouraged.


                                                                                            • …Include a short header which indicates the language(s) of your code and its score, as defined by the challenge.



                                                                                            More generally…




                                                                                            • …Please make sure to answer the question and provide sufficient detail.


                                                                                            • …Avoid asking for help, clarification or responding to other answers (use comments instead).





                                                                                            draft saved


                                                                                            draft discarded














                                                                                            StackExchange.ready(
                                                                                            function () {
                                                                                            StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2fcodegolf.stackexchange.com%2fquestions%2f182924%2foutput-the-arecibo-message%23new-answer', 'question_page');
                                                                                            }
                                                                                            );

                                                                                            Post as a guest















                                                                                            Required, but never shown





















































                                                                                            Required, but never shown














                                                                                            Required, but never shown












                                                                                            Required, but never shown







                                                                                            Required, but never shown

































                                                                                            Required, but never shown














                                                                                            Required, but never shown












                                                                                            Required, but never shown







                                                                                            Required, but never shown







                                                                                            Popular posts from this blog

                                                                                            Identifying “long and narrow” polygons in with PostGISlength and width of polygonWhy postgis st_overlaps reports Qgis' “avoid intersections” generated polygon as overlapping with others?Adjusting polygons to boundary and filling holesDrawing polygons with fixed area?How to remove spikes in Polygons with PostGISDeleting sliver polygons after difference operation in QGIS?Snapping boundaries in PostGISSplit polygon into parts adding attributes based on underlying polygon in QGISSplitting overlap between polygons and assign to nearest polygon using PostGIS?Expanding polygons and clipping at midpoint?Removing Intersection of Buffers in Same Layers

                                                                                            Masuk log Menu navigasi

                                                                                            อาณาจักร (ชีววิทยา) ดูเพิ่ม อ้างอิง รายการเลือกการนำทาง10.1086/39456810.5962/bhl.title.447410.1126/science.163.3863.150576276010.1007/BF01796092408502"Phylogenetic structure of the prokaryotic domain: the primary kingdoms"10.1073/pnas.74.11.5088432104270744"Towards a natural system of organisms: proposal for the domains Archaea, Bacteria, and Eucarya"1990PNAS...87.4576W10.1073/pnas.87.12.4576541592112744PubMedJump the queueexpand by handPubMedJump the queueexpand by handPubMedJump the queueexpand by hand"A revised six-kingdom system of life"10.1111/j.1469-185X.1998.tb00030.x9809012"Only six kingdoms of life"10.1098/rspb.2004.2705169172415306349"Kingdoms Protozoa and Chromista and the eozoan root of the eukaryotic tree"10.1098/rsbl.2009.0948288006020031978เพิ่มข้อมูล