অ্যাপোকালাইপসের 21 চুলের স্টাইল

1 এবং 21 (বা 0 এবং 20) আউটপুটকে "নীচে একসাথে সেলাই করা" নিম্নলিখিত মুখগুলির অঙ্কন ( সেলাইয়ের তথ্যের বিধি দেখুন ) এর মধ্যে সংখ্যার এএ তালিকা দেওয়া হয়েছে :

     ___           ,,,           ooo           ===           +++           ###          -*~*-     
    (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

     ***           |||           _/7           )))           (((           xxx           @__      
    (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

     ((_           >X<           '*`           ^^^           )|(           \|/           &&&      
    (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

প্রতিটি, একটি নতুন লাইনে তালিকাভুক্ত অনন্য মুখ (# মুখের জন্য পূর্ণসংখ্যা আইডি):

     ___      
    (o o)     
ooO--(_)--Ooo #1

     ,,,      
    (o o)     
ooO--(_)--Ooo #2

     ooo      
    (o o)     
ooO--(_)--Ooo #3

     ===      
    (o o)     
ooO--(_)--Ooo #4

     +++      
    (o o)     
ooO--(_)--Ooo #5

     ###      
    (o o)     
ooO--(_)--Ooo #6

    -*~*-     
    (o o)     
ooO--(_)--Ooo #7

     ***      
    (o o)     
ooO--(_)--Ooo #8

     |||      
    (o o)     
ooO--(_)--Ooo #9

     _/7      
    (o o)     
ooO--(_)--Ooo #10

     )))      
    (o o)     
ooO--(_)--Ooo #11

     (((      
    (o o)     
ooO--(_)--Ooo #12

     xxx      
    (o o)     
ooO--(_)--Ooo #13

     @__      
    (o o)     
ooO--(_)--Ooo #14

     ((_      
    (o o)     
ooO--(_)--Ooo #15

     >X<      
    (o o)     
ooO--(_)--Ooo #16

     '*`      
    (o o)     
ooO--(_)--Ooo #17

     ^^^      
    (o o)     
ooO--(_)--Ooo #18

     )|(      
    (o o)     
ooO--(_)--Ooo #19

     \|/      
    (o o)     
ooO--(_)--Ooo #20

     &&&      
    (o o)     
ooO--(_)--Ooo #21

মুখটি নিম্নরূপ:

    hhhhh     
    (o o)     
ooO--(_)--OooS

hগতিশীল অ্যাপোক্যালिप्टিক hairstyle কোথায় এবং Sসম্ভাব্য সেলাই হাইফেন।

উদাহরণ

ইনপুট: [1,2,3,4,5]

আউটপুট:

     ___           ,,,           ooo           ===           +++      
    (o o)         (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

ইনপুট: [1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21]

আউটপুট:

     ___           ,,,           ooo           ===           +++           ###          -*~*-          ***           |||           _/7           )))           (((           xxx           @__           ((_           >X<           '*`           ^^^           )|(           \|/           &&&      
    (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

ইনপুট: ["Fraggle Rock"] / [22]/ [-21041024]/[22,23,24,25,26]

আউটপুট: Nobody cares.

ইনপুট: [1,1,1,1]

আউটপুট:

     ___           ___           ___           ___      
    (o o)         (o o)         (o o)         (o o)     
ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-ooO--(_)--Ooo-

বিধি

নতুন লাইন / স্পেস / হাইফেনের অগ্রগতি এবং অনুসরণ করা ঠিক আছে।
ইনপুটটিতে মুখগুলি একাধিকবার দেখা দিতে পারে।
ইনপুটটিতে যদি কোনও অবৈধ নম্বর থাকে তবে আপনার অনির্ধারিত আচরণ থাকতে পারে।
সেলাই:
- সেলাইযুক্ত মুখগুলি নীচের (তৃতীয়) লাইনের একক হাইফেন দ্বারা সংক্ষিপ্ত করা হবে।
- মুখগুলি সমস্ত একক লাইনে থাকবে (প্রথম অঙ্কনের বিপরীতে)।
ইনপুট 0 বা 1 সূচকযুক্ত হতে পারে, 20 টি 0 এর জন্য সর্বোচ্চ, 21 এর জন্য 21।
এটি কোড-গল্ফ , সর্বনিম্ন বাইট-কাউন্ট জেতা।

code-golf ascii-art

— ম্যাজিক অক্টোপাস উরন
সূত্র

1

বেশ অনুরূপ: কোডগল্ফ.স্ট্যাকেক্সেঞ্জা.কম / কিউ / 34773/29750

— নিনজা বিয়ারমনকি

7

নম্বর 7 মনে হচ্ছে "মুখটি নীচে রয়েছে" অংশটি লঙ্ঘন করছে

— বোব্যাকউইক

10

আপনার সমস্ত পরীক্ষার ক্ষেত্রে একটি পিছনের "স্টিচিং" হাইফেন অন্তর্ভুক্ত রয়েছে যা এই অনুমানের বিরোধী বলে মনে হচ্ছে।

— শেগি

3

কিলরোয় এখানে ছিলেন।

— এমএস 210

2

@ ম্যাজিকঅ্যাক্টপাস ইউরান, আপনি কি দয়া করে উপরে উত্থাপিত পিছনের হাইফেনগুলির সমস্যাটি সমাধান করতে পারেন?

— ঝাঁকুনি

9

জাপট `-R` , 122 117 113 110 109 107 105 104 103 102 100 99 বাইট

1-সূচকযুক্ত, সূচক মোড়ক সহ। আমি এখানে অনুমান অনুসরণ করেছি, যার জন্য হাইফেন দরকার পরীক্ষার ক্ষেত্রে নয়, প্রতিটি মুখের শেষ লাইনের মধ্যে প্রতিটি মুখের শেষ লাইনের পরে হাইফেন অন্তর্ভুক্ত করে ।

[Umg"@__((_>X<'*`^^^)|(\\|/"i"&_,o=+#*|)(x"m³ ò3 i7"-*~"ê)iA"_/7")¡"(o o)"Ã¡"O--(_)--O"ûoDÃq-]ûD m¸

চেষ্টা করে দেখুন

[                                             :Construct an array of 3 elements
Umg"@.../"i"&...x"m³ ò3 i7"-*~"ê)iA"_/7")     :FIRST ELEMENT (F)
U                                             :  Input array
 m                                            :  Map
  g                                           :    Index into
   "@.../"                                    :      Literal string
          i                                   :      Prepend
           "&...x"                            :        Literal string
                  m                           :        Map
                   ³                          :          Repeat 3 times
                     ò3                       :      Split into chucks of 3
                        i7                    :      Insert at 0-based index 7
                          "-*~"ê              :        "-*~" palindromised
                                )             :      End insert
                                 iA"_/7"      :      Insert "_/7" at index 10
                                        )     :  End map
¡"(o o)"Ã                                     :SECOND ELEMENT (S)
¡                                             :  Map input array
 "(o o)"                                      :    Literal string
        Ã                                     :  End map
¡"O...O"ûoDÃq-                                :THIRD ELEMENT (T)
¡                                             :  Map input array
 "O...O"                                      :    Literal string
        ûo                                    :    Centre pad with "o"
          D                                   :      To length 13
           Ã                                  :  End map
            q-                                :  Join with "-"
]                                             :End array
 ûD                                           :Centre pad each string in F & S to length 13 with spaces, does nothing to T as it will always be at least 13 characters long
    m                                         :Map
     ¸                                        :  Join F & S with spaces. Split T on spaces, creating a singleton array which gets cast back to a string on output
                                              :Implicit output, joined with newlines

— রোমশ
সূত্র

1

খুব ভাল কাজ এটি 100 এ পেয়েছে। আমরা যে চর-দর্পণ পদ্ধতিটি চেয়েছিলাম তা সত্যিই এখানে কার্যকর হবে।

— অলিভার

এছাড়াও, সেই &সুবিধাটি গ্রহণের মোড়কটি m³ছিল বুদ্ধিমান। বিশেষত যেহেতু এটি 1-ভিত্তিক করেছে।

— অলিভার

এটি ছিল 'রাউন্ড'; আমি বুঝতে পেরেছি যে আমি যদি এটি 1-ভিত্তিক তৈরি করি তবে আমি &সেখানে স্থানান্তর করতে পারব;) এখনও মনে হয় এখানে গল্ফ করার মতো আরও কিছু আছে তবে দেরি হয়ে গেছে তাই আগামীকাল অবধি অপেক্ষা করতে হবে।

— শেগি

6

পাইথন 2 , 209 বাইট

def f(a):s=t=u='\n';i=0;exec"s+=(\"_,o=+#-*|_)(x@(>'^)\\&_,o=+#**|/)(x_(X*^||&_,o=+#~*|7)(x__<`^(/&\"[a[i]::21]+'*-'*(a[i]==6)).center(14);t+='    (o o)     ';u+='ooO--(_)--Ooo-';i+=1;"*len(a);print s+t+u[:-1]

এটি অনলাইন চেষ্টা করুন!

0 ভিত্তিক সূচক; এখানে বিশেষত চতুর কিছুই নয়, কেবল একটি লুপের পরিবর্তে টুকরো টুকরো টুকরো টুকরো করে টুকরো টুকরো করার মাধ্যমে ডেটা অ্যাক্সেস করা হয়।

— চ্যাস ব্রাউন
সূত্র

186 বাইট

— লিন

6

কাঠকয়লা , 103 102 বাইট

Ｅ²⪫Ｅθ⎇ι(o o)⪫×²§ -⁼λ⁶§⪪”|″:αuxkτT↷K[ï�↔ς↨?◧BZ@C←↑⊞Ａ⧴M✂↶ºKf÷H#S⦃J&≔⁰∧5À³≕r‹▷”³λ× ⁹Ｍ⁴←⪫ＥθooO--(_)--Ooo¦-

এটি অনলাইন চেষ্টা করুন! লিঙ্কটি কোডটির ভার্জোজ সংস্করণ। ব্যাখ্যা:

Ｅ²⪫Ｅθ

ইনপুট দু'বার লুপ করুন। প্রতিটি ফলাফল তারপরে স্পষ্টভাবে তার নিজস্ব লাইনে মুদ্রিত হয়।

⎇ι(o o)

দ্বিতীয় লুপটিতে কেবল চোখ তৈরি করুন।

⪫×²§ -⁼λ⁶

হেয়ার স্টাইল -s টি, স্পেসে অন্যান্য হেয়ারস্টাইল মোড়ানো ।

§⪪”|″:αuxkτT↷K[ï�↔ς↨?◧BZ@C←↑⊞Ａ⧴M✂↶ºKf÷H#S⦃J&≔⁰∧5À³≕r‹▷”³λ

সংক্ষিপ্ত স্ট্রিং থেকে তিনটি চুলের স্টাইলের অক্ষর বের করুন।

× ⁹

প্রতিটি চুল বা চোখের মধ্যে নয়টি স্থান .োকান।

Ｍ⁴←

4 স্পেস বাম দিকে সরান।

⪫ＥθooO--(_)--Ooo¦-

বাকী মুখগুলি মুদ্রণ করুন, এ এর সাথে যুক্ত হন -।

— নিল
সূত্র

6

আর , 413 391 বাইট

জিউসেপ্পিকে 22 কম বাইটের জন্য এবং এটি 400 বাইটের নিচে পাওয়ার জন্য ধন্যবাদ।

function(s,n=length(s)){I=intToUtf8
U=utf8ToInt
R=rep
K=cat
a=U("_,o=+#^*|&)(x")
b=c("@__","((_",">X<","'*`","",")|(","\\|/","","-*~*-","_/7")
s[s==7]=22;s[s==10]=23;s[s==18]=7;s[s==21]=10
for(i in s)K(I(c(rep(32,4+(i!=22)),"if"(i<14,R(a[i],3),U(b[i-13])),R(32,5+(i!=22)))))
K("
",I(R(c(R(32,3),40,111,32,111,41,R(32,6)),n)),"
")
K(I(40+R(c(x<-c(71,71,39,5,5),0,55,1,rev(x),5),n)[-(14*n)]))}

এটি অনলাইন চেষ্টা করুন!

— JayCe
সূত্র

আপনার সম্ভবত উপনাম হওয়া উচিত utf8ToIntএবংintToUtf8

— জিউস্পে

391 বাইট

— জিউস্পে

@ জিউসেপ ভাল পয়েন্ট! আমি আমার সূচক বদলে লজ্জা পেয়েছি এটি এত ব্যয়বহুল। আমি এটিতে কাজ করব।

— জয়সি

@ জায়েসি আপনি repসংক্ষিপ্ত করতে আরও একটি মিস করেছেন :for(i in s)K(I(c(rep<--

— এল।

ধন্যবাদ কিরিলল ! অবশেষে এই কোডটি পর্যালোচনা করার সময় পেলে আমি এটি অন্তর্ভুক্ত করার বিষয়টি নিশ্চিত করব।

— জেসি

5

জাভাস্ক্রিপ্ট (ES6), 200 199 বাইট

1-ইনডেক্সড ইনপুট আশা করে।

a=>[1,0,2].map(y=>a.map(n=>s=y&2?'ooO--(_)--Ooo':`    ${p='( -'[y*n-7?y:2]}${"o o___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*`^^^)|(\\|/&&&".substr(y*n*3,3)}${y?p:')'}    `).join(s[3])).join`
`

এটি অনলাইন চেষ্টা করুন!

a =>                              // given the input array a[]
  [1, 0, 2].map(y =>              // for each row y:
    a.map(n =>                    //   for each integer n in a[]:
      s =                         //     let s be the content of this row
        y & 2 ?                   //     if this is the 3rd row:
          'ooO--(_)--Ooo'         //       use a hardcoded string
        :                         //     else:
          `    ${                 //       append 4 spaces
            p = '( -'[            //       append and save in p:
              y * n - 7 ? y : 2   //         '(' if y = 0 (2nd row)
            ]                     //         ' ' if y = 1 and n != 7
          }${                     //         '-' if y = 1 and n = 7
            "o o___,,,ooo(...)"   //       append the middle pattern (NB: truncated string)
            .substr(y * n * 3, 3) //       which is always the eyes if y = 0
          }${                     //
            y ? p : ')'           //       append p for the 1st row or ')' for the 2nd row
          }    `                  //       append 4 spaces
    ).join(s[3])                  //   join with the 4th character of s (space or hyphen)
  ).join`\n`                      // join with line-feeds

— Arnauld
সূত্র

4

রুবি , 164 বাইট

->a{puts a.map{|i|j="_,o=+# *| )(x    ^  &"[i];(j<?!?%w{@__ ((_ >X< '*` -*~*- )|( \|/ _/7}[i%11-2]:j*3).center(14)}*"","    (o o)     "*k=a.size,"ooO--(_)--Ooo-"*k}

জিরো ইনডেক্সড। এটি অনলাইন চেষ্টা করুন!

সমস্ত কঠিন জিনিস শীর্ষ লাইনে ঘটে happens

"_,o=+# *| )(x ^ &"3 টি অভিন্ন অক্ষর সহ সমস্ত চুলের স্টাইল রয়েছে, যা থেকে আমরা iঅক্ষরটি নির্বাচন করি ,j ,।

যদি jকোনও স্থান না হয়, নিম্নলিখিত বর্ণটি অক্ষরের 3 অনুলিপি প্রদান করে। যদি এটি কোনও স্থান হয় তবে আমরা এর মধ্য থেকে সঠিক hairstyle নির্বাচন করি %w{}। "বিজোড়" হেয়ারস্টাইলগুলি 6,9,13,14,15,16,18,19 নম্বর এবং i%11-2এটি একটি নিখুঁত হ্যাশ দেয়0..7

j<?!?%w{@__ ((_ >X< '*` -*~*- )|( \|/ _/7}[i%11-2]:j*3

যা কিছু অবশিষ্ট রয়েছে তা 14 টি স্পেসে (কেন্দ্রে) প্যাড করা এবং উপযুক্ত সংখ্যক মিডল / বোতল মুদ্রণ করা।

— স্তর নদী সেন্ট
সূত্র

আপনি এখানে প্রথম বন্ধনী ফেলে দিতে পারেনcenter(14)

— কিরিল এল।

2

পাইথন 2 , 204 বাইট

i=input();l=len(i)
for l in[' '*4+' -'[x==6]+"_,o=+#**|_)(x@(>'^)\\&_,o=+#~*|/)(x_(X*^||&_,o=+#**|7)(x__<`^(/&"[x::21]+' -'[x==6]+' '*5for x in i],['    (o o)     ']*l,['ooO--(_)--Ooo-']*l:print''.join(l)

এটি অনলাইন চেষ্টা করুন!

— ovs
সূত্র

2

জাভা 8, 273 263 বাইট

a->{String r[]={"","",""},s="    ",t="ooO--(_)--Ooo",u="(o o)";for(int i:a){r[0]+=s+(i==7?"-":" ")+"___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*`^^^)|(\\|/&&&".split("(?<=\\G...)")[i]+(i==7?"-":" ")+s+" ";r[1]+=s+u+s+" ";r[2]+=t+"-";}return t.join("\n",r);}

এটি অনলাইনে চেষ্টা করুন।

ব্যাখ্যা:

a->{                       // Method with integer-array parameter and String return-type
  String r[]={"","",""},   //  Result-String, starting at three empty rows
         s="    ",         //  Temp-String of four spaces for the first and second rows
         t="ooO--(_)--Ooo",//  Temp-String for the third row
         u="(o o)";        //  Temp-String for the second row
  for(int i:a){            //  Loop over the input-array
    r[0]+=                 //   Append to the first row:
          s                //    Four spaces
          +(i==7?          //    If the number is 7 (edge-case):
             "-"           //     Append "-"
            :              //    Else:
             " ")          //     Append a single space
          +"___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*`^^^)|(\\|/&&&".split("(?<=\\G...)")[i]
                           //    Append the correct hat based on `i`
          +(i==7?"-":" ")  //    If the number is 7, append "-" again, else a space
          +s+" ";          //    And append five spaces
    r[1]+=                 //   Append to the second row:
          s                //    Four spaces
          +u               //    The head
          +s+" ";          //    Five spaces
    r[2]+=                 //   Append to the third row:
          t                //    The hands and bodies
          +"-";}           //    And the stitch "-"
  return t.join("\n",r);}  //  Return the three rows as single newline delimited String

— কেভিন ক্রুইজসেন
সূত্র

2

আর , 247 242 বাইট

function(a,n=length(a)){for(i in a)cat(format(h[i],,,,"c",14+!20-i))
cat("
","   (o o)     "*n,"
")
cat("ooO--(_)--Ooo"*n,sep="-")}
"*"=rep
h=readLines(,21)
___
,,,
ooo
===
+++
###
-*~*-
***
|||
_/7
)))
(((
xxx
@__
((_
>X<
'*`
^^^
)|(
\|/
&&&

এটি অনলাইন চেষ্টা করুন!

এখন আর কে আরও বেশি পরিচালনাযোগ্য বাইট কাউন্টে আনার চেষ্টা করা হচ্ছে ...

যেহেতু আর-তে চরিত্রের ম্যানিপুলেশনগুলি হতাশভাবে ভারবস হয়, তাই আমি সমস্ত মুখ এবং চুলের স্টাইলগুলি সম্পূর্ণরূপে তালিকাভুক্ত করতে স্থির হয়েছি। চুলের স্টাইলগুলি সুন্দর-প্রিন্টিংয়ের জন্য আমি formatফাংশনটি ব্যবহার করি justify="centre"। দুর্ভাগ্যক্রমে, আমাদের অতিরিক্ত প্যাডিং চরিত্রটি ব্যবহার করা দরকার i==20কারণ formatপ্যাডিংয়ের গণনা করা হয় যেন ব্যাকস্ল্যাশ এড়িয়ে গেছে, যেমন \\|/।

বর্তমান সংস্করণটি ট্রেলিং হাইফেন ব্যবহার করে না ।

সম্পাদনা করুন: -২ এর জেসি এবং জিউস্পে -৩ বাইটের জন্য ক্রেডিট।

— কিরিল এল।
সূত্র

আপনার সরাসরি পদ্ধতির ভালবাসা! আমি justify="centre"সম্ভবত এটি পুনরায় ব্যবহার করতে পারি সে সম্পর্কে আমি সচেতন ছিলাম না । "/"=rep

— বিয়োগফল

আরও দুটি বাইট নিচে:format(h[i],,,,"c",14+!20-i)

— জিউস্পে

@ জিউস্পে এটি আসলে -৩, এর চেয়ে আরও ভাল। @ জাইসি খুব সুন্দর, বাস্তবে আমরা কোনও গুণই ব্যবহার করি না, তাই ওভাররাইডিং *আরও ভাল দেখায় - এখন এটি string * numberঅন্যান্য অনেক ভাষায় অপারেশনের সাথে সাদৃশ্যপূর্ণ !

— কিরিল এল।

2

সি! ( সি-বাহ) 1.1.0), 251 বাইট

(প্রোগ্রাম প্রয়োগের ক্ষেত্রে আর্গুমেন্টগুলি পাস করার প্রয়োজন হয়, স্থান পৃথক করা হয়)

SS("     (o o)     \nooO--(_)--Ooo-",'\n') SS("___A,,,AoooA===A+++A###A-*~*-A***A|||A_/7A)))A(((AxxxA@__A((_A>X<A'*`A^^^A)|(A\\|/A&&&",'A') F(MR("0",A(0),"23"),W("?");E) I(AC,W("     ");RI(TN(A(i))+2);W("     ")); WL I(AC,W(RI(0))); WL I(AC,W(RI(1)));

অবরুদ্ধ সংস্করণ:

STRSPLIT("     (o o)     \nooO--(_)--Ooo-", '\n')
STRSPLIT("___A,,,AoooA===A+++A###A-*~*-A***A|||A_/7A)))A(((AxxxA@__A((_A>X<A'*`A^^^A)|(A\\|/A&&&", 'A')
IF(MATHRANGE("0", ARGS(0), "23"), PRINT("?"); E)
LOOP(ARGC, PRINT("     "); READI(TONUM(ARGS(i)) + 2); PRINT("     "));
PRINTL
LOOP(ARGC, PRINT(READI(0)));
PRINTL
LOOP(ARGC, PRINT(READI(1)));

— 0x22fe
সূত্র

1

লাল , 333 319 বাইট

func[x][h: copy[]i: 0
foreach[k l m]{___,,,ooo===+++###   ***|||_/7)))(((xxx@__((_>X<'*`^^^^^^)|(\|/&&&}[alter h
pad pad/left either 7 = i: i + 1["-*~*-"][rejoin[" "k l m" "]]9
14]foreach y x[prin h/(y)]print append/dup copy"^/"{    (o o)     }l: length? x
print take/part append/dup copy""{ooO--(_)--Ooo-}l 14 * l - 1]

এটি অনলাইন চেষ্টা করুন!

— গ্যালেন ইভানভ
সূত্র

1

রুবি , 163 বাইট

->a{puts a.map{|i|(i==6?"-*~*-":i<9?"_,o=+#~*|"[i]*3:"_/7)))(((xxx@__((_>X<'*`^^^)|(\\|/&&&"[3*i-27,3]).center 14}*"","    (o o)     "*k=a.size,"ooO--(_)--Ooo-"*k}

এটি অনলাইন চেষ্টা করুন!

0-ইন্ডেক্স। আমি শ্রেনী নদী সেন্ট এর সঙ্গে fiddled উত্তর এবং অন্য পদ্ধতির দৃশ্যত অনুরূপ golfiness এর চুলের ধরন সঙ্কেতাক্ষরে লিখা খুঁজে পাওয়া যায়নি। এখানে, আমরা "দীর্ঘতম" 5-চর চুল কাটা একটি বিশেষ কেস হিসাবে বিবেচনা করি, তালিকার প্রথম অংশে তুচ্ছ নিদর্শনগুলি প্রতিটি 1 টি দ্বারা এনকোড করা হয়েছে, এবং দ্বিতীয় অংশে সমস্ত 3-চরিত নিদর্শনগুলি আক্ষরিকভাবে তালিকাভুক্ত করা হয়েছে, কোনও ব্যাপার নেই - এই চরিত্রগুলি আলাদা বা না। অবশেষে আসে বানর-মুখের বয়লারপ্লেট।

— কিরিল এল।
সূত্র

1

সি (জিসিসি) , 210 212 বাইট

-4 বাইট সিলিংক্যাট ধন্যবাদ । (আমি যখন মূল কোডটি দিয়েছিলাম এমন একটি বাগ ফিক্স করেছি তখন এটি আবার বাড়ল))

অনেকটাই অকপট.

#define r(s)for(i=!puts("");i<n;printf(s,c,"___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*`^^^)|(\\|/&&&"+x*3,c=x^6?32:45,x=l[i++]));
x,c,i;f(l,n)int*l;{r("%5c%.3s%-6c")r("    (o o)     ")r("ooO--(_)--Ooo-")}

এটি অনলাইন চেষ্টা করুন!

— gastropner
সূত্র

206 বাইট

— সিলিংক্যাট

1

পাওয়ারশেল , 187 171 বাইট

^{-১ by বাইটস ম্যাজিকে ধন্যবাদ}

''+($args|%{($x=' '*4)+($y=' -'[$_-eq6])+("___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*``^^^)|(\|/&&&"|% s*g($_*3)3)+$y+$x;$z++})
"$x(o o)$x "*$z
"ooO--(_)--Ooo-"*$z

এটি অনলাইন চেষ্টা করুন!

0-ইনডেক্সড, একটি ট্রিলিং হাইফেন রয়েছে।

Unrolled:

''+($args|%{
    ($x=' '*4) + ($y=' -'[$_-eq6]) + 
    ("___,,,ooo===+++###*~****|||_/7)))(((xxx@__((_>X<'*``^^^)|(\|/&&&"|% substring ($_*3) 3) +
    "$y$x ";
    $z++
    })
"$x(o o) $x"*$z
"ooO--(_)--Ooo-"*$z

খুব অভিনব কিছু না। কেবল প্রথম লাইনে এটিতে কিছু শালীন যুক্তি রয়েছে। এটি ব্যবহার করে চুলের স্ট্রিংয়ের সূচক তৈরি হয় $current_entry_value*3এবং substrin ব্যবহার করে সেই খণ্ডটি বের করে দেয়g , সমস্ত একটি বড় লাইনে যোগ দেওয়ার আগে। পরবর্তী ক্যারেটটি থেকে পালিয়ে যাওয়ার ইস্যুটি ছড়িয়ে পড়ে, আমাকে কেন ভাবছে যে আমি কেন একটি ইনডেক্সআউটআউটবাউন্ড ত্রুটি পাচ্ছি তবে তা ঠিক হয়ে গেছে। এখন প্রথম লাইন একত্রিত করার জন্য আরও ভাল উপায় ব্যবহার করে।

195 বাইটগুলি কোনও শীর্ষস্থানীয় / পিছনের হাইফেনগুলির অনুকরণটি অনুসরণ করে

— Veskah
সূত্র

1

ভাল 7. আপনি কিছু বাইট সংরক্ষণ করতে পারেন অনলাইনে চেষ্টা করুন!

— mazzy

1

এবং আরও কিছু এটি অনলাইনে চেষ্টা করুন!

— mazzy

1

পাইথন 3 , 240 বাইট

h=[x*3for x in"_,o=+#*|)(x^&"]
for i,*l in(6,"-*~*-"),(9,"_/7"),(13,"@__","((_",">X<","'*`"),(18,")|(","\|/"):h[:i]+=l
*x,=map(int,input().split())
l=len(x)
p=print
p(*(h[i].center(13)for i in x))
p("    (o o)     "*l)
p("ooO--(_)--Ooo-"*l)

এটি অনলাইন চেষ্টা করুন!

— ড্যানিল টুটুবালিন
সূত্র

0

রুনিক এনেক্যান্টমেন্টস , ৩১৩ বাইট

B6?>8b2*B0il2)?\B" "9a2*
{" ___ "D
{" ,,, "D
{" ooo "D
{" === "D
{" +++ "D
{" ### "D
{"-*~*-"D
{" *** "D
{" ||| "D
{" _/7 "D
{" ))) "D
{" ((( "D
{" xxx "D
{" @__ "D
{" ((_ "D
{" >X< "D
{" '*` "D
{" ^^^ "D
{" )|( "D
{" \|/ "D\
{" &&& "D{
{"    " LLRB͍!{
"-(_)--Ooo-"{*@\~4-:l͍e,:{$ak$"    (o o)     "{*$ak$"ooO-"

এটি অনলাইন চেষ্টা করুন!

স্ট্রিংগুলি সংকোচনের ক্ষেত্রে এবং যেখানে সম্ভব সেগমেন্টগুলি পুনরায় ব্যবহার করার পাশাপাশি ইনপুট মানগুলি সরাসরি জাম্প অফসেট হিসাবে ব্যবহারের ক্ষেত্রে যখন Bরেঞ্চিংয়ের ক্ষেত্রে যুক্তিসঙ্গতভাবে কমপ্যাক্ট ।

যদি অতিরিক্ত ট্রেলিং স্পেসের অনুমতি দেওয়া 4-হয় তবে শেষ লাইনে বাদ দিয়ে এটি 2 টি বাইট দ্বারা সংক্ষিপ্ত করা যেতে পারে । এ জন্য +2 বাইট1-ফাইনালটি -সেখানে না থাকার (ম্যাচিং স্পেক, উদাহরণ লঙ্ঘনকারী)।

খণ্ড, " (o o) " সংকুচিত করা অসম্ভব বিরক্তিকর, কারণ এটি তৈরির মতো জিনিস ব্যবহার করে" "4* শেষ বাইটের সমান সংখ্যক করা।

ইনপুটগুলি পাস করা> 21 মজাদার জিনিস করুন। উদাহরণস্বরূপ একক 22 একটি ঘন শেভ দেয় ।

— Draco18s আর SE তে বিশ্বাস করে না
সূত্র

অ্যাপোকালাইপসের 21 চুলের স্টাইল

অ্যাপোকালাইপসের 21 চুলের স্টাইল

উদাহরণ

বিধি

জাপট -R , 122 117 113 110 109 107 105 104 103 102 100 99 বাইট

পাইথন 2 , 209 বাইট

কাঠকয়লা , 103 102 বাইট

আর , 413 391 বাইট

জাভাস্ক্রিপ্ট (ES6), 200 199 বাইট

মন্তব্য

রুবি , 164 বাইট

পাইথন 2 , 204 বাইট

জাভা 8, 273 263 বাইট

আর , 247 242 বাইট

সি! ( সি-বাহ) 1.1.0), 251 বাইট

লাল , 333 319 বাইট

রুবি , 163 বাইট

সি (জিসিসি) , 210 212 বাইট

পাওয়ারশেল , 187 171 বাইট

পাইথন 3 , 240 বাইট

রুনিক এনেক্যান্টমেন্টস , ৩১৩ বাইট

জাপট `-R` , 122 117 113 110 109 107 105 104 103 102 100 99 বাইট