Vitsy, 10 27 bytes
'rddd++&"rdd8++a[v}v1-D);].
Se :
fosse permitido, eu poderia reduzi-lo para 11 bytes. :(
Explicação:
'rddd++&"rdd8++a[v}v1-D);].
' Capture all instructions as a string until encountering
' again, looping if necessary.
r Reverse the current stack (output is top-down).
ddd++ Push char literal ' to the stack.
& Push a new stack to the stack stack.
" Same as ', but " specific.
r Reverse the current stack.
dd8++ Push char literal " to the stack.
a Push 10 to the stack.
[ ] Loop forever.
v Capture the top value as a variable.
} Take the bottom item of the stack and put it on the top.
v Dump the variable to the stack.
1- Subtract 1.
D Duplicate the top item.
); Pop n; if n is 0, exit the loop.
a[v v1-D);] This is a makeshift for loop with 10 iterations.
. Pop the top stack as n, and the second stack as o.
Write a file called "n" with the contents of "o".
As duas pilhas serão idênticas no final. Em algumas versões Java, isso pode ocorrer FileNotFoundException
devido a diferentes implementações da FileInputStream
classe.
Resposta anterior antes da edição:
&'rddd++}.
Explicação:
& Push a new stack to the stack stack.
'rddd++ Modified standard quine.
} Move the ' to the right place.
. Pop the top stack as n, and the second stack as o. Write a file called
"n" with the contents of "o". (Quine name, no content)
Como eu também poderia, aqui está um diagrama das etapas que ocorrem nas pilhas (cada pilha é representada por []
):
Initial state: [[]]
& [[], []]
Push a new stack to the stack stack.
' [[], ["r", "d", "d", "d", "+", "+", "}", ".", "&"]]
This stack state occurs because ' will loop around the line
until finding the next '.
r [[], ["&", ".", "}", "+", "+", "d", "d", "d", "r"]]
Reverses the top (last) stack.
ddd [[], ["&", ".", "}", "+", "+", "d", "d", "d", "r", 13, 13, 13]
Push thirteen thrice.
++ [[], ["&", ".", "}", "+", "+", "d", "d", "d", "r", "'"]
Because char ' is 39 = 13 + 13 + 13.
} [[], [".", "}", "+", "+", "d", "d", "d", "r", "'", "&"]]
Takes the bottom item, then puts it on the top.
. []
Writes a file with content from the second-to-top stack and the
name as the concatenation of all elements in the top stack,
with top member priority (backwards from my representation).
Na verdade, não tenho certeza de como isso funciona; pequenas alterações fazem com que isso se quebre. Por exemplo, colocando o &
em vários outros locais deve funcionar muito bem, mas ele faz com que ClassCastException
s, IOException
s, e ArrayOutOfBoundsException
é dependendo de onde você colocá-lo. Talvez eu precise fazer algumas correções.