Traduci un programma Glypho


17

Dato un input di qualsiasi programma Glypho valido, produce la sua controparte "leggibile dall'uomo".

Glypho è un'idea interessante di esolang:

Il riferimento alle istruzioni è fornito qui. Per ogni istruzione, i caratteri abcd rappresentano i simboli che compongono ciascuna istruzione. a si riferisce al primo simbolo univoco, b si riferisce al secondo simbolo univoco, ecc.

aaaa ..... n NOP - no operation; do nothing
aaab ..... i Input - push input onto top of stack
aaba ..... > Rot - pops top stack element and pushes to bottom of stack
aabb ..... \ Swap - swaps top two stack elements
aabc ..... 1 Push - pushes a 1 onto the top of stack (creates new element)
abaa ..... < RRot - pops bottom element and pushes to top of stack
abab ..... d Dup - Duplicates top stack element
abac ..... + Add - pops top two elements and pushes their sum
abba ..... [ L-brace - skip to matching ] if top stack element is 0
abbb ..... o Output - pops and outputs top stack element
abbc ..... * Multiply - pops top two elements and pushes their product
abca ..... e Execute - Pops four elements and interprets them as an instruction
abcb ..... - Negate - pops value from stack, pushes -(value)
abcc ..... ! Pop - pops and discards top stack element
abcd ..... ] R-brace - skip back to matching [

(credito: Brian Thompson aka Wildhalcyon)

Quindi, ad esempio, PPCGrappresenterebbe l' istruzione Push:PPCG corrisponde al modello aabc, dove arappresenta P, brappresenta Ce c rappresenta G.

L'input sarà una singola stringa composta da soli caratteri ASCII stampabili. Avrà sempre una lunghezza divisibile per quattro (duh).

L'output è ogni gruppo di quattro caratteri nella stringa di input sostituiti dall'istruzione che designano. Utilizzare i nomi delle istruzioni a lettera singola (quelli subito dopo i cinque punti nella tabella sopra citata).

Dato che si tratta di , vincerà il codice più breve in byte.

Casi test:

In                                Out
------------------------------------------------
Programming Puzzles & Code Golof  ]!]!]]]+
nananananananana batman!          dddd]]
;;;;;;;:;;:;;;::                  ni>\
llamas sleep                      1-*
8488133190003453                  <[oe
<empty string>                    <empty string>

4
Ah sì Codice Golof. Il mio sporot preferito.
KoreanwGlasses

Risposte:


5

Pyth, 37 35 34 byte

Il codice contiene caratteri non stampabili, quindi ecco il xxdhexdump:

0000000: 5663 7a34 7040 2e22 216f d78c 40bf d4f0  Vcz4p@."!o..@...
0000010: 38d6 7dfe 7312 3ff8 ea22 6958 4e7b 4e55  8.}.s.?.."iXN{NU
0000020: 5433                                     T3

Ecco una versione stampabile a 36 byte:

Vcz4p@"ni >\\1   <d+[o*e-!]"iXN{NUT3

Provalo online. Suite di test.

Spiegazione

Vcz4p@."…"iXN{NUT3       implicit: z = input
  z                      input
 c 4                     split to 4-character blocks
V                        loop over that in N
           X               replace...
            N                in current part
             {N              unique chars in current part, in order
               UT            with numbers 0-9
          i      3         interpret as base 3
     @                     take that item of
      ."…"                   string "ni >\\1   <d+[o*e-!]"
    p                      and print without newline

3

CJam, 42 39 35 byte

Salvato 4 byte prendendo in prestito l'idea di user81655 di utilizzare la base 3 invece della base 4.

l4/{__&f#3b"ni >\1   <d+[o*e-!]"=}%

Esegui tutti i casi di test.

Deve esserci un modo migliore per comprimere la tabella di ricerca dei comandi ...


3

JavaScript (ES6), 97

Per ogni blocco di 4 caratteri, sostituisco ogni simbolo con la sua posizione nel blocco, ottenendo un numero di base 4. Per esempio 'aabc' -> '0023'. I possibili numeri sono compresi nell'intervallo 0..0123, ovvero 0..27 in decimale. Uso il numero come indice per trovare il giusto carattere di istruzione da una stringa di 28 caratteri.

s=>s.replace(/.{4}/g,s=>'n..i....>.\\1....<d.+[o.*e-!]'[[...s].map(c=>n=n*4+s.indexOf(c),n=0),n])

Test

F=s=>s.replace(/.{4}/g,s=>'n..i....>.\\1....<d.+[o.*e-!]'[[...s].map(c=>n=n*4+s.indexOf(c),n=0),n])

function test() { O.textContent=F(I.value) }

test();
#I { width:90% }
<input id=I value="nananananananana batman!" oninput="test()">
<br><span id=O></span>


3

MATLAB, 291 byte

Ho esitato a lungo se dovessi impegnare la mia risposta. Stavo solo giocando con MATLAB. Sono consapevole che non è davvero possibile generare un codice denso (un basso numero di istruzioni / byte; circa 3 volte più grande delle soluzioni di ~ 100 byte) e che MATLAB potrebbe non essere troppo adatto per il golf del codice e io sono nuovo per il golf del codice . Ma volevo semplicemente provare, e il codice funziona (caratteri newline mantenuti). Eventuali suggerimenti sono benvenuti. : P

i=input('','s');
l=reshape(i,4,length(i)/4)';
m=']!- e';m(9)='*';m(12:22)='o[   + d  <';m(33:34)='1\';m(39)='>';m(57)='i';m(64)='n';
s='';
for k = 1:size(l,1)
n=l(k,:);
c=combvec(n,n);
t=triu(reshape(c(1,:)==c(2,:),4,4),1);
t=sum(t([5,9:10,13:15]).*2.^[5:-1:0]);
s=[s,m(t+1)];
end
display(s)

1
Benvenuto in Programmazione di puzzle e codice golf! Tutte le risposte sono benvenute, anche se vengono superate da una quantità ridicola (mi è sicuramente successo prima). ;) Bella prima risposta!
Maniglia

2

JavaScript (ES6), 115 101 byte

s=>s.replace(/..../g,g=>"ni >\\1   <d+[o*e-!]"[[...g].map(c=>r=r*3+(m[c]=m[c]||++i)-1,i=r=0,m={})|r])

14 byte salvati grazie a @ edc65 !

Spiegazione

Memorizza l'elenco di istruzioni in una stringa con ogni carattere nel suo indice di base 3. Ad esempio, +corrisponde a abacquale può essere rappresentato in base-3 come 0102o 11in decimale. L'unica istruzione che non può essere rappresentata in base-3 è ], ma con l'algoritmo utilizzato per calcolare il numero di base-3, finisce convenientemente che deve essere nella posizione 18 alla fine della stringa.

s=>
  s.replace(/..../g,g=>    // replace each four-character group with it's instruction
    "ni >\\1   <d+[o*e-!]" // list of instructions at their base-3 index
    [
      [...g].map(c=>       // for each character c
        r=r*3+(m[c]=m[c]   // shift r left and add the number associated with c to r
          ||++i)-1,        // if nothing is associated, associate the next number to c
                           // save i + 1 to m[c] so that it is truthy for 0
        i=                 // i = current number to assign to the next unique character
        r=0,               // r = 4-character group as a base-3 number
        m={}               // m = map of numbers assigned to each character
      )
      |r                   // return r
    ]
  )

Test


È possibile salvare molti byte non utilizzando parseInte calcolando il numero con somma e moltiplicazione ripetute. Questo evita il problema con '0123' che non è valido nella base 3 ma dà 1 * 9 + 2 * 6 + 3 == 18 che è una buona posizione. Risultato:F=s=>s.replace(/..../g,g=>"ni]>\\1 <d+[o*e-!]"[[...g].map(c=>r=r*3+(m[c]=m[c]||++i)-1,r=i=0,m={})|r])
edc65,

@ edc65 Ottimo suggerimento. Grazie!
user81655,

0

Python 2, 158 byte

Accetta input come "test". L'output è un elenco di caratteri.

def b(s,i=0):
    for c in s:i=i*4+s.index(c)
    return"n..i....>.\\1....<d.+[o.*e-!]"[i]
print map(b,(lambda l,n:[l[i:i+n]for i in range(0,len(l),n)])(input(),4))

Provalo online

Ungolfed:

def chunks(l, n):
    return (l[i:i+n] for i in range(0, len(l), n))

def convert(inst):
    i = 0
    for c in inst:
        i = i*4 + inst.index(c)

    return "n..i....>.\\1....<d.+[o.*e-!]"[i]

print map(convert, chunks(input(), 4))
Utilizzando il nostro sito, riconosci di aver letto e compreso le nostre Informativa sui cookie e Informativa sulla privacy.
Licensed under cc by-sa 3.0 with attribution required.