Hakowanie Fallout Terminal

13

Czy ktoś jest zagorzałym fanem Bethesdy? Może wolisz Obsidian Entertainment? Cóż, jeśli jesteś jedną z tych rzeczy, poniższe zdjęcie powinno być ci względnie znajome.

Terminal opadowy.

Pozwoliłem sobie przygotować dość wyjątkowe wyzwanie ASCII-Art, więc oto pierwsza wskazówka, co mam zrobić:

  _____________________________________________________
 /                                                     \ 
|     _____________________________________________     |
|    |                                             |    |
|    | Welcome to ROBCO Industries (TM) Termlink   |    |
|    | Password Required                           |    |
|    | Attempts Remaining:                         |    |
|    |                                             |    |
|    | 0x01                 | 0x0D                 |    |
|    | 0x02                 | 0x0E                 |    |
|    | 0x03                 | 0x0F                 |    |
|    | 0x04                 | 0x10                 |    |
|    | 0x05                 | 0x11                 |    |
|    | 0x06                 | 0x12                 |    |
|    | 0x07                 | 0x13                 |    |
|    | 0x08                 | 0x14                 |    |
|    | 0x09                 | 0x15                 |    |
|    | 0x0A                 | 0x16                 |    |
|    | 0x0B                 | 0x17                 |    |
|    | 0x0C                 | 0x18                 |    |
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Jest to bardzo prosty (pusty) szablon dla projektu terminalu RobCo Fallout w czystym ASCII, Twoim zadaniem będzie:

  • Najpierw wygeneruj ten szablon.
  • Następnie podano listę ciągów znaków li liczbę 0 <= n <= 4do jej wypełnienia!

Dwie dynamiczne części Fallout Hacking Terminal to:

Liczba prób

  • Liczba pozostałych prób (wskazanych przez pola rozdzielane spacjami).
    • Do celów tego wyzwania będziesz używać Xzamiast ■.

Hasła

  • Hasła zdefiniowane przez lsą przeplatane losowymi symbolami drukowalnymi ASCII.
  • Hasła, jak widać na przykładzie, mogą owijać wiele wierszy ( NAMES).
  • Wszystkie hasła na ekranie terminala powinny mieć równe szanse na znalezienie się w dowolnym miejscu.
  • Wszystkie hasła mogą mieć jednakową długość, ale to nie ma znaczenia.
  • Lista symboli użytecznych do oddzielnych haseł to: !"#$%&'()*+/:;<=>?@[\]^_{|}.
  • Wszystkie hasła lmuszą mieć jednakową długość.
  • HASŁA MUSZĄ MIEĆ POTENCJAŁ, ABY OWIJAĆ SIĘ MIĘDZY KOLUMNAMI.
    • Dotyczy to również wierszy, ale tylko do adresu wyższego bajtu (0x18-> 0x01 jest nieprawidłowy).
  • Obszar wyświetlania haseł po obu stronach ma 15 szerokości (ze spacją po obu stronach).
    • Możesz założyć, że żadne słowa nie lbędą dłuższe niż to.
  • Hasła są wyłącznie alfabetyczne, co oznacza tylko litery.

Przykład:

l = ["SMART","ENACT","SWORE","PITYS","SMELL","CARTS","RACES"], n = 4

  _____________________________________________________
 /                                                     \ 
|     _____________________________________________     |
|    |                                             |    |
|    | Welcome to ROBCO Industries (TM) Termlink   |    |
|    | Password Required                           |    |
|    | Attempts Remaining: X X X X                 |    | # N = 4 drives these X's.
|    |                                             |    |
|    | 0x01 $?_/%$ENACT||"} | 0x0D TYS"_'$\#|^%&{} |    |
|    | 0x02 }:!*@{/_<"[]#>; | 0x0E #{!"^&\]'|}_[$% |    |
|    | 0x03 $%&'()*+/:;<\_' | 0x0F }|[(%SMELL/_$@( |    |
|    | 0x04 ^SMART(!@$*'^_@ | 0x10 []_#!"{|}'%$\&^ |    |
|    | 0x05 (*@#%}*(!%)^(_! | 0x11 %$}[!\#'^&_]{|" |    |
|    | 0x06 $%&'()*+/:;<_@) | 0x12 \SWORE|%'_!}\^" |    |
|    | 0x07 "/')=*%!&>#<:$+ | 0x13 ^{['&$|!_]%\"#} |    |
|    | 0x08 ;'*$&"(<%!#)RAC | 0x14 ']!|^#[$"_\}&{% |    |
|    | 0x09 ES:($&';%#+"<*/ | 0x15 @)($!CARTS*!@$_ |    |
|    | 0x0A ;'*$&"(<%!#)/+: | 0x16 !#%${"'}&[]^|_\ |    |
|    | 0x0B |'_!}$\%["#^{&] | 0x17 ]"_#$&}^%[{|\'! |    |
|    | 0x0C #{!"^&\]'|}_[PI | 0x18 _![&#{$%\^'|}"] |    | # Notice how PITYS wrapped.
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Jeśli n = 2na tym samym przykładzie:

  _____________________________________________________
 /                                                     \ 
|     _____________________________________________     |
|    |                                             |    |
|    | Welcome to ROBCO Industries (TM) Termlink   |    |
|    | Password Required                           |    |
|    | Attempts Remaining: X X                     |    | # N = 2 drives these X's.
|    |                                             |    |
|    | 0x01 $?_/%$ENACT||"} | 0x0D TYS"_'$\#|^%&{} |    |
|    | 0x02 }:!*@{/_<"[]#>; | 0x0E #{!"^&\]'|}_[$% |    |
|    | 0x03 $%&'()*+/:;<\_' | 0x0F }|[(%SMELL/_$@( |    |
|    | 0x04 ^SMART(!@$*'^_@ | 0x10 []_#!"{|}'%$\&^ |    |
|    | 0x05 (*@#%}*(!%)^(_! | 0x11 %$}[!\#'^&_]{|" |    |
|    | 0x06 $%&'()*+/:;<_@) | 0x12 \SWORE|%'_!}\^" |    |
|    | 0x07 "/')=*%!&>#<:$+ | 0x13 ^{['&$|!_]%\"#} |    |
|    | 0x08 ;'*$&"(<%!#)RAC | 0x14 ']!|^#[$"_\}&{% |    |
|    | 0x09 ES:($&';%#+"<*/ | 0x15 @)($!CARTS*!@$_ |    |
|    | 0x0A ;'*$&"(<%!#)/+: | 0x16 !#%${"'}&[]^|_\ |    |
|    | 0x0B |'_!}$\%["#^{&] | 0x17 ]"_#$&}^%[{|\'! |    |
|    | 0x0C #{!"^&\]'|}_[PI | 0x18 _![&#{$%\^'|}"] |    | # Notice how PITYS wrapped.
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Te przykłady zostały spreparowane ręcznie, więc przepraszam, dystrybucja nie jest losowa.

To jest golf golfowy , najniższa liczba bajtów zostanie zaakceptowanym zwycięzcą. Odbiorę to po 3 dniach, jeśli nie zostaną przesłane żadne odpowiedzi w sumie 250 REP.

code-golf ascii-art kolmogorov-complexity Urna Magicznej Ośmiornicy
źródło
Szybki! Żadna odpowiedź przez 3 dni! (żartuję). To jest moje nowe ulubione wyzwanie ascii-art.
nmjcman101,
2
@ nmjcman101 jaki był twój ostatni ulubiony?
Magic Octopus Urn
Co oznacza NAMESdrugi punkt? „ Można oczekiwać, że wszystkie hasła będą miały taką samą długość, ale to nie ma znaczenia. ” Lub „ Wszystkie hasła w l muszą mieć taką samą długość. ”? Może po prostu jestem ślepy (znowu!), Ale nie widzę RACESw żadnym wyjściu - czy powinniśmy to rozumieć, że powinna istnieć możliwość, że hasło nie zostanie użyte? Czy Math.random(i odpowiedniki) są wystarczająco losowe do celów tego wyzwania?
Kudłaty
2
Czy między dwoma hasłami muszą znajdować się niealfanumeryczne spacje, czy jest w porządku, jeśli generują się obok siebie (bez nakładania się)?
HyperNeutrino,
5
Czy hasła muszą mieć możliwość owijania od 0x18 do 0x01?
Jonathan Allan,

Odpowiedzi:

6

JavaScript (ES8), 575 568 564 bajtów

Zaoszczędź 3 bajty dzięki @Shaggy

Pobiera dane wejściowe w składni curry (r)(a), gdzie r to liczba pozostałych prób, a a to tablica haseł.

r=>a=>[...C=`!"#[]^$%&'*+;<{}=`].reduce((s,c)=>(x=s.split(c)).join(x.pop()),`  "%%__
 /;;# \\ 
[ "} $Welcome to ROBCO Industries (TM) Termlink'!Password Required#}'!Attempts Remaining:${" X".repeat(r).padEnd(9)};[$^1=^D<2=^E<3=^F<4*0<5*1<6*2<7*3<8*4<9*5<A*6<B*7<C*8='+"[|
|;;#'|
\\"{_/ 
}'\\&%/= ]]]]] | }' {%%%<='+ ^#}}}+|
[|*=0x1'   "{{{%___$+;#}} !^0x0]ZZZ[|}#;}"&{![+ `).replace(/Z/g,(c,i)=>a.join``[(i%58>>5?y++:x++)%L],x=(R=n=>Math.random()*n|0)(L=360),y=x+180,[...Array(L-(n=a.sort(_=>R(3)-1).length)*a[0].length)].map(_=>a[R(n)]+=(C+`>?@()/:\\_|`)[R(27)]))

Zakreślacz składni celowo wyłączony. Nie ma pojęcia, co z tym zrobić.

Próbny

Pokaż fragment kodu

Arnauld
źródło
Można zaoszczędzić stosując ES8 nic do wypełnienia próby tak: Attempts Remaining:${" X".repeat(r).padEnd(8)}?
Kudłaty
1
@Shaggy To oszczędza 3 bajty. Dzięki!
Arnauld,
Welcome to ROBCO Industries (TM) Termlink'!Password Required#}'!Attempts Remaining:oof ... Powinienem sparafrazować, żeby ocalić bajty z golfem.
Magic Octopus Urn
4

SOGL V0.12 , 225 bajtów

R“EC"+w╗─║Z⁰2BΥø‘▓"▲╔⁸‘'²∙+"⅟Δλ≤LK⅟ΗΠ.JN║«⁸⅟‘▓+╬⁷"№D↓tι▲‛Q─Ρδν∙υ4Ρψ▲¦‽↑√Ε┐Ζ5↔‛⅟≤š▼¦⁾○ΔΡ%³‘ū91 tž85ž.ΖX Ο'⁹7žø]Xe@*c{leκψI1ž}_:@øŗ⁄c∑⁄≠}l{"T-)⅞↑°Χpjζ⅓īa0ε+Μ‛⁶ρ\=↔⅟¹‘ψ}¹K@Gŗ'¹nο²²Z+8«m«ο+I{@∑"0x0”Κ}¹6«n_'⁷1ž'⁵16«┐∙ž'⁸4 19∙ž89╬5

Wypróbuj tutaj!
Oczekuje, że dane wejściowe z tablicy zostaną wprowadzone na stosie, a liczba z danych wejściowych, dlatego →"jest dodawana do programu online w celu ułatwienia użytkowania.

dzaima
źródło
4

Perl 5 , 588 560 + 1 (-a) = 589 561 bajtów

Wytnij 28 bajtów sugestiami wskazanymi przez Dom

$,=$/;$_=" X"x pop@F;say"  "."_"x53," /".$"x53 ."\\",$q="|     ".'_'x45 ."     |",$e=($b="|    |").$"x45 .$b,"$b Welcome to ROBCO Industries (TM) Termlink   $b
$b Password Required".$"x27 .$b,"$b Attempts Remaining:$_".$"x(25-length).$b,$e;map{$s.=(grep/[^\w,.`-]|_/,map{chr}33..125)[rand 27]}1..360;($t=substr$s,$r=rand 360-($l=length),$l,$_)=~/[a-z]/i&&(substr$s,$r,$l,$t)&&push@F,$_ while$_=pop@F;@o=$s=~/.{15}/g;printf"$b 0x0%X %s | 0x%02X %s $b\n",$_,$o[$_-1],$_+12,$o[$_+11]for 1..12;say$b.'_'x45 .$b,$q=~y/_/ /r,$q=" \\"."_"x54 ."/",$"x6 .$q=~s/_{15}//r

Wypróbuj online!

Poprzednio:

$,=$/;$_=" X"x pop@F;say"  "."_"x53," /".($"x53)."\\",$q="|     ".('_'x45)."     |",$e=($b="|    |").($"x45).$b,"$b Welcome to ROBCO Industries (TM) Termlink   $b
$b Password Required".($"x27).$b,"$b Attempts Remaining:$_".($"x(25-length)).$b,$e;$s=join'',map{(split//,'!"#$%&\'()*+/:;<=>?@[]^_{|}\\')[int rand 27]}1..360;while($_=pop@F){if(($t=substr$s,$r=rand 360-($l=length),$l,$_)=~/[a-z]/i){substr$s,$r,$l,$t;push@F,$_}}@o=$s=~/.{15}/g;printf"$b 0x0%X %s | 0x%02X %s $b\n",$_,$o[$_-1],$_+12,$o[$_+11]for 1..12;say$b.('_'x45).$b,$q=~y/_/ /r,$q=" \\".("_"x54)."/",($"x6).$q=~s/_{15}//r

Wypróbuj online!

Dane wejściowe są w jednym wierszu, oddzielone spacjami: najpierw ciągi, a następnie liczba

W jaki sposób?

$,=$/;          # delimiter between fields is newline
$_=" X"x pop@F; # set number of attempts left
say             # output the header
"  "."_"x53,
" /".($"x53)."\\",
$q="|     ".('_'x45)."     |",
$e=($b="|    |").($"x45).$b,
"$b Welcome to ROBCO Industries (TM) Termlink   $b
$b Password Required".($"x27).$b,
"$b Attempts Remaining:$_".($"x(25-length)).$b,
$e;
$s=join'',map{(split//,'!"#$%&\'()*+/:;<=>?@[]^_{|}\\')[int rand 27]}1..360; # create random string long enough for entire screen
while($_=pop@F){  # for each given string
if(($t=substr$s,$r=rand 360-($l=length),$l,$_) # attempt to insert it
=~/[a-z]/i)                                    # but check if it overlaps another string
{substr$s,$r,$l,$t;                            # if it does, take it out
push@F,$_}}                                    # and put it back in line
@o=$s=~/.{15}/g;                               # split "memory dump" into chunks
printf"$b 0x0%X %s | 0x%02X %s $b\n",$_,$o[$_-1],$_+12,$o[$_+11]for 1..12; #output the grid
say                                            # output the footer
$b.('_'x45).$b,$q=~y/_/ /r,
$q=" \\".("_"x54)."/",
($"x6).$q=~s/_{15}//r
Xcali
źródło
Dobra odpowiedź na złożony problem! Powinieneś być w stanie zaoszczędzić prawie 30 bajtów poprzez usunięcie nawiasów wokół operatora powtarzania, możesz dodać spację, aby .nie była używana jako przecinek dziesiętny. Również, aby uzyskać interpunkcję, możesz użyć czegoś takiego (grep/[^\w,.`-]|_/,map{chr}33..125)i nie musisz wywoływać intindeksu tablicy! Zmiana whilepętli na postfiks i używanie &&zamiast zamiast ifpowinno również zaoszczędzić kilka. Kiedy budujesz $s, jeśli masz $s.=wewnątrz mapy, zamiast użyć joinkilku kropli. Mam nadzieję, że to pomaga!
Dom Hastings,
4

Python 3 , 585 bajtów

from random import*
def f(l,n,r=range):
	u,c='_ ';a=[choice('!"#$%&\'()*+/:;<=>?@[\\]^_{|}')for i in c*360];L=len(l[0]);i={*r(360-len(l[0]))};p=lambda x:'0x%02X'%x+c+''.join(a[15*x:][:15])
	for q in l:s=choice([*i]);a[s:s+L]=q;i-={*r(s+~L,s+-~-~L)}
	return'''  %s
 /%s\\
|# %s #|
?%s?
? Welcome to ROBCO Industries (TM) Termlink   ?
? Password Required   ######?
? Attempts Remaining:%-25s?
?%s?
%%s?%s?
|%s|
\%s/
#   \%s/'''.replace('?','|#|').replace('#',c*4)%(u*53,c*53,u*45,c*45,' X'*n,c*45,u*45,c*55,u*55,u*39)%('|    | %s | %s |    |\n'*12)%sum([(p(x),p(x+12))for x in r(12)],())

Wypróbuj online!

-70 bajtów dzięki Jonathanowi Allanowi
-9 bajtów dzięki sobie (wreszcie!)
-72 bajtów dzięki notjagan

HyperNeutrino
źródło
Jeszcze 35 bajtów!
notjagan
I jeszcze 15.
notjagan,
16 usuniętych więcej! (musi być lepszy sposób na zrobienie tego niż kilka komentarzy)
notjagan
Kolejne 6 bajtów wyłączone przez cofnięcie do połowy jednej z moich innych zmian (naprawdę powinienem przestać komentować).
notjagan,
@notjagan Nie mam nic przeciwko komentarzom :) Dzięki!
HyperNeutrino,
2

JavaScript (ES8), 639 bajtów

(w,n,r=i=>Math.random()*i|0,s=b=>{for(i=b[k];i;i--)[b[i-1],b[j]]=[b[j=r(i)],b[i-1]]},a=Array(360-w[k="length"]*--w[0][k]),m=[...a].map((j,i)=>~(j=d.slice(0,w[k]).indexOf(i))?w[j]:`!"#$%&'()*+/:;<=>?@[\\]^_{|}`[r(27)],s(w),s(d=[...a.keys()])).join``.match(/.{15}/g).map((v,i)=>"0x"+(i+1).toString(16).padStart(2,0)+" "+v))=>`  _53
 / 53\\
| 5_45 5|
${["","Welcome to ROBCO Industries (TM) Termlink","Password Required","Attempts Remaining:"+" X".repeat(n),"",...m.slice(0,12).map((x,i)=>x+" | "+m[i+12])].map(x=>"| 4| "+x.padEnd(43)+" | 4|").join`
`}
| 4|_45| 4|
| 55|
\\_55/
 7\\_39/`.replace(/[_ ]([1-9]+)/g,(m,n)=>m[0].repeat(n))

Etykiety szesnastkowe są pisane małymi literami; jeśli wymagane byłyby wielkie litery, byłoby to dodatkowe 14 bajtów dla .toUpperCase().

Test Snippet

Lepiej oglądany na CodePen .

Justin Mariner
źródło
Możesz zapisać bajt, curry 2 parametry i przeniesienie zmiennych do pierwszego repeat.
Shaggy,