Fallout Terminal Hacking

13

Burda Bethesda hayranı olan var mı? Belki Obsidyen Eğlencesini tercih edersin? Aşağıdaki resimlerden herhangi birindenseniz, size nispeten tanıdık gelmelidir.

Fallout terminali.

Oldukça benzersiz bir ASCII-Art mücadelesi hazırlama özgürlüğünü aldım, işte size ne yapacağımla ilgili ilk ipucu:

  _____________________________________________________
 /                                                     \ 
|     _____________________________________________     |
|    |                                             |    |
|    | 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                 |    |
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Saf ASCII'de RobCo Fallout terminal tasarımı için çok temel (boş) bir şablon, işiniz:

  • İlk olarak, bu şablonu oluşturun.
  • Sonra, bir dizeler listesi lve 0 <= n <= 4doldurmak için bir sayı verildi!

Bir serpinti hack terminalinin iki dinamik kısmı şunlardır:

Deneme Sayısı

  • Kalan deneme sayısı (alan sınırlamalı kutularla gösterilir).
    • Bu meydan okuma amaçla kullanmakta olacak Xyerine ■.

Şifreler

  • Tarafından tanımlanan şifreler, lrastgele yazdırılabilir ASCII sembolleri ile serpiştirilir.
  • Parolalar, örnekte anlayacağınız gibi, birden çok satırı sarabilir ( NAMES).
  • Terminal ekranındaki tüm parolaların her yerde olma şansı eşit olmalıdır.
  • Önemli olmasa da, tüm şifrelerin eşit uzunlukta olması beklenebilir.
  • Ayrı şifrelerine kullanılabilir semboller aşağıda sunulduğu gibidir: !"#$%&'()*+/:;<=>?@[\]^_{|}.
  • İçindeki tüm şifreler leşit uzunlukta olmalıdır.
  • ŞİFRELER İKİ KOLON ARASINDAKİ SARMA POTANSİYELİ OLMALIDIR.
    • Bu, satırlar için de geçerlidir, ancak yalnızca daha yüksek bir bayt adresine gider (0x18-> 0x01 geçersiz).
  • Her iki taraftaki parolaların görüntüleme alanı 15 genişliğindedir (her iki tarafta da boşluk vardır).
    • Hiçbir sözcüğün lbundan daha uzun olmayacağını varsayabilirsiniz .
  • Parolalar yalnızca alfabetiktir, yalnızca harf anlamına gelir.

Misal:

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.
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Eğer n = 2aynı örnek üzerinde:

  _____________________________________________________
 /                                                     \ 
|     _____________________________________________     |
|    |                                             |    |
|    | 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.
|    |_____________________________________________|    |
|                                                       |
\_______________________________________________________/ 
       \_______________________________________/

Bu örnekler manuel olarak hazırlanmıştır, bu yüzden dağıtım rastgele değildir, üzgünüm.

Bu kod golf , en düşük bayt sayısı kabul edilen kazanan olacaktır. Toplam 250 REP için yanıt gönderilmediyse 3 gün sonra bunu ödüllendireceğim.

code-golf  ascii-art  kolmogorov-complexity 
— Sihirli Ahtapot Semaverleri
kaynak
Hızlı! 3 gün boyunca kimse cevap vermiyor! (dalga geçmek). Bu benim yeni favori ascii-art mücadelem.
— nmjcman101
2
@ nmjcman101 Son favorin neydi?
— Sihirli Ahtapot Urn
Ne gelmez NAMES2 maddedeki demek? " Önemli olmasa da, tüm parolaların eşit uzunlukta olması beklenebilir. " Veya " l'deki tüm parolaların eşit uzunlukta olması gerekir . "? Sadece kör olabiliyorum (yine!) Ama RACESher iki çıktıda da görmüyorum - bunu kullanmamak için bir parola kullanılmaması gerektiği anlamına mı gelmeliyiz? Mı Math.randombu meydan amaçları için yeterli bir rastgele (ve benzerleri)?
— Shaggy
2
İki parola arasında alfasayısal olmayan aralayıcılar olmalı mı yoksa yan yana (örtüşmeyen) oluşturuyorlar mı?
— HyperNeutrino
5
Şifrelerin 0x18'den 0x01'e doğru kaydırma olanağı olması gerekiyor mu?
— Jonathan Allan

Yanıtlar:

6

JavaScript (ES8), 575 568 564 bayt

@Shaggy sayesinde 3 bayt kaydedildi

Körleme sözdiziminde girdi alır; (r)(a)burada r kalan deneme sayısı ve a şifre dizisidir.

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)]))

Sözdizimi vurgulayıcı bilerek devre dışı bırakıldı. Bununla ne yapacağına dair hiçbir fikri yok.

gösteri

Kod snippet'ini göster

— Arnauld
kaynak
Bu gibi girişimleri doldurmak için ES8'i kullanarak bir şey kaydedebilir misiniz Attempts Remaining:${" X".repeat(r).padEnd(8)}?
— Shaggy
1
@Shaggy Bu 3 bayt tasarruf sağlar. Teşekkürler!
— Arnauld
Welcome to ROBCO Industries (TM) Termlink'!Password Required#}'!Attempts Remaining:oof ... Golf olmayan lant baytları kurtarmak için başka kelimelerle yazmalıydım.
— Sihirli Ahtapot Urn
4

SOGL V0.12 , 225 bayt

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

Buradan Deneyin!
Yığında dizi girişi ve bir giriş girişi bekler, bu nedenle →"çevrimiçi programda kullanım kolaylığı için eklenir.

— dzaima
kaynak
4

Perl 5 , 588 560 + 1 (a) = 589 561 bayt

Dom'un işaret ettiği önerilerle 28 bayt kesin

$,=$/;$_=" 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

Çevrimiçi deneyin!

Önceden:

$,=$/;$_=" 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

Çevrimiçi deneyin!

Giriş bir satırda, boşlukla ayrılmış: önce dizeler, sonra sayı

Nasıl?

$,=$/;          # 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
kaynak
Karmaşık bir soruna güzel cevap! Tekrarlama operatörünün etrafındaki parantezleri kaldırarak neredeyse 30 bayt kaydedebilmeniz gerekir, .ondalık nokta olarak kullanılmaması için bir boşluk ekleyebilirsiniz . Ayrıca noktalama işaretlerini almak için benzer bir şey kullanabilirsiniz (grep/[^\w,.`-]|_/,map{chr}33..125)ve intbir dizi dizinini aramak zorunda değilsiniz ! whileDöngüyü postfix olarak değiştirmek ve &&bunun yerine kullanmak ifda birkaçını kaydetmelidir. İnşa ederken , haritanın içinde birkaç damla kullanmak yerine $svarsa . Umarım yardımcı olur! $s.=join
— Dom Hastings
4

Python 3 , 585 bayt

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)],())

Çevrimiçi deneyin!

Jonathan Allan sayesinde -70 bayt
Kendim sayesinde -9 bayt (sonunda!)
-Jaja sayesinde -72 bayt

— HyperNeutrino
kaynak
— notjagan
— notjagan
16 tane daha kaldırıldı! (bunu bir sürü yorumdan daha iyi bir yol olmalı)
— notjagan
Diğer değişikliklerimden birini yarı-geri döndürerek bir başka 6 bayt kapalı (gerçekten yorum yapmayı bırakmalıyım).
— notjagan
@notjagan yorum umrumda değil :) Teşekkürler!
— HyperNeutrino
2

JavaScript (ES8), 639 bayt

(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))

Onaltılık etiketler küçük harflidir; büyük harf gerekiyorsa, bu ek 14 bayt olur .toUpperCase().

Test Parçacığı

CodePen üzerinde daha iyi incelendi .

— Justin Mariner
kaynak
2 parametreyi kırarak ve değişkenlerinizi birinciye taşıyarak bir bayt kaydedebilirsiniz repeat.
— Shaggy
Sitemizi kullandığınızda şunları okuyup anladığınızı kabul etmiş olursunuz: Çerez Politikası ve Gizlilik Politikası.
Licensed under cc by-sa 3.0 with attribution required.