Narysuj cyfrowy schemat synchronizacji XNOR

12

Poniżej znajduje się (schematyczny) Cyfrowy schemat taktowania dla bramki logicznej XNOR .

    ┌─┐ ┌─┐ ┌─────┐ ┌─┐ ┌─┐ ┌───┐       
A ──┘ └─┘ └─┘     └─┘ └─┘ └─┘   └──
  ┌───┐ ┌───┐ ┌─┐ ┌─────┐   ┌─┐ ┌─┐ 
B ┘   └─┘   └─┘ └─┘     └───┘ └─┘ └
    ┌─────┐   ┌─┐   ┌─┐   ┌───┐   
X ──┘     └───┘ └───┘ └───┘   └────

Twoim celem jest odtworzenie go dokładnie tak, jak pokazano.

Zasady:

  • Możesz go wydrukować lub zwrócić ciąg wielowierszowy;

  • Dowolna liczba śledzenia i / lub wiodących nowych linii jest dozwolona;

  • Dozwolone są spacje końcowe (ale nie wiodące!);

  • Jeśli nie możesz użyć rozszerzonych znaków rysowania ramek ASCII, możesz zastąpić je ekwiwalentami Unicode (bez kary bajtowej).

To jest więc wygrywa najkrótsza odpowiedź w bajtach.

Reprezentacja binarna

Dla Twojej wygody binarna reprezentacja powyższego schematu jest następująca:

INP A=0101011101010110
INP B=1101101011100101
  ___
X=A⊕B=0111001001001100

Przykładowe dane wyjściowe

wprowadź opis zdjęcia tutaj

Dygresja

Pracując nad tym pytaniem, zaimplementowałem dla niego dwa różne rozwiązania bash, jedno ma długość 122 znaków / bajtów (jak pokazano powyżej), a drugie ma dokładnie 100 bajtów.

Nie mam planów, aby je opublikować (ponieważ zwykle nie zamieszczam odpowiedzi na moje pytania), więc to tylko w celach informacyjnych.

Uważam również, że możliwe są przynajmniej niektóre rozwiązania poniżej 100 bajtów.

zepelin
źródło
2
To brama XNOR, prawda ...
clismique
@ Qwerp-Derp Tak, może tak :)
zeppelin
2
Zamiast sugerować (0 == 0) == 0 czy B lub X nie zaczynają się i kończą na 1?
Roman Czyborra
@Roman Czyborra Nie jestem pewien, czy rozumiem ten pomysł, czy mógłbyś go nieco rozwinąć?
zeppelin
1
@zeppelin Spójrz na początek wzoru - pierwsze kilka pikseli. A, B i X są tam niskie. To samo jest prawdą na końcu. Dlaczego tak jest? (Wierzę, że to pytanie Romana).
isaacg

Odpowiedzi:

5

05AB1E , 101 bajtów + 5 bajtów UTF-8 = 116 bajtów ogółem = 106 bajtów

(WERSJA LEGACY 05AB1E, NIE JUŻ WIĘCEJ NA TIO)

•=(Ín§Àoà`œ¯_eè8y1ÜŸ,Ú®:¹$:,õKA–x[Âì0ãXÔfz}y×ì¹Ï½uEÜ5äÀTë@ºQÈ™ñó:ò…Eä•6B"102345"" ┌─┐└┘"‡6ävyN" A B X"èì}»

Wypróbuj online!

Kompresja:

•=(Ín§Àoà`œ¯_eè8y1ÜŸ,Ú®:¹$:,õKA–x[Âì0ãXÔfz}y×ì¹Ï½uEÜ5äÀTë@ºQÈ™ñó:ò…Eä• 
# Pattern, converted to base-6 in base-6=214.

111023102310222223102310231022231112251425142511111425142514251114221022231022231023102222231110231023151114251114251425111114222514251411102222231110231110231110222311111225111114222514222514222511142222
# Actual base-6 pattern.

1110231023102222231023102310222311
1225142514251111142514251425111422
1022231022231023102222231110231023
1511142511142514251111142225142514
1110222223111023111023111022231111
1225111114222514222514222511142222
#Pattern split into chunks of 34.

   ┌─┐ ┌─┐ ┌─────┐ ┌─┐ ┌─┐ ┌───┐  
 ──┘ └─┘ └─┘     └─┘ └─┘ └─┘   └──
 ┌───┐ ┌───┐ ┌─┐ ┌─────┐   ┌─┐ ┌─┐
 ┘   └─┘   └─┘ └─┘     └───┘ └─┘ └
   ┌─────┐   ┌─┐   ┌─┐   ┌───┐    
 ──┘     └───┘ └───┘ └───┘   └────
# Pattern after replacing 0,1,2,3,4,5 with appropriate blocks.

Konwersja:

6B                                   # Convert back to base-6.
  "102345"" ┌─┐└┘"‡                  # Replace numbers with appropriate counterparts.
                   6ä                # Split into 6 equal parts (the rows).
                     vy           }  # For each row (chunk).
                       N" A B X"èì   # Push label at index [i], prepend to line.
                                   » # Print all separated by newlines.

Korzystanie z kodowania CP-1252 .

Urna Magicznej Ośmiornicy
źródło
Do celów tego wyzwania możesz liczyć każdy znak rysujący pole Unicode jako zaledwie 1 bajt (patrz „Zasady”), więc twoja odpowiedź zgodnie z tym ma długość 106 bajtów. Uzasadnieniem jest to, że te znaki Unicode można zastąpić 1-bajtowymi znakami, np. W CP437 lub IBM850, ale ich wyświetlenie może być trudniejsze.
zeppelin
Zgadzam się z Zeppelinem. Biorąc pod uwagę koncesję podaną w przepisach, będzie to zatem 106 bajtów.
Level River St
Alternatywna metoda, która działa tylko w nowej wersji 05AB1E przy użyciu wbudowanego Åв(zaktualizowałem również końcówkę generatora ASCII-art ): 106 bajtów
Kevin Cruijssen
4

Bubblegum , 76 bajtów

00000000: 92d6 3000 5431 1505 1403 50e8 4e0a aafc  ..0.T1....P.N...
00000010: 9f62 15e6 a3ff 61fa dc05 e06d 8b66 cbc7  .b....a....m.f..
00000020: e6b6 cff8 519a b85a 3eb6 b67d 95c0 0feb  ....Q..Z>..}....
00000030: 35b5 521d 7f7e 68af a916 fa20 d999 564d  5.R..~h.... ..VM
00000040: 1f03 d559 59ed 265c f243 42be            ...YY.&\.CB.

Wypróbuj online!

Wykorzystuje znaki do rysowania ramek z alternatywnego zestawu znaków VT100, czego TIO nie może zademonstrować. Aby uzyskać najlepsze wyniki, uruchom w terminalu UNIX. Mój terminal konwertuje ACS na UTF-8 podczas kopiowania i wklejania, więc możesz zobaczyć efekt tutaj.

anders@change-mode:/tmp$ bubblegum xnor.zlib
    ┌─┐ ┌─┐ ┌─────┐ ┌─┐ ┌─┐ ┌───┐
A ──┘ └─┘ └─┘     └─┘ └─┘ └─┘   └──
  ┌───┐ ┌───┐ ┌─┐ ┌─────┐   ┌─┐ ┌─┐
B ┘   └─┘   └─┘ └─┘     └───┘ └─┘ └
    ┌─────┐   ┌─┐   ┌─┐   ┌───┐
X ──┘     └───┘ └───┘ └───┘   └────
▒┼␍␊⎼⎽@␌␤▒┼±␊-└⎺␍␊:/├└⎻$ 

Dobrze, wyzwaniem nie powiedzieć musimy podjąć końcową plecy wyjście z trybu ACS przed powrotem do zbiornika. Powodzenia z tym.

Anders Kaseorg
źródło
3

Rubin, 113 bajtów

licząc drukowane symbole jako jeden bajt autoryzowany przez wyzwanie (byłem zaskoczony, gdy odkryłem, że w rzeczywistości są to 3 bajty).

6.times{|i|s=' A B X'[i]
'D]zunIWkF]nIRukFH'.bytes{|b|s+='   ┌─┐───┘ └'[(b*2>>i/2*2&6)-i%2*6,2]}
s[1]=' '
puts s}

6 linii wyjściowych nadaje się do kodowania 6 bitów na każdy znak magicznego ciągu. Ale znaki magicznej struny faktycznie kodują dla każdego przejścia w ten sposób:

least significant bit 0 New value for A  
                      1 Current value for A
                      2 New value for B
                      3 Current value for B
                      4 New value for X
                      5 Current value for X
most significant bit  6 Always 1 (to remain in printable range)

Jest to dekodowane w celu znalezienia 2 znaków, które muszą być wydrukowane dla każdego przejścia (pierwszym z nich jest spacja lub linia pozioma). 8-znakowe ciągi dla górnego i dolnego rzędu nakładają się: Dwa ostatnie znaki dla górnego rzędu 11to dwie poziome linie, które pasują do tego, co jest potrzebne dla pierwszych dwóch znaków dolnego rzędu 00. 8 znaków w dolnym rzędzie jest zawijanych: są to ostatnie 6 i pierwsze 2 znaki ciągu symboli.

Nieskluczony kod

6.times{|i|s=' A B X'[i]               #iterate through 6 lines of output. Set s to the 1st character.
  'D]zunIWkF]nIRukFH'.bytes{|b|        #for each byte in the magic string
     s+='   ┌─┐───┘ └'[(b*2>>i/2*2&6)- #add 2 bytes to s, index 0,2,4, or 6 of the symbol string depending on relevant 2 bits of the magic string.
     i%2*6,2]                          #if the second (odd) row of a particular graph, modify index to -6,-4,-2, or 0 
  }                                    #(ruby indices wrap around. mystring[-1] is the last character of the string.)
  s[1]=' '                             #replace intitial ─ of the curve with space to be consistent with question
  puts s                               #output line
}
Level River St
źródło
To w rzeczywistości 129 bajtów, 113 znaków.
Magic Octopus Urn
1
@carusocomputing Widzę, że skomentowałeś większość odpowiedzi tutaj. Proszę odnieść się do pierwszego wiersza mojego ansera i do zasady 4 OP: If you can not use the extended ASCII box-drawing characters, you may substitute them for the unicode equivalents (at no byte penalty)Wszyscy oceniliśmy nasze odpowiedzi zgodnie z zasadami.
Level River St
2

PowerShell, 255 znaków, 265 bajtów (UTF-8)

$a='    012 012 0111112 012 012 01112
A 113 413 413     413 413 413   411
  01112 01112 012 0111112   012 012
B 3   413   413 413     41113 413 4
    0111112   012   012   01112
X 113     41113 41113 41113   41111'
0..4|%{$a=$a-replace$_,('┌─┐┘└'[$_])};$a

Działa to na moim komputerze, ale wydaje się, że nie analizuje poprawnie bajtów w TIO ...

zrzut ekranu

Jest $ato ciąg składający się z wielu wierszy wypełniony cyframi i spacjami, a następnie pętlami 0..4|%{...}. Przy każdej iteracji mamy -replaceodpowiednią cyfrę $_z odpowiednim znakiem '┌─┐┘└'[$_]i zapisujemy ją z powrotem $a. Następnie po prostu wychodzimy $az rurociągu, a dane wyjściowe są niejawne.

AdmBorkBork
źródło
Zgodnie z wyzwaniem wolno liczyć znaki Unicode jako pojedyncze bajty
FlipTack
2

JavaScript (ES6), 163 158 154 bajtów

Uwaga: liczenie znaków UTF-8 jako bajtów, autoryzowanych przez wyzwanie.

_=>[..." A B X"].map((c,i)=>c+" "+[...Array(33)].map((_,j)=>j%2?" ─"[p^i&1]:" ┐┌─└┘ "[p+(p=[27370,42843,12878][i>>1]>>j/2&1)*2+i%2*3]).join``,p=0).join`
`

Próbny

Zaoszczędzono 4 bajty dzięki Neilowi

Arnauld
źródło
j%2?" ─"[p^i&1]:" ┐┌─└┘ "[p+(p=[27370,42843,12878][i>>1]>>j/2&1)*2+i%2*3]oszczędza 3 bajty.
Neil
Aha, i zmień także 17 na 33.
Neil,
Jeszcze raz 152 znaki, 164 bajty.
Magic Octopus Urn
2

C, 213 205 bajtów

Dla odmiany rozmiar programu C w tym wyzwaniu nie jest całkowicie śmieszny w porównaniu z innymi językami.

#define X(a) u[i]=C[a],l[i++]=C[(a)+4]
p(n,c){char u[34],l[34],*C=" ┐┌──└┘ ",i=0;while(i<34)X(n&3),n>>=1,X((n&1)*3);printf("  %.33s\n%c %.33s\n",u,c,l);}main(){p(0xD5D4,'A');p(0x14EB6,'B');p(0x649C,'X');}

Nieoznakowany, zdefiniuj rozwinięty i skomentował:

p(n,c){
    // u is the upper line of the graph, l the lower line
    char u[34],l[34],*C=" ┐┌──└┘ ",i=0;
    while(i<34)
        u[i]=C[n&3],            // using the two LSBs to set the transition char depending on the current and next state
        l[i++]=C[(n&3)+4],      // do for both upper and lower lines
        n>>=1,                  // shift bits right to go to next state
        u[i]=C[(n&1)*3],        // using only the LSB to set the "steady" char depending on current state only
        l[i++]=C[((n&1)*3)+4];  // do for both upper and lower lines
    printf("  %.33s\n%c %.33s\n",u,c,l);
}
main() {
    // Call p for each graph
    // Constants are chosen so the display is consistent with the request.
    // Each bit represents a state, but the order is reversed
    // (leftmost is put on lowest significant bit, after a 0)
    p(0xD5D4,'A');p(0x14EB6,'B');p(0x649C,'X');
}

Uwaga: ciąg C nie może zawierać znaków Unicode. Wszystkie wyświetlane znaki muszą być zwykłymi starymi 8-bitowymi znakami (ale mogą być wybrane w rozszerzonym zakresie). Zasadniczo ważność danych wyjściowych zależy od strony kodowej.

słaba utrata wiary w SE
źródło
1

tcl, 221 znaków, 299 bajtów

lmap {b _ n u A V} {"   " ┌─────┐ ┌───┐ └───┘ ┌─┐ └─┘} {puts "[set S \ $b][set m $A\ $A] $_ $m $n
A ──┘ [set w $V\ $V][set s \ $S]$w $V$b└──
  $n $n $A $_$b$m
B ┘$b$V$b$w$s$u $V └
$S$_$b$A$b$A$b$n
X ──┘$s$u $u $u$b└────"}

można uruchomić na: http://rextester.com/live/VVQU99270

sergiol
źródło
228 znaków, ale jest to 306 bajtów.
Magic Octopus Urn
@carusocomputing: Jakiego narzędzia online używasz do liczenia bajtów zamiast znaków? Tks z góry.
sergiol
mothereff.in/byte-counter
Magic Octopus Urn