Escriba un programa que imprima su propio código fuente al revés, en otras palabras, un eniuq .

Puntuación:

• +50 si usa datos de extracción de Internet.
• +25 si lees tu propio código fuente.
• +1 punto por personaje
• La puntuación más baja gana.

Reglas:

• No usar otros archivos (p reverse.txt. Ej. )
• La longitud mínima del código es de dos caracteres.
• Su programa no puede ser un palíndromo.

GolfScript - 2

1

(es decir, \n1dónde \nestá el carácter de nueva línea)

Salida:

1

(es decir 1\n)

Para citar a Ilmari :

GolfScript agrega automáticamente una nueva línea al final de la salida

Por lo tanto, una nueva línea seguida de un número imprimirá el número seguido de una nueva línea.

eh? , 5 caracteres

!hcuO

En realidad, NO tengo idea de cómo funciona, pero si descargas el intérprete y escribes !hcuO, entonces obtienesOuch!

Para ejecutar esto, debe ejecutar el programa así:

huh.exe !hcuO

En realidad buscará un archivo llamado !hcuO, pero no existe, por lo que generaOuch!

Mathematica, 3 caracteres

a 2

a 2significa aveces 2. Entonces la respuesta es 2 a.

H9 + , 13 caracteres

!dlrow ,olleH

Como dice la página web, todos los caracteres que no son H, 9o +son ignorados, entonces mi programa imprimiráHello, world!

Javascript: 34 caracteres

reifitnedi detcepxenU :rorrExatnyS

salidas SyntaxError: Unexpected identifier, al menos en la consola de Chrome

Pitón, 43 41

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

Mathematica, 2 bytes

1#

Salidas:

# 1

TI-BASIC, 2

i2

¿Dónde iestá el número imaginario?

Salidas 2i

BÁSICO, 22 12 7 caracteres

:-)

1 enil ni rorre xatnyS

EDITAR: si se le permite ingresar al programa en modo inmediato, esto podría reducirse a rorre xatnyS(12 caracteres).

En BBC BASIC, solo necesitas 7 caracteres:

ekatsiM

C ++ 472 caracteres

Muchos personajes, pero no puedo pensar en una forma más simple en un lenguaje basado en 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#");}

golpetazo

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

Longitud: 31 caracteres.

sh

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

Longitud: 29 caracteres.

Este no podría funcionar en algunas distribuciones de Linux, pero funciona en OSX.

tcsh

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

Longitud: 26 caracteres.

csh

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

Longitud: 26 caracteres.

El ganador es:

ksh

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

Longitud: 21 caracteres.

Lo anterior debería funcionar en todos los sistemas operativos basados ​​en * unix.

GolfScript, 12 caracteres

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

Este código toma la cadena entre comillas dobles "-1%.`", la invierte ( -1%), la duplica ( .) y anula la evaluación ( `) de la segunda copia, restaurando las comillas dobles a su alrededor.

Entrada anterior (13 caracteres):

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

Basado en el quine {'.~'}.~de 8 caracteres de esta respuesta ; los 5 caracteres adicionales son necesarios para stringificar e invertir la salida.

PD. Tenga en cuenta que GolfScript agrega automáticamente una nueva línea al final de la salida. Si esto se cuenta como parte de la salida, se puede agregar una nueva línea correspondiente a cualquier versión del código sin afectar la salida, por un costo de un carácter adicional.

Befunge 98-10 caracteres

"8k,'!1+,@

Esto funciona si su intérprete no interpreta las líneas ajustadas después de "agregar un espacio adicional. Si su intérprete interpreta líneas ajustadas así, entonces esta solución de 11 caracteres funciona ( porque los espacios duplicados en un literal de cadena se interpretan como uno ):

"9k,'!1+,@ 

Si puedo usar gsin penalización, entonces estos también funcionan (7 y 8 caracteres respectivamente):

"5k,g,@

y

"6k,g,@ 

Rubí, 60

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

Basado en un clásico rubí quine.

Perl, 41

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

Antigua respuesta de 52 caracteres (27 + 25 penalizaciones)

open+0;print ~~ reverse <0>

Lee su propia fuente, almacena el reverso en un escalar e imprime eso.

Fisión , 6 bytes.

Un caso raro de una quina generalizada que tiene la misma longitud que la quina normal :

"LO+!'

La idea es la misma que la del quine normal, pero estamos usando un átomo a la izquierda (comenzando en L) para que el modo de impresión atraviese el código en el orden opuesto.

J: 26

Comillas estándar (26 caracteres) : definiendo una función y pasándola su propia definición, entre comillas:

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

Probablemente podría hacerse más corto.

Específico J (33 caracteres) : definiendo una variable y preguntando en qué archivo se definió la variable, es decir, este, y luego imprimiendo el contenido de ese archivo:

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

Debe guardarse y ejecutarse desde un script (es decir, no en el REPL, porque la respuesta a la pregunta es "su argumento no se definió en un archivo", por lo que no hay ningún archivo para leer).

> <> , 25 bytes

Me sorprendió descubrir que esto aún no se había hecho. :)

...yhsif sllems gnihtemoS

Pegue el código aquí y ejecútelo.

.es el comando Saltar, aparece xy ysale de la pila, y mueve la IP al (x, y)cuadro de código. En este caso, la pila está vacía, por lo que se imprime el único mensaje de error del idioma:

Something smells fishy...

Microscript , 11 bytes

Como que tuve que hacer esto.

0"Caxq"Caxq

Sorprendentemente, esto es en realidad más corto que la quine verdadera más corta conocida del lenguaje. qy ason equivalentes, excepto que qagrega comillas de ajuste mientras aque no.

JavaScript jQuery 119 92 74 70 caracteres

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

Ahora usando jQuery, como minitech sugirió en los comentarios, y envolviendo manualmente <pre><code>para que pueda usar text()sin temor a que otros bloques de código en esta publicación interfieran. <h4>Cuando lo probé, envolverlo manualmente era incompatible con el cromo, por lo que ahora debería funcionar en la mayoría de los navegadores.

Este programa, si se ejecuta desde esta página, encuentra el bloque de código directamente arriba, invierte su contenido y lo coloca en un cuadro de alerta.

Es bastante fácil de verificar, solo pégalo en la consola de desarrollo.

PHP, 41 caracteres (+25)

No sé si entendí la tarea correctamente. Pero aquí hay un intento de PHP:

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

editar: esto puede ser mucho más corto:

echo strrev(file_get_contents(__FILE__));

Pero como puede ser así de simple, probablemente esto no sea lo que se pregunta ...

MATLAB, 78 caracteres:

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

Tenga en cuenta que la solución requiere que comience con un carácter especial (alt + 0160) y que imprima exactamente el mensaje invertido. (A diferencia de la solución de Python)

UNIX shell, 31

Solución real a 52 caracteres:

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

¡Pero cuidado! ¡La honestidad no vale la pena en el mundo de hoy! ¡La penalización es demasiado baja!

6 caracteres + 25 = 31:

rev $0

MS-DOS, 24 bytes

eman elif ro dnammoc daB

Salida:

Bad command or file name

JavaScript, 62

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

Funciona para mí en el último Chrome (v 31.0.1650.63). Algunos otros navegadores pueden dar un resultado diferente. (Si invierte esa salida, entonces funcionaría: P)

SmileBASIC, 118 102 bytes

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 bytes

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

Poner en una página html en blanco para evitar conflictos con otras etiquetas.

JavaScript, 53 50 46 43 bytes

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``)()

Por favor, ayúdame a acortar esto.

Guacamole Octo Fuzzy, 4 bytes

KNU_

Kimpresiones _UNK, Nempujes Noney Uempujes 0. Y _muestra el valor superior en la pila (pero no se imprime). Tan solo _UNKse imprime.