Mój ojciec, który był naprawdę dobrym APLerem i nauczył mnie wszystkich podstaw APL (i wielu innych), zmarł tego dnia, pięć lat temu. W ramach przygotowań do 50-lecia APL znalazłem ten list patentowy (przetłumaczony dla wygody tych, którzy nie czytają duńskiego) na odręczne logo. Wyjaśnia główny powód, dla którego APL nigdy nie zdobywa dużej bazy użytkowników - powód, który oczywiście dotyczy również wszystkich niesamowitych języków golfowych tej społeczności:

A 3497/77 Req. 29 ^th sierpnia 1977 na 13

Henri Brudzewsky, firma konsultingowa ds. Inżynierii, Mindevej 28, Søborg,

klasa 9 , w tym komputery, zwłaszcza komputery kodowane APL,
klasa 42: firma pośrednictwa IT, szczególnie podczas korzystania z komputerów kodowanych APL.

Zadanie

Tworzenie nieskończenie powtarzającego się tekstu EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS bez nowych linii. Możesz rozpocząć tekst od EASIERlub FASTERlub FEWER.

05AB1E , 25 bajtów

[‘æƒËRSˆ¾¥ƒŽÁˆ¾¡ŸÂ ‘?

Wypróbuj online!

Wyjaśnienie:

[‘æƒËRSˆ¾¥ƒŽÁˆ¾¡ŸÂ ‘?
[                         Start infinite loop
 ‘æƒËRSˆ¾¥ƒŽÁˆ¾¡ŸÂ ‘   Push the compressed string in uppercase, starting from FEWER, with a trailing space
                        ?  Print without trailing newline

SVG (HTML5), 336 bajtów

<svg width=500 height=500><defs><path id=p d=M49,250a201,201,0,0,1,402,0a201,201,0,0,1,-402,0></defs><text font-size="32"><textPath xlink:href=#p>EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS</textPath><animateTransform attributeName=transform type=rotate from=360,250,250 to=0,250,250 dur=9s repeatCount=indefinite>

Edycja: Niektóre osoby odkryły, że czcionka nie pasuje do nich, więc oto wersja, która umożliwia dostosowanie kilku pikseli:

<p><input type=number value=0 min=0 max=9 oninput=p.setAttribute('d','M250,250m20_,0a20_,20_,0,1,1,-20_,-20_a20_,20_,0,1,1,-20_,20_a20_,20_,0,1,1,20_,20_a20_,20_,0,1,1,20_,-20_'.replace(/_/g,this.value))></p>
<svg width=500 height=500><defs><path id=p d=M250,250m200,0a200,200,0,1,1,-200,-200a200,200,0,1,1,-200,200a200,200,0,1,1,200,200a200,200,0,1,1,200,-200></defs><text font-size="32"><textPath xlink:href=#p>EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS</textPath><animateTransform attributeName=transform type=rotate from=360,250,250 to=0,250,250 dur=9s repeatCount=indefinite>

PHP, 76 bajtów

for(;;)echo strtr(EASI0MMUNICATION1FAST0DING1FEW0DERS1,["ER CO"," MEANS "]);

Wypróbuj online!

Vim 69 bajtów

qqAFEWER CODERS MEANS EASIER COMMUNICATION M<C-n> FASTER CODING M<C-n> <esc>@qq@q

HTML, 122 bajty.

Przepraszam, nie mogę się powstrzymać.

<marquee style="width:5em;word-spacing:5em;">EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS </marquee>

Python 2 , 82 81 bajtów

-1 bajt dzięki Dziurawej Zakonnicy.

Prawdopodobnie robię coś złego, ale jest naprawdę późno, więc. Zwróć uwagę na przecinek końcowy.

while 1:print'FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS',

Wypróbuj online!

Inne rozwiązanie, 85 bajtów

Prawdopodobnie mogę dalej grać w golfa.

while 1:print'%sER CO%s MEANS'*3%('FEW','DERS',' EASI','MMUNICATION',' FAST','DING'),

Wypróbuj online!

Galaretka , 33 29 bajtów

4 bajty dzięki Erikowi Outgolfer.

“©%5ÐƬwȮh¬Þ6.⁷ḷḊḥṫɠlḶṀġß»Œu⁶¢

Wypróbuj online!

Brachylog , 70 bajtów

"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "w↰

Wypróbuj online!

Jak to działa

"..."w↰
"..."     generate the string "..."
     w    print to STDOUT without trailing newline
      ↰   do the whole thing all over again

HTML / CSS (tylko Firefox), 179 177 183 176 173 bajtów

<b id=a>EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS </b>E<a><style>*{margin:0;}a{position:fixed;left:0;right:0;height:1em;background:-moz-element(#a)}

Z pewnością nigdzie w pobliżu najniższych wyników, pomyślałem tylko, że fajnie byłoby uzyskać nieskończoną liczbę powtórzeń w HTML / CSS, bez udziału JS :)

Dziennik zmian:

• Usunięto cudzysłowy wokół atrybutu id
• dodano „okrągłe” powtarzanie tła, aby rozciągnąć tekst tak, aby był poprawnie zawijany
• zmieniono na wyjście jednowierszowe
• zamień width:100%styl na, right:0aby zaoszczędzić 3 bajty

Python 3 , 87 bajtów

while 1:print(end="FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS ")

Wypróbuj online!

C (gcc) , 92 bajty

main(){for(;printf("FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "););}

Wypróbuj online!

LOLCODE , 116 bajtów

HAI 1
IM IN YR O
VISIBLE "FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "!
IM OUTTA YR O
KTHXBYE

Wypróbuj online!

Rubinowy, 77 bajtów

przypisanie " MEANS "do zmiennej zapisanej wszystkie 1 bajt :-)

loop{$><<"EASIER COMMUNICATION#{m=" MEANS "}FASTER CODING#{m}FEWER CODERS"+m}

JavaScript (ES6), 90 87 bajtów

while(1)console.log`EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS `

Funkcjonująca alternatywa, 100 bajtów

„Funkcjonowanie” tutaj oznacza „nie spowoduje awarii przeglądarki” (przynajmniej przez jakiś czas)!

setInterval(_=>console.log`EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS `,1)

Befunge , 73 bajty

" SNAEM GNIDOC RETSAF SNAEM NOITACINUMMOC REISAE SNAEM SREDOC REWEF">:#,_

Wypróbuj online!

Oktawa, 86 bajtów

while fprintf('FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS ')end

Wyjaśnienie:

Jest to dość oczywiste. Jedyną prawdziwą „sztuczką” tutaj jest użycie while fprintf. Gdy fprintfpodany zostanie argument return, zwróci liczbę wydrukowanych znaków, a wszystkie niezerowe liczby są uwzględniane truew Octave, więc warunek pętli zawsze będzie prawdziwy.

Desperacko próbowałem skrócić to bardziej interesujące podejście, ale okazało się, że jest o 9 bajtów dłuższe, niestety:

while fprintf('FEW%sDERS%sEASI%sMMUNICATION%sFAST%sDING%s',{'ER CO',' MEANS '}{'ababab'-96})end

Próbuje wstawić ciągi 'ER CO'i ' MEANS'ciąg w odpowiednich miejscach, używając bezpośredniego indeksowania, gdzie 'ababab'-96jest krótsza wersja [1 2 1 2 1 2].

To było nieco krótsze (93 bajty), ale wciąż dłuższe niż naiwne podejście

while fprintf('FEWER CODERS%sEASIER COMMUNICATION%sFASTER CODING%s',{' MEANS '}{[1,1,1]})end

I jeszcze jeden (89 bajtów), stosując podejście Level River St:

while fprintf(['FEWER CODERS',s=' MEANS ','EASIER COMMUNIDATION',s,'FASTER CODING',s])end

Powinno to działać teoretycznie, o jeden bajt mniej niż oryginalne rozwiązanie, ale z jakiegoś dziwnego powodu zawodzi:

while fprintf"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "
end

Korzysta z funkcji buggy, która fprintf('abc def')jest równoważna fprintf"abc def". endMusi być w następnej linii, ale to wciąż jeden bajt krótszy od dwa nawiasy są pomijane.

I jeszcze jeden za 87:

while fprintf('FEWER CODERS%sEASIER COMMUNICATION%sFASTER CODING%s',k=' MEANS ',k,k)end

Nie mów, że nie próbowałem :)

Alice , 70 bajtów

" SNAEM "k"SREDOC REWEF"e0j"GNIDOC RETSAF"e0j"NOITACINUMMOC REISAE"d&o

Wypróbuj online!

Wyjaśnienie

Niestety ponowne użycie MEANS(ze spacjami) oszczędza tylko jeden bajt, po prostu drukując całość za jednym zamachem. W związku z tym wyodrębnienie ER COfaktycznie kosztowałoby bajt (lub prawdopodobnie więcej, ponieważ wyodrębnienie innej sekcji byłoby nieco droższe).

" SNAEM "                Push the code points of " MEANS " in reverse.
k                        If there is a return address on the return address stack (which
                         there isn't right now), pop it and jump there.
"SREDOC REWEF"           Push the code points of "FEWER CODERS" in reverse.
e0j                      Jump to the beginning of the line, pushing the location of the
                         j to the return address stack. Hence, we push the code points
                         of " MEANS " again, but then the k pops the return address and
                         jumps back here.
"GNIDOC RETSAF"          Push the code points of "FASTER CODING" in reverse.
e0j                      Jump to the beginning of the line again.
"NOITACINUMMOC REISAE"   Push the code points of "EASIER COMMUNICATION" in reverse.
d                        Push the stack depth.
&o                       Print that many bytes from the top of the stack.
                         Afterwards the IP wraps around to the first column and the
                         program starts over.

C #, 102 bajty

_=>{for(;;)System.Console.Write("EASIER COMMUNICATION{0}FASTER CODING{0}FEWER CODERS{0}"," MEANS ");};

Pyth , 69 bajtów

Wp"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS 

Wypróbuj online!

Jak to działa

Wp"...
W       while the following is true: (do nothing)
 p      print the following and return the following
  "...

Lua , 92 bajty

while 1 do io.write("FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS ")end

Wypróbuj online!

Java (OpenJDK 9) , 114 bajtów

static void f(){while(1>0)System.out.print("FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS ");}

Wypróbuj online! Zatrzymaj wykonanie po kilku sekundach, ponieważ nie wiadomo, kiedy zatrzymać.

C, 86 bajtów

f(){printf("FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS ");f();}

Zobacz, jak działa online .

bc , 76 bajtów

while(1)"EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS "

Perl 6 ,  81 80  79 bajtów

print ('EASIER COMMUNICATION','FASTER CODING','FEWER CODERS'X'MEANS'),' 'for ^Inf

Spróbuj

loop {print ('EASIER COMMUNICATION','FASTER CODING','FEWER CODERS'X'MEANS'),' '}

Spróbuj

loop {print [~] 'EASIER COMMUNICATION','FASTER CODING','FEWER CODERS'X'MEANS '}

Spróbuj

MATL , 68 bajtów

`'EASIER COMMUNICATION*FASTER CODING*FEWER CODERS*'42' MEANS 'Zt&YDT

Wypróbuj online!

Wyjaśnienie

`                                                     % Do...while
  'EASIER COMMUNICATION*FASTER CODING*FEWER CODERS*'  %   Push this string
  42                                                  %   Push 42 (ASCII for '*')
  ' MEANS '                                           %   Push this string  
  Zt                                                  %   String replacement
  &YD                                                 %   printf to STDOUT
  T                                                   %   Push true as loop condition
                                                      % End (implicit)

Axiom, 92 89 bajtów

repeat fortranLiteral"EASIER COMMUNICATION MEANS FASTER CODING MEANS FEWER CODERS MEANS "

wstaw w jednym wierszu do okna Axiom. Możliwe, że istnieje jedna funkcja krótsza niż „fortranLiteral”, która nie pisze „\ n”

Braingolf , 78 bajtów

"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "[!@66<1+>]

lub

Braingolf , 77 bajtów [niekonkurujących]

"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "[!&@<1+>]

Ten nie konkuruje, ponieważ musiałem naprawić 2 błędy dotyczące używania chciwego modyfikatora ( &) z operatorem char print ( @)

Puste , 267 bajtów

[70][69][87][69][82][32][67][79][68][69][82][83][32][77][69][65][78][83][32][69][65][83][73][69][82][32][67][79][77][77][85][78][73][67][65][84][73][79][78][32][77][69][65][78][83][32][70][65][83][84][69][82][32][67][79][68][73][78][71][32][77][69][65][78][83][32]{p}

Przesuwa FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANSna stos, a następnie drukuje. Nigdy nie kończy się jako nie{@}

Ciekawostką jest, że do wygenerowania tego kodu użyłem następującego skryptu Braingolf

"FEWER CODERS MEANS EASIER COMMUNICATION MEANS FASTER CODING MEANS "l>[<$_<91+2^9-@_ 91+2^7-@l>]"{p}"@3

Groovy 79 bajtów

m=" MEANS";for(;;)print"EASIER COMMUNICATION$m FASTER CODING$m FEWER CODERS$m "

Wykorzystuje interpolację ciągów Groovy'ego.

PowerShell , 100 97 bajtów

for(){"EASIER COMMUNICATION","FASTER CODING","FEWER CODERS"|%{Write-Host -NoNewLine "$_ MEANS "}}

Wypróbuj online!

Starsza odpowiedź:

PowerShell , 100 bajtów

while(1){"EASIER COMMUNICATION","FASTER CODING","FEWER CODERS"|%{Write-Host -NoNewLine "$_ MEANS "}}

Wypróbuj online!

PowerShell jest trochę trudny do tego, ponieważ większość godnych sposobów wyświetlania na konsoli również wstawia nowy wiersz. Write-Hostjest z tego powodu wymagany. Nadal jednak pokazuje, w jaki sposób potok może skrócić ślad kodowania.

Będziesz musiał zatrzymać wykonanie po krótkim czasie, ponieważ nie zwróci, ponieważ jest to nieskończona pętla.

Edycja: wygolono 3 bajty, zmieniając whilepętlę na forpętlę.