Tôi chỉ thích cái cypher đơn giản này, thật thú vị khi đọc những từ không hoàn toàn dễ đọc của con người và lấp đầy những khoảng trống ...

Ot wes thi bist uf tomis, ot wes thi wurst uf tomis, 
ot wes thi egi uf wosdum, ot wes thi egi uf fuuloshniss, 
ot wes thi ipuch uf biloif, ot wes thi ipuch uf oncridaloty, 
ot wes thi siesun uf loght, ot wes thi siesun uf derkniss, 
ot wes thi sprong uf hupi, ot wes thi wontir uf dispeor, 
wi hed ivirythong bifuri as, wi hed nuthong bifuri as, 
wi wiri ell guong dorict tu hievin, wi wiri ell guong dorict thi uthir wey – 
on shurt, thi piroud wes su fer loki thi prisint piroud, 
thet sumi uf ots nuosoist eathurotois onsostid un ots biong riciovid, 
fur guud ur fur ivol, on thi sapirletovi digrii uf cumperosun unly.

Các quy tắc là siêu đơn giản:

• Chấp nhận một số văn bản làm đầu vào (ký tự ascii, chữ in hoa / in thường và dấu chấm câu).
• Đối với mỗi nguyên âm, xoay nó sang nguyên âm tiếp theo hoặc quay lại bắt đầu.
  • a => e
  • e => tôi
  • tôi => o
  • o => u
  • u => a
• Nguyên âm chữ hoa viết hoa chữ thường, nguyên âm chữ thường viết hoa chữ thường.
• Xuất văn bản sau khi chuyển đổi.
• Không cần phải hỗ trợ dấu.
• Tất cả các nhân vật khác sẽ không thay đổi.
• Cố gắng làm điều đó với số lượng byte nhỏ nhất.
• Bất kỳ ngôn ngữ cũ nào bạn thích.

Các trường hợp thử nghiệm

It was the best of times, it was the worst of times,
it was the age of wisdom, it was the age of foolishness,
it was the epoch of belief, it was the epoch of incredulity,
it was the season of light, it was the season of darkness,
it was the spring of hope, it was the winter of despair,
we had everything before us, we had nothing before us,
we were all going direct to heaven, we were all going direct the other way –
in short, the period was so far like the present period,
that some of its noisiest authorities insisted on its being received,
for good or for evil, in the superlative degree of comparison only.

Ngoài:

Ot wes thi bist uf tomis, ot wes thi wurst uf tomis, 
ot wes thi egi uf wosdum, ot wes thi egi uf fuuloshniss, 
ot wes thi ipuch uf biloif, ot wes thi ipuch uf oncridaloty, 
ot wes thi siesun uf loght, ot wes thi siesun uf derkniss, 
ot wes thi sprong uf hupi, ot wes thi wontir uf dispeor, 
wi hed ivirythong bifuri as, wi hed nuthong bifuri as, 
wi wiri ell guong dorict tu hievin, wi wiri ell guong dorict thi uthir wey – 
on shurt, thi piroud wes su fer loki thi prisint piroud, 
thet sumi uf ots nuosoist eathurotois onsostid un ots biong riciovid, 
fur guud ur fur ivol, on thi sapirletovi digrii uf cumperosun unly.

Trong:

The quick brown fox jumps over the lazy dog.

Ngoài:

Thi qaock bruwn fux jamps uvir thi lezy dug.

Trong:

Home is where the heart is.

Ngoài:

Humi os whiri thi hiert os.

Trong:

Boaty McBoatface

Ngoài:

Buety McBuetfeci

Trong:

AEIOUaeiou

Ngoài:

EIOUAeioua

Trong:

Programming Puzzles And Code Golf

Ngoài:

Prugremmong Pazzlis End Cudi Gulf

Stax , 7 byte

öΦΣòC└∞

Chạy và gỡ lỗi nó

Hãy thử trực tuyến!

Giải thích (giải nén)

Vv:tVV:t
Vv:t           #Push aeiou and ring translate it to input
    VV:t       #Push AEIOU and ring translate it to input

Có thể tiết kiệm nhiều hơn, sẽ tiếp tục cố gắng.

MS-SQL, 51 byte

Hoạt động trên SQL 2017 trở lên:

SELECT TRANSLATE(v,'AEIOUaeiou','EIOUAeioua')FROM t

Chức năng mới TRANSLATEthực hiện thay thế nhân vật riêng lẻ, vì vậy rất phù hợp cho thử thách này.

Đầu vào là thông qua một bảng t có sẵn với cột varar v , theo quy tắc IO của chúng tôi .

Trong trường hợp này, bảng phải được tạo bằng cách sử dụng đối chiếu phân biệt chữ hoa chữ thường , bằng cách chạy trên máy chủ phân biệt chữ hoa chữ thường hoặc bằng cách sử dụng COLLATEtừ khóa (không được tính vào tổng số ký tự):

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

EDIT : SSMS có thể cắt bỏ đoạn trích dẫn dài ở trên khi trả kết quả trong cửa sổ "kết quả thành văn bản", đây là cài đặt máy khách, không phải là lỗi trong chương trình của tôi .

Để khắc phục, hãy đi tới Tools > Options > Query Results > SQL Server > Results to Textvà tăng "Số lượng ký tự tối đa được hiển thị trong mỗi cột."

Bash + coreutils , 24

tr aeiouAEIOU eiouaEIOUA

Hãy thử trực tuyến!

Haskell , 52 byte

(a:b)!c|a/=c=b!c|1>0=b!!0
a!b=b
map("aeiouaAEIOUA"!)

Hãy thử trực tuyến!

Lynn đã tiết kiệm cho tôi hai byte bằng cách chỉ ra nó !!0ngắn hơn head.

Giải trình

Nếu bạn chưa bao giờ được mã hóa trong Haskell, điều này có thể sẽ trông giống như một đống jibberish. Vì vậy, trước tiên hãy để ungolf nó và sau đó phá vỡ nó:

(a:b)!c
 |   a/=c   = b!c
 |otherwise = b!!0
a!b=b
map("aeiouaAEIOUA"!)

Đầu tiên chúng ta có một hàm !, trong đó có một chuỗi svà một ký tự c. Khớp mẫu đầu tiên của chúng tôi bắt được chấp nhận đầu vào nếu chuỗi không trống. Nếu chuỗi không trống, chúng ta so sánh ký tự đầu tiên của nó với c. Nếu ký tự đầu tiên không bằng cchúng ta ném nó và gọi !lại với phần còn lại của chuỗi và c. Nếu nó bằng nhau, chúng ta trả về ký tự thứ hai trong chuỗi.

Kết hợp mẫu tiếp theo của chúng tôi sẽ bắt được chuỗi trong tất cả các trường hợp khác, đó là nếu chuỗi trống. Trong trường hợp này, chúng tôi chỉ cần trở lại c.

Tất cả trong tất cả các chức năng này có một ký tự cvà một chuỗi svà trả về ký tự sau lần xuất hiện đầu tiên của cin s. Nếu chúng ta vượt qua điều này với aeiouaAEIOUAnó sẽ thực hiện mật mã của chúng ta trên một ký tự duy nhất. Để làm cho toàn bộ chức năng của chúng ta, chúng ta phải ánh xạ chuỗi này qua chuỗi.

Võng mạc ,10 9 8 byte

T`uo`vVA

Hãy thử trực tuyến!

Đã lưu 1 byte nhờ Neil! Và một byte khác nhờ Martin!

Phiên bản mới của võng mạc có các lớp nguyên âm, làm cho kết quả ngắn hơn một chút. Việc phiên âm cũng sử dụng lớp "khác". Vì vậy, tolớp học trông giống như "aeiouAEIOUA" trong khi fromlớp học trông giống như "uaeiouAEIOUA"

Điều này không gây ra bất kỳ vấn đề nào vì uánh xạ thứ hai Asẽ không bao giờ được thực hiện vì uđã được ánh xạ tới a.

Perl 5 + -p, 24 23 byte

y;AEIOUaeiou;EIOUAeioua

Dùng thử trực tuyến

-1 byte nhờ @DomHastings

Python 3, 62 byte

lambda x:x.translate(str.maketrans('aeiouAEIOU','eiouaEIOUA'))

Tạo một bảng dịch (từ điển) với phương thức strtĩnh str.maketrans. Dịch các nhân vật có liên quan đến nhân vật đích của họ.

C, 85 76 67 65 64 byte

f(char*c){for(;*c;)putchar(1[index("AEIOUAaeioua",*c++)?:c-2]);}

Câu trả lời Java của Kevin Cruijssen . Hãy thử trực tuyến tại đây .

Cảm ơn Kevin Cruijssen vì đã chơi golf 9 byte, đến Christoph để chơi golf 11 byte và chơi bóng trần để chơi golf 1 byte.

Phiên bản bị đánh cắp:

f(char* c) { // function taking a char array as parameter and implicitly returning an unused int
    for(; *c ;) // loop over the input
        putchar(1 [index("AEIOUAaeioua", * c++) ?: c-2]); // find the first pointer to the current char in the vowels string, NULL if not present; if it's not NULL, print the next vowel, otherwise just print the char
}

R , 43 byte

chartr("AEIOUaeiou","EIOUAeioua",scan(,""))

Hãy thử trực tuyến!

Đây là giải pháp của tôi được gói gọn trong catđể giúp nó được in ra độc đáo hơn: Hãy thử trực tuyến!

Thạch , 11 byte

Øcs5ṙ€-Ẏ,Ʋy

Hãy thử trực tuyến!

Python 2 , 79 68 67 byte

-1 byte nhờ @ArnoldPalmer

V='uaeiouAEIOUA'
print''.join((V[1:]+c)[V.find(c)]for c in input())

Hãy thử trực tuyến!

JavaScript (ES6), 60 byte

s=>s.replace(/./g,c=>(S='aeiouaAEIOUA'+c+c)[S.indexOf(c)+1])

Hãy thử trực tuyến!

Ruby -p , 31 byte

$_.tr!"AEIOUaeiou","EIOUAeioua"

Hãy thử trực tuyến!

Bình thường, 17 byte

em=.rQdrB"aeiou"1

Hãy thử nó ở đây

em=.rQdrB"aeiou"1
 m                  For each string...
       rB"aeiou"1   ... in ['aeiou', 'AEIOU']...
  =.rQd             ... cyclically rotate the characters in the input.
e                   Take the last.

Japt 2.0, 25 21 byte

Tôi đã rất vui khi chơi golf với Shaggy.

r\v@=`aeia`pu)g1+UbX

Chạy nó ở đây.

Java 10, 97 87 byte

s->{for(var c:s){var t="AEIOUAaeioua"+c+c;System.out.print(t.charAt(t.indexOf(c)+1));}}

-10 byte sau khi được truyền cảm hứng từ câu trả lời JavaScript của @Arnauld (phiên bản 60 byte của anh ấy) .

Hãy thử trực tuyến.

Giải trình:

s->{                         // Method with character-array parameter and no return-type
  for(var c:s){              //  Loop over the input characters
    var t="AEIOUAaeioua"     //  Temp-String containing the order of vowels 
                             //  (including additional 'A' and 'a'),
          +c+c;              //  appended with two times the current character
    System.out.print(        //  Print:
      t.charAt(              //   The character in String `t` at index:
         t.indexOf(c)+1));}} //    The (first) index of the current character in `t` + 1

05AB1E , 14 13 11 byte

žMDÀ‡žMuDÀ‡

Hãy thử trực tuyến!

Võng mạc 0.8.2 , 20 byte

T`_o`A\EI\OUAaei\oua

Hãy thử trực tuyến! Liên kết bao gồm các trường hợp thử nghiệm.

APL + THẮNG, 55 byte

Lời nhắc cho chuỗi đầu vào:

i←(10≥n←'AEIOUaeiou'⍳s)/⍳⍴s←⎕⋄s[i]←'EIOUAeioua'[n~11]⋄s

Quai bị, 38 byte

R T W $TR(T,"AEIOUaeiou","EIOUAeioua")

Quai bị thường không thêm lợi nhuận vận chuyển, vì tôi không thấy yêu cầu tách đầu vào khỏi đầu ra, nó trông hơi lạ khi chạy lần đầu. Ví dụ: đầu ra cho trường hợp thử nghiệm cuối cùng trông như thế này:

Programming Puzzles And Code GolfPrugremmong Pazzlis End Cudi Gulf

Nếu bạn muốn thêm lợi nhuận vận chuyển, hãy thêm hai byte:

R T W !,$TR(T,"AEIOUaeiou","EIOUAeioua")

Vim + tpope / vim-bãi bỏ , 30 byte

:%S/{a,e,i,o,u}/{e,i,o,u,a}/g<cr>

Giải pháp thay thế, cũng 30 byte:

Oe,i,o,u<esc>|D:%s/{a,<C-r>"}/{<C-r>",a}/g

Theo meta , câu trả lời vim có thể sử dụng các plugin không có hình phạt byte. Đây không phải là một câu trả lời vim, mà là một câu trả lời vim + bãi bỏ .

Abolish là một plugin cực kỳ hữu ích. Phần này của README mô tả độc đáo cách hoạt động của lệnh này ( Subvertlệnh).

CJam , 29 19 byte

q"aeioua"_eu+_1m<er

Hãy thử trực tuyến!

-10 byte nhờ @Peter Taylor

Giải trình:

q                       # take all input
 "aeioua"               # push vowel pairs
         _eu            # duplicate, uppercase
            +_          # concatenate, duplicate again
              1m<       # rotate left by 1
                 er     # transliterate

AutoHotkey , 24 byte

AuotHotkey tự động thay thế các chữ cái theo cách phân biệt chữ hoa chữ thường.

a::e
e::i
i::o
o::u
u::a

PHP, 90 byte

Dùng thử trực tuyến

Mã

function f($s){echo strtr($s,array_combine(str_split(UuAaEeIiOo),str_split(AaEeIiOoUu)));}

Giải trình

function f($s){
 echo strtr(
       $s,                          #The string to operate
       array_combine(               #combining arrays
            str_split(UuAaEeIiOo),  #splitting this strings
            str_split(AaEeIiOoUu))
              # With array combine php creates an array like
              # ["U"=>"A", "a"=>"e"....and so on]
              # strtr can replace strings in a string, using an array with 
              # the values to replace and with what replace each value.
 );
}

75 byte nếu chạy bằng php -rcách sử dụng$argv

<?=strtr($argv,array_combine(str_split(UuAaEeIiOo),str_split(AaEeIiOoUu)));

J , 33 byte

rplc'aeiou',&((;"0)1&|.)'AEIOU'"1

Hãy thử trực tuyến!

str , 18 byte

[aeiouaAEIOUA]#D#U

Hãy thử trực tuyến!

Giải trình

                       implicit: over each character of the input:
[aeiouaAEIOUA]#D#U
[            ]         push this string
              #D       set this to the operation domain
                #U     set the charcter to the next character in the domain

PHP, 38 byte

Khá đơn giản, không sáng tạo lắm, sử dụng strtrđể thay thế các nguyên âm:

<?=strtr($argn,aeiouAEIOU,eiouaEIOUA);

Chạy với echo '<input>' | php -nF <filename>hoặc thử trực tuyến .

q / kdb +, 36 33 byte

Dung dịch:

{(v,2#x)1+(v:"aeiouaAEIOUA")?x}@'

Ví dụ:

q){(v,2#x)1+(v:"aeiouaAEIOUA")?x}@'"AEIOUaeiou"
"EIOUAeioua
q){(v,2#x)1+(v:"aeiouaAEIOUA")?x}@'"Programming Puzzles And Code Golf"
"Prugremmong Pazzlis End Cudi Gulf"

Giải trình:

Chỉ ra chỉ số nguyên âm, thêm một để đẩy tiếp theo và lập chỉ mục. Vẫn nghĩ cách tiếp cận này có thể được cải thiện đáng kể ...

{(v,2#x)1+(v:"aeiouaAEIOUA")?x}@' / the solution
{                             }@' / apply lambda to each character of input
                            ?x    / look up x in...
          (                )      / do together
             "aeiouaAEIOUA"       / lookup list
           v:                     / save as v
        1+                        / add one
 (     )                          / do together
    2#x                           / take 2 copies of x
  v,                              / prepend v

Tiền thưởng:

Giải pháp ** 36 byte (()) cũ của tôi mà tôi nghĩ là khá tuyệt, nhưng cần phải đánh xuống các danh sách để làm cho nó cạnh tranh:

ssr/[;"uoiea%UOIEA%";"%uoiea%UOIEA"]

Than , 35 byte

ＵＴ≔AUOIEAauoieaσＦ¹¹⊞υ➙§σ⊕ι§σι▷SR⟦Ｓυ

Hãy thử trực tuyến!

Phương pháp ngây thơ.

Giải trình:

ＵＴ                                         Set trim option to on, so output won't be a rectangle
    ≔AUOIEAauoieaσ                          Assign "AUIOEAauioea" to s
                   Ｆ¹¹                      For i (ι) from 0 to 10
                       ⊞υ                   Push to u (initially empty list)
                          ➙                 Rule of:
                            §σ⊕ι            S[i + 1]
                                 §σι         to S[i]. This is so a->A gets overwriteen by a->e
                                    ▷SR⟦Ｓυ  Replace input as string using u (now a list of rules)

PHP , 76 byte.

$s=strtr($s,array_combine(str_split("aeiouAEIOU"),str_split("eiouaEIOUA")));

Kiểm tra nó ra!

Đây là lần ngắn nhất tôi có thể làm điều này trong PHP.

$s = //overwrite $s variable ($s should be a defined string or input)
    strtr(  //strtr replaces key => value pairs from arrays in a string
        $s, //the string we are converting
        array_combine( //create an array with key value pairs, key should be original vowel letter and value should be it's replacement
            str_split("aeiouAEIOU") //turn vowels (lower and upper) into an array
            ,str_split("eiouaEIOUA") //turn vowel replacements into an array
        )
    );