Video Tutmaya Devam Et ve Kimse Patlamıyor video oyunu için kullanıcı tarafından oluşturulan bir modül olan Emoji Math'da, sayılar ifadelerin dizeleri olarak yazılır, burada her ifade bir 10 basamağı temsil eder. Aşağıda rakamlar ve ifadeler arasındaki dönüşüm tablosu bulunmaktadır.

Digit | Emoticon
  0   |    :) 
  1   |    =(  
  2   |    (: 
  3   |    )=  
  4   |    :(    
  5   |    ):  
  6   |    =)  
  7   |    (= 
  8   |    :|  
  9   |    |: 

Bir sayı verildiğinde Emoji Math kodlamasında çıktı alın. Sayısal olmayan karakterlerin olmadığını varsayabilirsiniz.

Bu kod golf , bu yüzden bayttaki en kısa cevap kazanır.

Japt , 29 24 bayt

@Shaggy sayesinde -5 bayt

s":)=((:)=:():=)(=:||:"ò

Girişi dize olarak alır

Çevrimiçi deneyin!

C (gcc) , 62 58 bayt

Tavan kedisi sayesinde -4 bayt

f(n){n&&write(1,":)=((:)=:():=)(=:||:"+n%10*2,2,f(n/10));}

Çevrimiçi deneyin!

05AB1E , 26 bayt

"|:(=):)=:)"2ôºJ2ô`Šr)sSèJ

Çevrimiçi deneyin!

Python 2 , 65 62 bayt

lambda n:''.join(':=():)=(:|)(:=(:)=|:'[int(c)::10]for c in n)

Çevrimiçi deneyin!

TI-BASIC, 79 bayt

Ans→Str1:" :For(I,1,length(Str1:Ans+sub(":)=((:)=:():=)(=:||:",1+2expr(sub(Str1,I,1)),2:End:sub(Ans,2,length(Ans)-1

Girdi, içindeki bir basamak dizesidir Ans.
Çıktı, Emoji Math kodlu sayıdır.

Örnekler:

"134
134
prgmCDGF1C
:)(:)=
"2213894
2213894
prgmCDGF1C
(:(:=()=:||::(

Açıklama:

Ans→Str1                                                 ;store the input in Ans
"                                                        ;leave " " in Ans
For(I,1,length(Str1                                      ;loop over each character in the
                                                         ; input string
Ans+sub(":)=((:)=:():=)(=:||:",1+2expr(sub(Str1,I,1)),2  ;convert the current character
                                                         ; to a number and use it as the
                                                         ; index into the encoding string
                                                         ; then append the encoded digit
End
sub(Ans,2,length(Ans)-1                                  ;remove the prepended space and
                                                         ; store the result in Ans
                                                         ;implicit print of Ans

Alternatif olarak, sayı yerine dize yerine 94 baytlık bir çözüm var:

int(10fPart(Ans₁₀^(seq(⁻X-1,X,0,log(Ans→L₁:" :For(I,dim(L₁),1,-1:Ans+sub(":)=((:)=:():=)(=:||:",1+2L₁(I),2:End:sub(Ans,2,length(Ans)-1

Örnekler:

134
             134
prgmCDGF1C
:)(:)=
2213894
         2213894
prgmCDGF1C
(:(:=()=:||::(

Açıklama:

int(10fPart(Ans₁₀^(seq(⁻X-1,X,0,log(Ans→L₁     ;generate a list of the input's digits
                                             ; reversed and store it in L₁
"                                            ;leave " " in Ans
For(I,dim(L₁),1,-1                            ;loop over L₁ backwards
Ans+sub(":)=((:)=:():=)(=:||:",1+2L₁(I),2     ;use the value of the I-th element in L₁ as
                                              ; the index into the encoding string then
                                              ; append the encoded digit
End
sub(Ans,2,length(Ans)-1                       ;remove the prepended space and store the
                                              ; result in Ans
                                              ;implicit print of Ans

Notlar:

• TI-BASIC tokenize bir dildir . Karakter sayısı bayt sayısına eşit değil .

• |yalnızca bu montaj programı kullanılarak erişilebilen iki baytlık 0xBBD8 belirtecidir .

Perl 5 -p , 42 bayt

s/./substr":)=((:)=:():=)(=:||:",$&*2,2/ge

Çevrimiçi deneyin!

Java 8, 80 bayt

n->n.forEach(i->System.out.print(":)=((:)=:():=)(=:||:".split("(?<=\\G..)")[i]))

Çevrimiçi deneyin.

Açıklama:

n->                           // Method with IntStream parameter and no return-type
  n.forEach(i->               //  For each digit `i` in the input:
    System.out.print(         //   Print without newline:
      ":)=((:)=:():=)(=:||:"  //    Push this String
        .split("(?<=\\G..)")  //    Split into parts of size 2
          [i]))               //    And print the `i`'th part

JS ES6, 77 66 bayt

@Charlie Harding ve @asgallant'ın önerileri sayesinde 66'ya kadar

Bu eğlenceli küçük bir meydan okuma olduğu için nihayet codegolf bir hesap yapmak zorunda kaldım!

Yalnızca dize girdisi beklenirken orijinal yanıtın en minimal biçimi:

n=>[...n].map(c=>":)=((:)=:():=)(=:||:".match(/../g)[c]).join("")

İkincisi, daha uzun bir regex kullanan ve ilk girdi bir dizeye zorlar benim orijinal cevap, Bu hem sayı türü girişi hem de basamak dizisi girişi ile çalışır.

İlk önce girdiyi bir dizeye zorlar, bu da es6 yayılımını kullanarak bir diziye zarar verir. Sonra regex ile yapılan bir diziden doğru ifade kapmak bir eşleştirici cb ile eşleyin /.{1,2}/g. Son olarak, ortaya çıkan ifadeler dizisi bir dizeye geri eklenir.

n=>[...(""+n)].map(c=>":)=((:)=:():=)(=:||:".match(/.{1,2}/g)[c]).join("")

JS dizi şeyler eğlenceli. Eminim hala optimizasyon için yer var, bu, her döngüdeki normal ifadeyle eşleşiyormap .

Crappily aşağıdakilerle test edilmiştir:

let emoticonize = n=>[...(""+n)].map(c=>":)=((:)=:():=)(=:||:".match(/../g)[c]).join("")

let test = arr => 
console.log(arr.map(x => ({ask:x, ans: emoticonize(x)})))

test([1,40,3697, 2330])
test(["1","40","3697", "2330"])

Haskell, 64 56 _Laikoni bayt

((words":) =( (: )= :( ): =) (= :| |: "!!).read.pure=<<)

Çevrimiçi deneyin

Ungolfed

İşlevini uygulayın wordssembollerin bizim boşlukla ayrılmış dizeye ":) =( (: )= :( ): =) (= :| |: "bir listesini almak ve almak için v- inci elemanı (!!)her için n sonuçlarını birleştirerek, bizim giriş dizesi. nb (=<<) , concatMapbu durumda bir dizeyi bir dize listesiyle eşleştirir ve sonuçları birleştirir. read . purebir karakteri bir dizeye kaldırarak ve sonra readbir int'e çevirerek bir karakteri int'e dönüştürür.

f x = ((words ":) =( (: )= :( ): =) (= :| |: " !!) . read . pure) =<< x

[R], 59 48 bayt

farklı yaklaşım:

 substr(":)=((:)=:():=)(=:||:",n<-2*scan()+1,n+1)

beni tekrar yönlendirdiği için @aaron'a teşekkürler :)

orijinal:

 el(strsplit(":)x=(x(:x)=x:(x):x=)x(=x:|x|:","x",T))[scan()]

atım

 c(":)","=(","(:",")=",":(","):","=)","(=",":|","|:")[scan()]

1 bayt tarafından

Jöle , 21 bayt

“=:)|(”“ØḟƝoṣẈ’ṃs2ị@D

Çevrimiçi deneyin!

PowerShell , 64 60 59 bayt

^{Mazzy sayesinde -1 bayt}

-join($args|% t*y|%{':)=((:)=:():=)(=:||:'|% S*g(2*"$_")2})

Çevrimiçi deneyin!

Bir dize alır, onu böler toCharArrayve sonra karakteri sayısal değerine çevirerek emoji anahtarını dizine ekler, her iki emoji iki geniş olduğu için iki katına çıkarır ve sonra substringo noktadan bir tane daha yükselir. Sonunda tüm bunları tek bir dizeye ekler ve çıktıya iter.

Simge , 78 75 bayt

procedure f(n);s:="";s||:=":)=((:)=:():=)(=:||:"[!n*2+1+:2]&/n;return s;end

Çevrimiçi deneyin!

C # (Görsel C # Etkileşimli Derleyici) , 87 , 86 , 82 , 67 bayt

Optimize etmeye yardımcı oldukları için @Artholl ve @someone'den aksesuarlar

n=>$"{n}".SelectMany(x=>":)=((:)=:():=)(=:||:".Substring(x*2-96,2))

Çevrimiçi deneyin!

JavaScript (ES6), 87 bayt

n=>{for(s=":)=((:)=:():=)(=:||:",i=0;i<20;)n=n.split(i/2).join(s[i++]+s[i++]);return n}

Jöle , 24 bayt

“LƇ§×Yþ’ḃ5$s2ị“:)=(|”ị@D

Çevrimiçi deneyin!

Ataşe , 34 bayt

Chop[":)=((:)=:():=)(=:||:",2]&Get

Çevrimiçi deneyin!