코퍼스는 인기있는 비디오 게임에서 가상의 진영이다 Warframe 다소 흥미로운 언어를 가지고있다.

그리니어 (Grineer)와 같은 게임의 다른 진영이 그들의 언어 뒤에 어떤 논리를 가지고 있지만, 코퍼스는 단순히 영어를 잃어버린 대체물입니다.

모든 코퍼스 단어는 다음의 알파벳순 매핑을 제외하고 영어 대응어와 동일합니다.

발음과 관련하여 다음과 같은 문제가 발생합니다.

yes된다된다 yey
say된다 yay
yay된다 yay
sassy된다 yayyy
case된다yaye

다음은 텍스트 버전의 매핑입니다.

a -> a
b -> t
c -> y
d -> p
e -> e
f -> t
g -> j
h -> k
i -> i
j -> t
k -> k
l -> p
m -> s
n -> t
o -> o
p -> k
q -> r
r -> t
s -> y
t -> p
u -> u
v -> t
w -> j
x -> k
y -> y
z -> b

도전

영어 알파벳을 사용하여 텍스트를 제공하면 코퍼스 번역을 출력합니다.

예를 들어, 텍스트 Hello, World!는 Keppo, Jotpp!코퍼스 가 됩니다

규칙

• 입력은 ASCII 인쇄 가능 문자로만 구성됩니다
• 입력 텍스트에 공백과 문장 부호가 포함될 수 있습니다.
• 문자의 대문자를 유지해야합니다
• 이것은 코드 골프 이므로 당연히 가장 적은 바이트가 이깁니다!

테스트 케이스

테스트 케이스는 <===========>입력과 예상 출력 사이에 빈 줄 이있는으로 구분됩니다 .

Hello, World!

Keppo, Jotpp!
<===========>
Yes

Yey
<===========>
TestcaSe

PeypyaYe
<===========>
Programming Puzzles and Code Golf

Ktojtassitj Kubbpey atp Yope Jopt
<===========>
This text has a
newline in it

Pkiy pekp kay a
tejpite it ip
<===========>
Corpus language best language

Yotkuy patjuaje teyp patjuaje
<===========>
Strip the flesh! Salt the wounds!

Yptik pke tpeyk! Yapp pke joutpy!
<===========>
"Install Warframe" they said, "It'll be fun" they said

"Itypapp Jatttase" pkey yaip, "Ip'pp te tut" pkey yaip
<===========>
What the **** did you just ****ing say about me, you little *****?
I'll have you know I graduated top of my class in the Navy Seals,
and I've been involved in numerous secret raids on Al-Quaeda,
and I have over 300 confirmed kills.

Jkap pke **** pip you tuyp ****itj yay atoup se, you pipppe *****?
I'pp kate you ktoj I jtapuapep pok ot sy ypayy it pke Taty Yeapy,
atp I'te teet ittoptep it tusetouy yeytep taipy ot Ap-Ruaepa,
atp I kate otet 300 yottitsep kippy.

보너스

각 테스트 케이스의 Corpus 변환을 발음하는 오디오 녹음 (또는 오디오가 포함 된 비디오)을 포함하는 경우 바이트 수에 1보상을 곱할 수 있습니다 .

배쉬 + 코어 유틸리티, 46

tr b-zB-Z ${a=typetjkitkpstokrtyputjkyb}${a^^}

온라인으로 사용해보십시오!

05AB1E , 24 바이트

ži.•ÜÁ©;«ìñä°ÔG·ÖYΘ•Du«‡

설명:

                       ‡   transliterate
ži                         a-zA-Z with
  .•ÜÁ©;«ìñä°ÔG·ÖYΘ•       atypetjkitkpstokrtyputjkyb
                    Du«    concatenated with itself, uppercased

온라인으로 사용해보십시오!

숯 , 42 바이트

≔”$⌊∧Ｔ-¶I^F⁷ü@n⁹γ›7η”η⭆θ⎇№β↧ι§⎇№βι↧ηη⌕β↧ιι

온라인으로 사용해보십시오! 링크는 자세한 버전의 코드입니다. 설명:

≔                       Assign
 ”$⌊∧Ｔ-¶I^F⁷ü@n⁹γ›7η”  Compressed string `ATYPETJKITKPSTOKRTYPUTJKYB` 
                     η  To variable

 θ                      Input string
⭆                       Map over characters and join
  ⎇                     If
    β                   Lowercase alphabet
   №                    Contains
      ι                 Current character
     ↧                  Lowercased
                        (Then)
        ⎇               If
          β             Lowercase alphabet
         №              Contains
           ι            Current character
                        (Then)
             η          Variable
            ↧           Lowercased
                        (Else)
              η         Variable
       §                Indexed by
               ⌕        Index of
                  ι     Current character
                 ↧      Lowercased
                β       In lowercase alphabet
                        (Else)
                   ι    Current character
                        Implicitly print

T-SQL, 107 바이트

SELECT TRANSLATE(v,'bcdfghjlmnpqrstvwxzBCDFGHJLMNPQRSTVWXZ',
                   'typtjktpstkrtyptjkbTYPTJKTPSTKRTYPTJKB')FROM t

줄 바꿈 및 들여 쓰기는 읽기 쉬운 것입니다.

TRANSLATE문자 교체에 SQL 2017 기능 을 사용합니다 .

불행히도 케이싱을 유지하기 위해 전체 알파벳을 거의 두 번 넣어야했습니다 . 아마도 t를 그룹으로 처리하는 더 나은 방법이있을 수 있지만 이것이 나를 위해 일했습니다.

입력은 기존의 테이블을 통해입니다 t varchar 열을 가진 V , 우리의 IO의 규칙에 따라 .

이 경우, 대소 문자 구분 서버에서 실행하거나 키워드 (문자 총계에 포함되지 않음)를 사용하여 대소 문자 구분 데이터 정렬을 사용하여 테이블을 작성해야합니다 COLLATE.

CREATE TABLE t(v varchar(999) COLLATE Latin1_General_CS_AS)

자바 스크립트 (Node.js) , 100 바이트

s=>s.replace(/[a-z]/gi,c=>(C='_atypetjkitkpstokrtyputjkyb'[Buffer(c)[0]&31],c>{}?C:C.toUpperCase()))

온라인으로 사용해보십시오!

s =>                                  // s = input string
  s.replace(                          // replace in s ...
    /[a-z]/gi,                        // ... all letters, no matter the case
    c => (                            // for each letter c:
      C =                             //   pick a replacement letter C
        '_atypetjkitkpstokrtyputjkyb' //   from a 1-indexed lookup string
        [Buffer(c)[0] & 31],          //   using the 5 lowest bits of the ASCII code of c
      c > {} ?                        //   if the original letter was in lower case:
        C                             //     use the replacement letter as-is
      :                               //   else:
        C.toUpperCase()               //     convert it to upper case
    )                                 // 
  )                                   // end of replace()

R , 79 바이트

function(x)chartr("b-zB-Z",paste0(y<-"typetjkitkpstokrtyputjkyb",toupper(y)),x)

온라인으로 사용해보십시오!

문자 그대로 소문자와 대문자를 모두 입력하는 것보다 3 바이트 만 짧습니다 ...

R , 79 바이트

function(x,`[`=chartr)"B-Z"[toupper(y),"b-z"[y<-"typetjkitkpstokrtyputjkyb",x]]

온라인으로 사용해보십시오!

더 멋진 바이트, 같은 바이트 수.

펄 5 -p , 54 바이트

eval"y/B-Zb-z/".uc($a=typetjkitkpstokrtyputjkyb)."$a/"

온라인으로 사용해보십시오!

루비 , 55 바이트

$_.tr!"b-zB-Z",(x="typetjkitkpstokrtyputjkyb")+x.upcase

온라인으로 사용해보십시오!

J , 78 61 바이트

FrownyFrog 덕분에 -17 바이트!

rplc(u:,98 66+/i.25);"0(,toupper)@'typetjkitkpstokrtyputjkyb'

온라인으로 사용해보십시오!

C # (Visual C # 대화식 컴파일러) , 151 83 바이트

n=>n.Select(a=>char.IsLetter(a)?(char)(" ATYPETJKITKPSTOKRTYPUTJKYB"[a%32]|a&32):a)

온라인으로 사용해보십시오!

Pietu1998 덕분에 무려 68 바이트를 절약했습니다!

K (ngn / k) , 87 63 61 60 59 바이트

f:{`c$x-a-@[!128;98+!25;:;0+"typetjkitkpstokrtyputjkyb"]a:_x}

온라인으로 사용해보십시오!

{ } 인수 기능 x

_ 소문자로

a: 할당하다 a

!128 목록 0 1 2 ... 127

@[!128; 지수 ;:; 값 ] 은 인덱스 의 요소를 주어진 값 으로 대체하여 수정 합니다.

98+!2598 99 100 ... 122에 대한 ASCII 코드 목록 "bcd...z"

juxtaposition은 인덱싱이므로 a수정 된 목록에서 인덱스로 암시 적으로 정수로 변환합니다.

x-a- 빼다 a 빼고 양식을 빼십시오 x. 이것은 원래 문자열에서와 같이 대문자 / 소문자를 복원합니다

`c$ 문자로 변환

레티 나 0.8.2 , 59 바이트

[a-z]
 $&
T`l`L
T`L`ATYP\ETJKITKPST\OKRTYPUTJKYB
T`L `l_` .

온라인으로 사용해보십시오! 링크에는 테스트 사례가 포함됩니다. 설명:

[a-z]
 $&

각 문자 앞에 비 ASCII 문자를 붙입니다. (단단하지 않은 공간을 사용하려고 시도했지만 Firefox에서 복사하여 붙여 넣은 후에 공백을 일반 공간으로 다시 변경했을 수 있습니다.)

T`l`L

모든 글자가 대문자입니다.

T`L`ATYP\ETJKITKPST\OKRTYPUTJKYB

글자를 코퍼스로 변환합니다.

T`L `l_` .

비 ASCII 문자 뒤의 문자를 소문자로 바꾸고 비 ASCII 문자를 삭제하십시오.

Naïve 솔루션은 63 바이트입니다.

T`lL`aty\petjkitk\pst\okrty\putjkybATYP\ETJKITKPST\OKRTYPUTJKYB

온라인으로 사용해보십시오! 링크에는 테스트 사례가 포함됩니다.

파이썬 2 , 115 바이트

lambda i:i.translate(''.join(a))
a=map(chr,range(256))
b='typetjkitkpstokrtyputjkyb'
a[66:91]=b.upper();a[98:123]=b

온라인으로 사용해보십시오!

@ElPedro의 답변에서 채택되었습니다. 이렇게하면 배열의 모든 ASCII 문자를 대체 a한 다음str.translate .

문자 배열 반환이 허용되는 경우 113 바이트 로 가져올 수 있습니다 .

lambda i:[a[ord(x)]for x in i]
a=map(chr,range(256))
b='typetjkitkpstokrtyputjkyb'
a[66:91]=b.upper();a[98:123]=b

온라인으로 사용해보십시오!

젤리 , 29 바이트

“qḍỊYl4ḃ©ƭṄxḳ½Dy’ṃⱮØA,Øa¤⁺żẎy

온라인으로 사용해보십시오!

apt , 37 바이트

;®i`…ypetjkŠkp¡okrtyp©jkyb`pu)gCpu bZ

온라인으로 사용해보십시오!

위의 링크에는 대부분의 테스트 사례가 포함되어 있지만 작은 따옴표와 큰 따옴표가 모두 포함되어 있기 때문에 마지막으로 두 번째 문자열을 문자열로 입력 할 수 없었습니다. 다음 은 테스트 사례입니다. 대신 문자 배열로 입력하십시오.

설명:

;                                        #Set C to the lowercase alphabet
 ®                                       #For each character Z of the input:
                                   bZ    # Find its index in:
                               C         #  The lowercase alphabet
                                pu       #  Plus the uppercase alphabet
                                         #  (-1 if it is not a letter)
                              g          # And get the character at that index in:
   `…ypetjkŠkp¡okrtyp©jkyb`              #  Get the lowercase Corpus alphabet
                           pu)           #  Plus the uppercase Corpus alphabet
  i                                      #  Add Z at the end (index -1)

파이썬 2 , 138132 바이트

def f(i,a='bcdfghjlmnpqrstvwxz',b='typtjktpstkrtyptjkb'):a+=a.upper();b+=b.upper();return''.join((x,b[a.find(x)])[x in a]for x in i)

온라인으로 사용해보십시오!

람다보다 이름이 지정된 함수로 실제로 더 짧습니다!

람다 버전, 138 바이트

lambda i,a='bcdfghjlmnpqrstvwxzBCDFGHJLMNPQRSTVWXZ',b='typtjktpstkrtyptjkbTYPTJKTPSTKRTYPTJKB':''.join((x,b[a.find(x)])[x in a]for x in i)

온라인으로 사용해보십시오!

131 125 문자 배열을 반환join하고 함수 외부에 반환 할 수있는 경우.

def f(i,a='bcdfghjlmnpqrstvwxz',b='typtjktpstkrtyptjkb'):a+=a.upper();b+=b.upper();return[(x,b[a.find(x)])[x in a]for x in i]

온라인으로 사용해보십시오!

PHP , 100 바이트

암호

<?=strtr($argv[0],($u=bcdfghjklmnpqrstvwxyz).($f=strtoupper)($u),($v=typtjktkpstkrtyptjkyb).$f($v));

온라인으로 사용해보십시오!

설명

# using the provided character mapping given on the question, as an array
strtr($argv[0],                                  # strtr for the string replacement
($u=bcdfghjklmnpqrstvwxyz).($f=strtoupper)($u),  # Taking onthe the keys for the first string
($v=typtjktkpstkrtyptjkyb).$f($v));              # Using the values for second string
 # In both Strings appending the upper version of each string.

피쓰, 35 바이트

XQ.*m+r1dd[tG."byàHuH¯¹e?rJyfh

시도 해봐!

아마도 왼쪽 맵이나 두 개의 d를 제거하기 위해 무언가를 사용할 수는 있지만 어떻게 알아낼 수 없었습니다.

자바, 211 바이트

a->{String b="BCDFGHJLMNPQRSTVWXZbcdfghjlmnpqrstvwxz",c="TYPTJKTPSTKRTYPTJKBtyptjktpstkrtyptjkb";a.chars().map(x->{int z;return(z=b.indexOf(x))>-1?c.toCharArray()[z]:x;}).forEach(x->System.out.print((char)x));};

온라인으로 사용해보십시오!

Pyth, 34 자

J. "byàHuH¯¹e? rJyfh"XXztGJrtG1rJ1

온라인으로 사용해보십시오!

문자열은 "typetjkitkpstokrtyputjkyb" 의 압축 버전입니다 . 어떤 이유로 Pyth가 "atypetjkitkpstokrtyputjkyb" 를 압축 할 수없는 이유 함수로

+++ \. N ++ hSzeSzCi-RChSzCMz-hCeSzChSzN

Tcl , 114 바이트

proc C s {string map [split {btcydpftgjhkjtlpmsntpkqrrtsytpvtwjxkzbBTCYDPFTGJHKJTLPMSNTPKQRRTSYTPVTWJXKZB} ""] $s}

온라인으로 사용해보십시오!

루아 , 153 바이트

t="atypetjkitkpstokrtyputjkyb"for c in(...):gmatch"."do i=c:lower():byte()-96n=t:sub(i,i)io.write((i<0or i>26)and c or(c==c:upper()and n:upper()or n))end

온라인으로 사용해보십시오!