Bleeeet Bleeeet Bl Bleet!


18

(Artinya: Konversi Bahasa Inggris ke Bleet)

Kami telah memuji kambing sebagai dewa selama bertahun-tahun sekarang.

Tetapi jika kita tidak dapat menerjemahkan bahasa Inggris ke 'Bleet', bahasa Goat God, kita tidak dapat berkomunikasi dengan mereka.

Jadi, untuk berkomunikasi dengan mereka, kami telah meneliti aktivitas kambing, dan mengambil pola ini, yang merupakan inti dari bahasa tersebut.

Ucapkan 'Bleet' untuk panjang setiap kata. Itu berarti jumlah 'e' harus (panjang-3) untuk kata-kata yang lebih panjang dari 3 huruf. Anda harus mengurangi 'Bleet' untuk kata-kata yang lebih pendek dari 'Blt'. Misalnya, 'menjadi' menjadi 'bl', tetapi 'kucing' dan 'kapal' menjadi 'blt' dan 'blet'.

Sepertinya, mereka tidak benar-benar mengubah karakter non-alfabet menjadi 'Bleet'. Penelitian kami menunjukkan bahwa 'Halo, Dunia!' untuk Bleet adalah 'Bleet, Bleet!' bukan 'Bleeet Bleeet'. Juga, Kambing tidak begitu cerdas (jangan tersinggung), sehingga mereka tampaknya tidak mengerti karakter atau diakritik non-ascii sama sekali.

Sekarang, saatnya membuat penerjemah untuk berkomunikasi dengan para dewa kambing.

Bleeeeet (Artinya: Contoh)

Hello, World! => Bleet, Bleet!
lorem ipsum dolor sit amet. => Bleet Bleet Bleet Blt Blet.
We praise the Goat God! => Bl Bleeet Blt Blet Blt!
I have a pen => B Blet B Blt
0123456789_ => 0123456789_
0te_st1 => 0Bl_Bl1


1
Dan bagaimana dengan kata-kata yang mengandung apostrof? Akan it'smenjadi Bltatau Bl'tatau Bl'B?
Kevin Cruijssen

3
Terserah Anda, tetapi jika Anda menyimpannya, saya akan memberi tahu setiap penjawab. Kalau saya saya pikir saya mungkin akan membiarkan perilaku setiap: melewati mereka ( Jimmy's: Bleee't), memperlakukan mereka sebagai pemisahan kata ( Jimmy's: Bleet'B), atau memperlakukan mereka sebagai bagian dari kata-kata ( Jimmy's: Bleeeet). Jika saya harus memilih satu, saya akan memilih opsi pemisah kata, karena itulah yang dilakukan oleh 6 jawaban.
Jonathan Allan

2
Ini tantangan yang sangat bagus, kita harusnya lebih seperti ini.
Downgoat

2
@Downgoat berkualitas, atau kambing-bijaksana?
Matius Roh

Jawaban:


13

Retina , 31 byte

T`lL`e
(?<!e)e
B
Be
Bl
e(?!e)
t

Cobalah online!

Penjelasan

T`lL`e

Ubah semua huruf menjadi es.

(?<!e)e
B

Ubah yang pertama edi setiap lari ke B.

Be
Bl

Berubah Bemenjadi Bl.

e(?!e)
t

Ubah yang terakhir edi setiap run menjadi t.


T1Lyang Ttahap "membungkus" pasangan terjemahan sehingga Anda dapat mengubah semua huruf seperti itu untuke
Conor O'Brien

@ ConorO'Brien Ini sebenarnya huruf kecil l, bukan 1, tapi saya tidak yakin apa yang Anda maksud dengan "bungkus". Transliterasi hanya mengulangi karakter terakhir dalam pola target, jadi jika ya T`lL`ef, Anda akan memetakan ake edan semua huruf lainnya f, tidak secara bergantian ke edan f.
Martin Ender

itu adalah lelucon yang buruk. Maaf
Conor O'Brien

4

JavaScript (ES6), 79 77 74 byte

s=>s.replace(/[A-Z]+/gi,x=>x.replace(/./g,(_,i)=>'Bl'[i]||'et'[+!x[i+1]]))

Pendekatan alternatif, saat ini 83 78 byte:

s=>s.replace(/[A-Z]+/gi,x=>`Bl${'e'.repeat((l=x.length)>3&&l-3)}t`.slice(0,l))

Yang terbaik yang bisa saya lakukan secara rekursif adalah 88 byte:

f=([c,...s],i=0,q=/^[A-Z]/i)=>c?q.test(c)?('Bl'[i]||'te'[+q.test(s)])+f(s,i+1):c+f(s):''

Saya datang dengan 'Blet'[i>1?2+!x[i+1]:i]tetapi sayangnya itu memiliki panjang yang sama.
Neil

@Neil Ya, saya pikir akan mungkin untuk melakukannya dengan cara itu, tapi saya terkejut itu hampir lebih pendek dari cara saya melakukannya.
ETHproduk

4

PHP, 115 88 86 77 75 byte

preg_replace dengan array (membutuhkan PHP 5.4 atau yang lebih baru)

echo preg_replace(["#[a-z]#i","#(?<!e)e#",_Be_,"#e(?!e)#"],[e,B,Bl,t],$argn);

Jalankan dengan echo '<string>' | php -nR '<code>'atau coba online .

kerusakan

SEARCH      EXPLANATION             REPLACE     EXAMPLE
            original string                     Hello
[a-z]       every letter            e           eeeee
(?<!e)e     first letter            B           Beeee
Be          first two letters       Bl          Bleee
e(?!e)      last letter if still e  t           Bleet

Revisi 5: disimpan 9 byte dengan rantai regex Martin Ender .
(Itu juga memperbaiki kasus dengan karakter kata non-alfabet = digit / garis bawah.)


3

Haskell , 135 128 byte

b"e"="B"
b"ee"="Bl"
b('e':_:_:e)="Bl"++e++"t"
b e=e
e!(l:t)|elem l$['a'..'z']++['A'..'Z']=('e':e)!t|1<3=b e++l:""!t
e!_=[]
(""!)

Cobalah online! Penggunaan (""!) $ "some string". Tanpa regex, ini ternyata cukup panjang, mungkin beberapa pendekatan lain lebih pendek. Sunting: Disimpan 7 byte berkat @nimi!


1
Mengganti nama fungsi buntuk aAnda dapat menerapkannya segera ketika membangun string yang dihasilkan dan menghilangkan final =<<: b!(l:t)|...|1<3=a b++l:""!t;b!_=a b;(""!).
nimi

Tidak bekerja secara online untuk Ini uji Jimmy, saya mendapatkan Bl'B Bleet'B
cleblanc

@cleblanc Persyaratan ini ditambahkan setelah jawaban saya dan membatalkan sebagian besar jawaban saat ini ... izinkan saya bertanya pada OP.
Laikoni

@Laikoni Benar. Saya datang terlambat ke permainan ini dan tanda kutip adalah pengecualian yang sangat sulit untuk ditangani.
cleblanc

2

Perl 5 , 47 byte

Disimpan 15 byte dengan menggunakan teknik yang sama seperti jawaban Retina Martin Ender . (Jawaban ini pada dasarnya adalah port dari jawabannya sekarang)

46 byte kode + -pbendera.

s/\pl/e/g;s/(?<!e)e/B/g;s/Be/Bl/g;s/e(?!e)/t/g

Cobalah online!


Versi yang lebih lama: 62 byte:

s/\pl+/$l=length$&;$_=Bl.e x($l-3).t;chop while$l<y%%%c;$_/ge

Dan 68 byte:

s%\pl+%$_=$&;s/./B/;s/.\K./l/;s/(?<=..).(?=.)/e/g;s/..\K.$/t/;$_%ge

2

PHP, 84 Bytes

<?=preg_replace(["#[a-z]#i","#(?<!l)l#","#(?<=l)l#","#e(?!e)#"],[l,B,e,t],$argv[1]);

PHP, 117 Bytes

<?=preg_replace_callback("#[a-z]+#i",function($m){return substr(str_pad(Bl,-1+$l=strlen($m[0]),e).t,0,$l);},$argv[1]);

Simpan satu byte dengan-1+$l=...
Titus

@Titus bagus dan saya telah menemukan solusi yang lebih baik
Jörg Hülsermann

1
Zwei Dumme - ein Gedanke. :) Tapi \blgagal untuk karakter kata non-abjad: _we_. Anda perlu sebuah pernyataan eksplisit: (?<!l)l. Sama untuk e\b-> e(?!e)(+7 byte)
Titus

@Itus Sementara itu saya sendiri menyadari bahwa pikiran saya salah. Dan saya suka komentar bahasa Jerman Anda.
Jörg Hülsermann

2

C, 120 151 140 111 108 105 104 92 90 Bytes

Bekerja untuk "Ini uji coba Jimmy" -> Bl'B Bleet'B Blet

j;f(char*m){for(;*m=!isalpha(*m++)?j=0,*(m-1):"*Blet"[isalpha(*m)?j^3?++j:j:j>1?4:++j];);}

Outputnya sekarang merupakan efek samping dengan menghancurkan string asli.

main(c,v)char**v;{
    char test[] = "The End is near Fellows!";
    f(test);puts(test);
    char test2[] = "We praise the Goat God!";
    f(test2);puts(test2);
    char test3[] = "It's Jimmy's test";
    f(test3);puts(test3);
    char test4[] = "0te_st1";
    f(test4);puts(test4);
    char test5[] = "I have a pen";
    f(test5);puts(test5);
    char test6[] = "_0123456789_";
    f(test6);puts(test6);
}

Saya pikir itu setidaknya benar sekarang

Blt Blt Bl Blet Bleeeet!
Bl Bleeet Blt Blet Blt!
Bl'B Bleet'B Blet
0Bl_Bl1
B Blet B Blt
_012345678_


@Dosc Aku belum gila dan mati.
cleblanc

2

Python 2.7, 129 118 114 109 95 91 88 byte

import re
s=re.sub
def f(i):print s(r"e\b","t",s("Be","Bl",s(r"\be","B",s("\w","e",i))))

Hanya sebuah re.subrantai

Selangkah demi selangkah

Input contoh: " Kami memuji Dewa Kambing! "


Sub alias sehingga kami dapat menyimpan byte pada panggilan berulang

import re
s=re.sub

Ganti semua karakter kata dengan "e"

s("\w","e",i)

Keluaran: ee eeeeee eee eeee eee!

Ganti semua "e" yang diawali dengan batas kata (Awal kata) dengan "B"

s(r"\be","B",s("\w","e",i))

Keluaran: Be Beeeee Bee Beee Bee!

Ganti semua "Jadilah" dengan "Bl"

s("Be","Bl",s(r"\be","B",s("\w","e",i)))

Keluaran: Bl Bleeee Ble Blee Ble!

Ganti semua "e" yang diikuti oleh batas kata dengan "t"

s(r"e\b","t",s("Be","Bl",s(r"\be","B",s("\w","e",i))))

Keluaran: Bl Bleeet Blt Blet Blt!


Selamat datang di PPCG! Kami mengizinkan fungsi untuk mencetak hasilnya, jadi mengganti returndengan printharus menghemat satu byte.
Conor O'Brien

Anda juga dapat menghapus yang utama rdari string mentah jika mereka tidak memiliki serangan balik di dalamnya menyimpan 3 byte lainnya
Conor O'Brien

Terima kasih @ ConorO'Brien! Saya dapat menyederhanakan sepotong regex (yang akhirnya membutuhkan sebuah r) dan saya turun ke 95 byte. Terima kasih untuk sarannya!
Brandon Sturgeon

Baiklah saya mendapatkannya hingga 88 byte dan saya pikir itu yang terbaik yang bisa saya lakukan di sini
Brandon Sturgeon

1

Pip , 28 byte

aR+XA{Y'eX#a-3\"Bl\yt\"@<#a}

Mengambil input sebagai argumen baris perintah. Cobalah online!

Penjelasan

Ini menyenangkan - saya harus menggunakan pengubah regex dan interpolasi string.

                              a is 1st cmdline arg; XA is the regex `[A-Za-z]` (implicit)
aR                            In a, replace
   XA                          the regex XA
  +                            wrapped in (?:  )+
     {                     }  with this callback function:
          #a-3                 Length of argument - 3
       'eX                     Repeat e that many times (empty string if #a-3 is negative)
      Y                        Yank that string into the y variable
              \"Bl\yt\"        An escaped string, which interpolates the value of y
                       @<#a    Take first len(a) characters
                              After the replacement, the string is autoprinted

1

Python 3, 271 byte

Saya sadar bahwa ini agak panjang dan saya menyambut saran tentang cara mengurangi panjangnya.

def f(s):
 b=[];t='';f=[];a=list.append
 for c in s:
  if c.isalpha():t+='e'
  else:
   if t:a(b,t);t=''
    a(b,c)
 if t:a(b,t)
 for i in b:
  i=[*i]
  if i[0]=='e':
   i[0]='B';i[-1]=[i[-1],'t'][len(i)>2]
   if len(i)>2:i[1]='l'
  a(f,''.join(i))
 return ''.join(f)

Selamat datang di situs ini! Saya melihat beberapa golf yang bisa Anda buat. Anda dapat mengunjungi halaman tips kami untuk daftar tips yang berguna untuk bermain golf di Python.
Wheat Wizard

alih-alih x.append(y)atau dalam kasus a(x,y)Anda,, Anda dapat melakukan x+=y,(diperlukan koma)
Cyoce

1

ditumpuk , 57 byte

'\l+'{!n size 2-:4\^5*1+3/\1<-4 tb 0\,'Blet'\#''join}repl

Cobalah online! Mengambil input dari atas tumpukan.

Biarkan a ( n ) = A136412 ( n - 2) = (5 × 4 n - 2 + 1) ÷ 3. Konversi a ( n ) menjadi basis 4 menghasilkan:

a (3) = 13 4 
a (4) = 123 4 
a (5) = 1223 4 
a (6) = 12223 4
...

Memetakan indeks 0..3 ke string Blet, kita mendapatkan:

a (3) = lt
a (4) = biarkan
a (5) = leet
a (6) = leeet
...

Sekarang, mengawali Bmemberi kita string yang diinginkan, mengingat panjangnya. Kebanyakan. Satu hanya perlu menangani kasus khusus untuk n ≤ 2. Dalam kasus saya, ini diselesaikan dengan mengurangi ( n - 2 <1) sebagai boolean numerik (1 untuk "benar" dan 0 untuk "salah").

Adapun spesifik dari jawabannya:

'\l+'{! ... }repl
             repl    replace all
'\l+'                alphanumeric strings ("letters")
     {!     }        applying this function to the result.


0

Java 7, 201 byte

String c(String s){String r="",z="e([^e]|$)";char p=0;int x;for(char c:s.toCharArray()){x=c&~32;p=x>64&x<91?p==66?'l':p>100&p<109?'e':66:c;r+=p;}return r.replaceAll("l"+z,"lt$1").replaceAll(z,"et$1");}

Tidak benar-benar senang dengan itu, dan tentu saja bisa bermain golf lagi ..

Penjelasan:

String c(String s){               // Method with String parameter and String return-type
  String r="",                    //  The return-String
         z="e([^e]|$)";           //  Partial regex String that's used twice ('e' followed by non-'e' or nothing)
  char p=0;                       //  The previous character
  int x;                          //  Another temp value
  for(char c : s.toCharArray()){  //  Loop over the characters of the input String
    x = c&~32;                    //   Make every lowercase character uppercase (this returns an integer, hence the integer temp value, which is shorter than a cast to char)
    p = x>64 & x<91 ?             //   If the current character is a letter:
         p == 66 ?                //    And if the previous character is 'B':
          'l'                     //     Set the character value to 'l'
         : p>100&p<109 ?          //    Else if the previous character is either an 'e' or 'l':
            'e'                   //     Set the character value to 'e'
           :                      //    Else:
            66                    //     Set the character value to 'B'
         :                        //   Else (not a letter):
          c;                      //    Set the character to the current character
    r += p;                       //   Append the result-String with this character
  }                               //  End loop
  return r                        //  Return the result-String
    .replaceAll("l"+z,"lt$1")     //   After we've replaced all occurrences of "le." with "lt." (where "." can be anything else, including nothing at the end of a line)
    .replaceAll(z,"et$1")         //   And also replaced all occurrences of "ee." with "et." (where "." can again be anything else)
}                                 // End of method

Kode uji:

Coba di sini.

class M{
  static String c(String s){String r="",z="e([^e]|$)";char p=0;int x;for(char c:s.toCharArray()){x=c&~32;p=x>64&x<91?p==66?'l':p>100&p<109?'e':66:c;r+=p;}return r.replaceAll("l"+z,"lt$1").replaceAll(z,"et$1");}

  public static void main(String[] a){
    System.out.println(c("Hello, World!"));
    System.out.println(c("lorem ipsum dolor sit amet."));
    System.out.println(c("We praise the Goat God!"));
    System.out.println(c("I have a pen"));
    System.out.println(c("0123456789_"));
    System.out.println(c("0te_st1"));
  }
}

Keluaran:

Bleeet, Bleeet!
Bleeet Bleeet Bleeet Blt Bleet.
Bl Bleeeet Blt Bleet Blt!
B Bleet B Blt
0123456789_
0Bl_Bl1

s.split("")bukannya s.toCharArray()menghemat beberapa saya percaya
Kritixi Lithos

@ KritixiLithos Saya mencobanya, tetapi kemudian saya memiliki masalah memeriksa apakah String adalah huruf ( x=c&~32tidak akan berfungsi pada String, dan x>64&x<91keduanya tidak akan berfungsi lagi). Jika Anda bisa membuatnya lebih pendek dengan perpecahan, beri tahu saya.
Kevin Cruijssen

0

05AB1E , 36 byte

lDAsSå.¡€g£vyAySåPigÍ<'e×"Blÿt"yg£}J

Cobalah online! atau sebagai Test suite

Penjelasan

Siapkan input:

lD                                    # convert input to lower-case and duplicate
  As                                  # push lower-case alphabet and swap input to the top
    Så                                # check each char in input for 
                                      # membership in the alphabet
      .¡                              # split into chunks of equal elements
        €g                            # get length of each chunk
          £                           # split input into chunks of those lengths

Ini membuat daftar seperti ['hello', ', ', 'world', '!'] untuk inputHello, World!

Iterate over list:

v                          # for each element in the list
 y                         # push current element
  AySåPi               }   # if all members of current element are letters
        gÍ<'e×             # repeat string "e" len(element)-3 times
              "Blÿt"       # replace "ÿ" with the e's in the string "Blÿt"
                    yg£    # take the first len(element) chars of the string
                        J  # join to string
Dengan menggunakan situs kami, Anda mengakui telah membaca dan memahami Kebijakan Cookie dan Kebijakan Privasi kami.
Licensed under cc by-sa 3.0 with attribution required.