&M"pp"
L!)(de
&c;`Che"
`!d!sick
!',@p"!'
'N'U`!Lu
yadda yadda curva di Hilbert.
Prima di tutto, spingiamo i tre personaggi importanti in pila:
!'
'N'U
Quindi impostiamo un segno di spunta e iniziamo leggendo un singolo personaggio. Lo dupliciamo e lo neghiamo, e se il risultato di questo è veritiero (quindi se la stringa era vuota; quindi l'input è terminato), saltiamo alla fine:
;`
d!
,@
Con la copia rimanente del carattere di input, controlliamo se è contenuto nel resto della pila (ovvero se è uno di!, N, U). In caso contrario, generiamo un errore, riportandoci al nostro segno di cattura in cui leggiamo un altro personaggio:
&c
`!
Altrimenti, cariciamo ciò che è in memoria rapida (essenzialmente un registro che inizialmente è una stringa vuota; falsa), lo neghiamo e lo rimandiamo in memoria rapida, quindi solleviamo anche l'errore (tornando a leggere i caratteri):
&M
L!
Quando l'input si è fermato, siamo inviati alla fine. Lì, invertiamo la direzione, spingiamo un punto esclamativo, cariciamo la memoria rapida e la annulliamo. Se questo è vero (cioè abbiamo avuto un numero dispari di cose di negazione), stampiamo il punto esclamativo che abbiamo premuto:
p !'
`!Lu
Infine, inseriamo la stringa in due parti e la stampiamo (per motivi di risparmio di spazio):
"pp"
)(de
Che"
sick
"
Successivamente, il programma ritorna ancora all'inizio originale, ma poiché nessuno dei comandi emette qualcosa o ha un comportamento a ciclo continuo, non importa. In realtà, il primo comando non-nopping che raggiungiamo genera un'eccezione, saltando la maggior parte del codice perché saltiamo al segno di cattura, il che significa che tutto Aceto vede in quella parte è:
&
!' @
'N'U
Poiché Unon è ora preceduto da un carattere virgoletta singola e non è quindi visto come un carattere letterale, viene interpretato come un comando: Uinverte tutti gli elementi in pila (ora è !, N, U, dall'alto), ed 'Ne '!spingere più caratteri, il che significa che finiamo con lo stack [U, N, !, N, !].
Nota a margine: questo è il primo programma Aceto scritto (in parte) con l'aiuto del nuovo editore Aceto .
notunischecked?