Napisz program, który wypisuje swój kod źródłowy do tyłu, innymi słowy eniuq .

Punktacja:

• +50, jeśli używasz ściągania danych z Internetu.
• +25, jeśli czytasz swój własny kod źródłowy.
• +1 punkt za postać
• Najniższy wynik wygrywa.

Zasady:

• Brak korzystania z innych plików (np. reverse.txt)
• Minimalna długość kodu to dwa znaki.
• Twój program nie może być palindromem.

GolfScript - 2

1

(tzn. \n1gdzie \njest znak nowej linii)

Wynik:

1

(tj. 1\n)

Cytując Ilmari :

GolfScript automatycznie dołącza nowy wiersz na końcu wyniku

Zatem nowa linia, po której następuje liczba, wydrukuje liczbę, po której nastąpi nowa linia.

co? , 5 znaków

!hcuO

Właściwie nie mam pojęcia, jak to działa, ale jeśli pobierzesz tłumacza, a jeśli napiszesz !hcuO, otrzymaszOuch!

Aby to uruchomić, musisz uruchomić program w następujący sposób:

huh.exe !hcuO

Będzie szukał pliku o nazwie !hcuO, ale nie istnieje, więc wyświetla dane wyjścioweOuch!

Mathematica, 3 znaki

a 2

a 2oznacza aczasy 2. Tak więc odpowiedź brzmi 2 a.

H9 + , 13 znaków

!dlrow ,olleH

Jako strona mówi, wszystkie znaki, które nie są H, 9lub +są ignorowane, więc mój program wypiszeHello, world!

JavaScript: 34 znaki

reifitnedi detcepxenU :rorrExatnyS

wyjścia SyntaxError: Unexpected identifier, przynajmniej w konsoli Chrome

Python, 43 41

_=']0~::[_%%_ tnirp;%r=_';print _%_[::~0]

Mathematica, 2 bajty

1#

Wyjścia:

# 1

TI-BASIC, 2

i2

Gdzie ijest liczba urojona.

Wyjścia 2i

PODSTAWOWY, 22 12 7 znaków

:-)

1 enil ni rorre xatnyS

EDYCJA: Jeśli możesz wejść do programu w trybie natychmiastowym, możesz to zmniejszyć do rorre xatnyS(12 znaków).

W BBC BASIC potrzebujesz tylko 7 znaków:

ekatsiM

C ++ 472 znaków

Wiele znaków, ale nie mogę wymyślić prostszego sposobu w języku opartym na c.

#include<iostream>
#include<string.h>
#define p(t) std::cout<<'}'<<';'<<')'<<strrev(&std::string(#t)[0])<<t;
char* strrev(char*p){char*t=p;char*q=p;while(q&&*q)++q;for(--q;p<q;++p,--q)*p=*p^*q,*q=*p^*q,*p=*p^*q;return t;}
int main(){p("(p{)(niam tni};t nruter;q*^p*=p*,q*^p*=q*,q*^p*=p*)q--,p++;q<p;q--(rof;q++)q*&&q(elihw;p=q*rahc;p=t*rahc{)p*rahc(verrts *rahc;t<<)]0[)t#(gnirts::dts&(verrts<<')'<<';'<<'}'<<tuoc::dts )t(p enifed#>h.gnirts<edulcni#>maertsoi<edulcni#");}

grzmotnąć

$ dnuof ton dnammoc :found :hsab-
-bash: dnuof: command not found

Długość: 31 znaków.

sh

$ dnuof ton dnammoc :found :hs-
sh: dnuof: command not found

Długość: 29 znaków.

Ten nie mógł działać w niektórych dystrybucjach Linuksa, ale działa na OSX.

tcsh

$ .dnuof ton dnammoC :found.
.dnuof: Command not found.

Długość: 26 znaków.

csh

% .dnuof ton dnammoC :found.
.dnuof: Command not found.

Długość: 26 znaków.

Zwycięzcą jest:

ksh

$ dnuof ton :found :hsk
ksh: dnuof: not found

Długość: 21 znaków.

Powyżej powinno działać na wszystkich * systemach operacyjnych opartych na Uniksie.

GolfScript, 12 znaków

"-1%.`"-1%.`

Ten kod pobiera ciąg cudzysłowu "-1%.`", odwraca go ( -1%), duplikuje ( .) i un-evals ( `) drugą kopię, przywracając wokół niej podwójne cudzysłowy.

Poprzedni wpis (13 znaków):

{`'.~'+-1%}.~

Na podstawie 8-znakowego quine {'.~'}.~z tej odpowiedzi ; dodatkowe 5 znaków jest potrzebnych do usztywnienia i odwrócenia wyjścia.

Ps. Zauważ, że GolfScript automatycznie dołącza nowy wiersz na końcu wyniku. Jeśli jest to liczone jako część wyniku, odpowiedni znak nowej linii może zostać dołączony do dowolnej wersji kodu bez wpływu na wynik, za koszt jednego dodatkowego znaku.

Befunge 98-10 znaków

"8k,'!1+,@

Działa to, jeśli Twój tłumacz nie interpretuje owiniętych linii po "dodaniu dodatkowej spacji. Jeśli Twój interpreter interpretuje takie zawinięte linie, to działa to 11-znakowe rozwiązanie ( ponieważ zduplikowane spacje w literałach łańcuchowych są interpretowane jako jeden ):

"9k,'!1+,@ 

Jeśli mogę używać gbez kary, to one również działają (odpowiednio 7 i 8 znaków):

"5k,g,@

i

"6k,g,@ 

Ruby, 60 lat

puts(2,s=<<2.chop.reverse,s)
puts(2,s=<<2.chop.reverse,s)
2

Oparty na klasycznym rubinowym quine.

Perl, 41

$_=q{print~~reverse"\$_=q{$_};eval"};eval

Stara odpowiedź 52 znaków (kara 27 + 25)

open+0;print ~~ reverse <0>

Odczytuje własne źródło, przechowuje odwrotną stronę w skalarie i drukuje to.

Rozszczepienie , 6 bajtów

Rzadki przypadek uogólnionego quinu o tej samej długości co normalny quine :

"LO+!'

Pomysł jest taki sam, jak w przypadku normalnego quine, ale używamy lewostronnego atomu (zaczynając od L), aby tryb drukowania przechodził przez kod w odwrotnej kolejności.

J: 26

Standardowe quining (26 znaków) : definiując funkcję i przekazując jej własną definicję, w cudzysłowach:

|.(,],2#{:)'|.(,],2#{:)'''

Prawdopodobnie może być krótszy.

Specyficzne dla J (33 znaki) : definiując zmienną i pytając, w jakim pliku zmienna została zdefiniowana, tj. Ten, a następnie drukując zawartość tego pliku:

1!:2&2|.1!:1(4!:4 a=:<'a'){4!:3''

Należy go zapisać i uruchomić ze skryptu (tj. Nie z REPL, ponieważ wtedy odpowiedź na pytanie brzmi „twój argument nie został zdefiniowany w pliku”, więc nie ma pliku do odczytania).

> <> , 25 bajtów

Byłem zaskoczony, gdy stwierdziłem, że jeszcze tego nie zrobiono. :)

...yhsif sllems gnihtemoS

Wklej kod tutaj i uruchom go.

.jest polecenie Jump, popping xi yze stosu i przenoszenia IP, aby (x, y)w oknie kodu. W takim przypadku stos jest pusty, dlatego drukowany jest jedyny komunikat o błędzie języka:

Something smells fishy...

Microscript , 11 bajtów

W pewnym sensie musiałem to zrobić.

0"Caxq"Caxq

Co zaskakujące, jest to w rzeczywistości krótszy niż najkrótszy znany prawdziwy quine języka. qi asą w inny sposób równoważne, z wyjątkiem tego, że qdodaje zawijanie cytatów, podczas gdy anie.

JavaScript jQuery 119 92 74 70 znaków

alert($("#answer-16051 pre code").text().split("").reverse().join(""))

Teraz korzystam z jQuery, jak sugeruje minitech w komentarzach, i ręcznie pakuję, dzięki <pre><code>czemu mogę używać text()bez obawy, że inne bloki kodu w tym poście będą przeszkadzać. <h4>Podczas testowania ręczne owijanie za pomocą nie było zgodne z chromem, więc teraz powinno działać w większości przeglądarek.

Ten program, jeśli zostanie uruchomiony z tej strony, znajduje blok kodu bezpośrednio powyżej, odwraca jego zawartość i umieszcza go w polu alertów.

Łatwo to zweryfikować, wystarczy wkleić go do konsoli programisty.

PHP, 41 znaków (+25)

Nie wiem, czy poprawnie zrozumiałem zadanie. Ale oto próba PHP:

while(!isset($s) || $s) echo isset($s) ? array_pop($s) : ($s = str_split(file_get_contents(__FILE__)) and null);

edycja: może być znacznie krótszy:

echo strrev(file_get_contents(__FILE__));

Ale ponieważ może to być takie proste, prawdopodobnie nie o to pyta się ...

MATLAB, 78 znaków:

 
|
.snoisserpxe ro stnemetats BALTAM ni dilav ton si retcarahc tupni ehT :rorrE

Zauważ, że rozwiązanie wymaga rozpoczęcia od znaku specjalnego (alt + 0160) i że drukuje dokładnie odwrócony komunikat. (W przeciwieństwie do rozwiązania python)

Powłoka UNIX, 31

Prawdziwe rozwiązanie przy 52 znakach:

A='printf "A$ lave;\047`echo $A|rev`\047=A"';eval $A

Ale strzeż się! Uczciwość nie opłaca się w dzisiejszym świecie! Kara jest za niska !!

6 znaków + 25 = 31:

rev $0

MS-DOS, 24 bajty

eman elif ro dnammoc daB

Wynik:

Bad command or file name

JavaScript, 62

function f(){alert((f+'f()').split('').reverse().join(''))}f()

Działa dla mnie w najnowszym Chrome (v 31.0.1650.63). Niektóre inne przeglądarki mogą dawać inne wyniki. (Jeśli odwrócisz to wyjście, to zadziała: P)

SmileBASIC, 118 102 bajtów

FOR I=-101TO.?MID$(("+CHR$(34))*3,30,102)[-I];:NEXTFOR I=-100TO.?MID$(("+CHR$(34))*3,30,102)[-I];:NEXT

JavaScript, 56

($=_=>_!=$._?_?$(_.slice(1))+_[0]:')':$('($='+$+')('))()

CSS, 88 bajtów

<style>:before,*{display:block;unicode-bidi:bidi-override;direction:rtl;content:'<style>

Umieść pustą stronę HTML, aby uniknąć konfliktu z innymi tagami.

JavaScript, 53 50 46 43 bajty

q=_=>("q="+q+";q()").split("").reverse().join("");q()

(q=_=>`(q=${q})()`.split("").reverse().join(""))()

(q=_=>`(q=${q})()`.split``.reverse().join``)()

(q=_=>[...`(q=${q})()`].reverse().join``)()

Pomóż mi to skrócić.

Rozmyte Octo Guacamole, 4 bajty

KNU_

Kdrukuje _UNK, Npopycha Nonei Upopycha 0. I _wyświetla najwyższą wartość na stosie (ale nie drukuje). Więc tylko _UNKjest drukowane.