इसे और मेहनत करें, इसे बेहतर बनाएं


26

इस चुनौती में आपका लक्ष्य डफ़्ट पंक के हार्डर, बेटर, फास्टर, स्ट्रॉन्गर के गीतों का उत्पादन करना होगा विशेष रूप से, इस पाठ का आउटपुट:

Work It
Make It
Do It
Makes Us
Harder
Better
Faster
Stronger
More Than
Hour
Our
Never
Ever
After
Work Is
Over

Work It
Make It
Do It
Makes Us
Harder
Better
Faster
Stronger
More Than
Hour
Our
Never
Ever
After
Work Is
Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour After
Our Work Is Never Over

Work It Harder, Make It
Do It Faster, Makes Us
More Than Ever, Hour
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour Af-
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour Af-
Our Work Is Never Over

Work It Harder Make It Better
Do It Faster, Makes Us Stronger
More Than Ever Hour Af-
Our Work Is Never Over

Work It Harder
Make It Better
Do It Faster Makes Us Stronger
More Than Ever Hour
Our Work Is Never Over

Work It Harder
Do It Faster
More Than Ever
Our Work Is Never Over

Work It Harder
Make It Better
Do It Faster
Makes Us Stronger
More Than Ever
Hour After
Our Work Is Never Over

आपके आउटपुट में एक अनुगामी न्यूलाइन या अनुगामी व्हाट्सएप हो सकता है।

संपीड़न विधियों में निर्मित की अनुमति नहीं है।

यह कोड गोल्फ है, इसलिए सबसे छोटा कोड जीतता है!


1
@ फ़ेर्सम हां, अगर आप गाना सुनते हैं तो आप देख सकते हैं कि वह बाद में कहना शुरू करता है और फिर रुक जाता है। मैंने ब्रेक दिखाने और लोगों को संक्रमित करने के लिए हाइफ़न जोड़ा। यदि आप चाहें, तो मैं इसे हटा सकता हूं।
ट्रेफॉक्स

9
मैं हैरान हूँ HQ9+Daft-Punkकि इस तरह कोई एस्लॉन्ग नहीं है जो यह प्रिंट करता है ...
Fatalize

3
मुझे लगता है कि आपको कम से कम संपीड़न विधियों में बनाया गया अस्वीकार करना चाहिए।
दोष

9
"अराउंड द वर्ल्ड" के बोल आसान होते। ;)
रेटो कोराडी

3
यह गीत थोड़ी देर में पहला है जो मेरे दिमाग में नहीं है, यह रिक्रॉल का डुप्लिकेट नहीं है। मैं इसे मेटा meta.codegolf.stackexchange.com/q/6956/15599 पर
River पर लेवल रिवर सेंट

जवाबों:


11

रूबी, 308 303

puts a='Work It|Make It|Do It|Makes Us|Harder|Better|Faster|Stronger|More Than|Hour|Our|Never|Ever|After|Work Is|Over

'.split(?|),a
56.times{|i|puts a[j=i%4/2*4+i%4*2]+' '+a[j+4]+[[' ',', ','
']["l4yq62lhgnizb0kfu".to_i(36)/3**i%3]+a[j+1]+' ',''][i%51/48]+[a[j+5],['','Af-'][i%44/32]][7619655>>i-28&1]}

कलन विधि

गीत परिचय: 16 टोकन ले लो, और उन्हें दो बार प्रिंट करें (पिछले एक अतिरिक्त बियरलाइन को सहन करता है)

छंद: निम्नलिखित क्रम में छंद, 4 टोकन प्रति पंक्ति, बनाने के लिए एक साथ टोकन उठाएं:

 0  4  1  5
 2  6  3  7
 8 12  9 13
10 14 11 15

कुछ पंक्तियों में, अंतिम टोकन को छोड़ दिया गया है, या इसके लिए विनिमय किया गया है Af-। इन पंक्तियों को जादू की संख्या 0x744447 = 7619655 में 1 बिट के साथ नोट किया गया है।

तीन पंक्तियों में, पेनकेन टोकन भी छोड़ दिया जाता है, जहां i%51/48==1

लाइन के बीच में विराम चिह्न एक हो सकता है ' ' ', ' '\n'। ये नंबर 0222001000020010001010011001000001000100010001000100010 (बेस 3) = "l4yq62lhgnizb0kfu" (बेस 36.) में एन्कोडेड हैं।

टिप्पणियों के साथ

puts a='Work It|Make It|Do It|Makes Us|Harder|Better|Faster|Stronger|More Than|Hour|Our|Never|Ever|After|Work Is|Over

'.split(?|),a                                                    #Set up array containing all 16 tokens, print it, and print it again (note newlines at end of last token.)

56.times{|i|                                                     #14 verses, 4 lines each

puts a[j=i%4/2*4+i%4*2]+                                         #expression cycles through 0,2,8,10. Print the first token on the line.

' '+a[j+4]+                                                      #print a space, and the second token on the line.

[[' ',', ','
']["l4yq62lhgnizb0kfu".to_i(36)/3**i%3]+a[j+1]+' ',''][i%51/48]+ #if i%51/48==1,print nothing. Otherwise print the 3rd token, followed by a space, and preceded by one of ' ' or ', ' or '\n'

[a[j+5],['','Af-'][i%44/32]][7619655>>i-28&1]                    #if 7619655>>i-28&1==0 print the fourth token. Otherwise print either nothing or Af- depending on the value of i%44/32

}

9

पर्ल, 316 309 308 307 बाइट्स

स्रोत को लैटिन -1 के रूप में एन्कोड किया जाना चाहिए।

@c=split b,'
Â×
Ô
ÚáÐÙáÒ
ÅOÆÖáEváAftáØ
bÑÏábÝà
bÑÈ-
bÈÇÈÇbHoÆbur
btáÑbÏßËÌÊßÉbHoÜAfbÔ ÒÍbÝà ÐÎber, b Evb× ÙbÓ ÚbBettábOÜØ ÖßbStrongáÛbÕ
ÞàbÝs UsbOvábNevbDoàbÞ IsbFastbHardbMore Thanbur bMakebWorkber b Itber
';$e='ÞàÀÓÀÄÄÄÈÇÏÌÂÎÌÔ
ÛÍÌÅÃÃÃÁËßÊßÅÁÎáÛÍáÁËáÊáÉÇÕ';$f=chr$_+192,$e=~s/$f/$c[$_]/g for 0..34;print$e

व्याख्या

हम मूल गीत के साथ शुरू करते हैं। संक्षिप्तता के लिए, मान लेते हैं कि वे हैं

lyrics = "Work Work Harder Harder"

अब हम छोटे संक्षारण (characters 3 अक्षर) पाते हैं जो अक्सर होते हैं। इस मामले में, "Work "दो बार होता है। हम प्रत्येक घटना को वर्ण 0xE1 से प्रतिस्थापित करते हैं। हमें एक सरणी में प्रतिस्थापित स्ट्रिंग भी याद है:

lyrics = "ááHarder Harder"
substs = ["Work "]

अगला सबस्ट्रिंग, "Harder"को 0xE0 से बदल दिया गया है। substsसरणी सामने की ओर बढ़ता है:

lyrics = "ááà à"
substs = ["Harder", "Work "]

यह कुल 34 पुनरावृत्तियों के लिए जारी है जब तक कि हम वर्ण 0xC0 तक नहीं पहुंच जाते।

अब हम substsकैरेक्टर b(जो कि लिरिक्स में नहीं होता है) को सेपरेटर के रूप में इस्तेमाल करते हैं। पर्ल कोड में, substsऐरे को स्टोर किया जाता है @c( जहां विभाजित bकरने के लिए नंगे शब्द का उपयोग करते हुए split), नए जंबल किए गए गीत हैं $e, और कोड केवल 34 प्रतिस्थापनों को उलट देता है।


1
कोई स्पष्टीकरण?
feersum

1
@ फैर्सम: हो गया।
तिमवी

5

सुधार , 302 बाइट्स

:xxnnnnnnnmW12603 27428 3s59qp wb12604280qpb12603 2742803s59qp0wjb:ncvb:mcQb:WcEb:x1203 204203s50607809q0w0y0i0p0j01l0z00:c1263 27428, 3s59:vqp wj:Qqp, w:Eqp wAf-:b0y1liz00:0\n:1Work :2It :3Make:4Do :5 Us :6Harder :7Better\n:8Faster:9Stronger\n:qMore Than :wHour :yOur :iNever :pEver:jAfter :lIs :zOver

मैंने हाल ही में इस भाषा को बनाया है और मैंने इस चुनौती के साथ इसका परीक्षण करने का निर्णय लिया है। यह \nनई लाइनों के बजाय आउटपुट देता है क्योंकि यह HTML में आउटपुट करता है, लेकिन दुभाषिया जावास्क्रिप्ट में लिखा जाता है। इस वजह से, यहाँ <br>s के बजाय s के साथ एक संस्करण है \n:

:xxnnnnnnnmW12603 27428 3s59qp wb12604280qpb12603 2742803s59qp0wjb:ncvb:mcQb:WcEb:x1203 204203s50607809q0w0y0i0p0j01l0z00:c1263 27428, 3s59:vqp wj:Qqp, w:Eqp wAf-:b0y1liz00:0<br>:1Work :2It :3Make:4Do :5 Us :6Harder :7Better<br>:8Faster:9Stronger<br>:qMore Than :wHour :yOur :iNever :pEver:jAfter :lIs :zOver

बहुत ही रोचक। हमारे यहां यह नियम है कि चुनौती से पहले भाषा / दुभाषिया / संकलक का अस्तित्व होना चाहिए। मैं आपको दुभाषिया पर एक तारीख नहीं देखता, यह कब प्रकाशित हुआ था?
लेवल रिवर सेंट

@steveverrill मैंने इसे कल बनाया था। मुझे लगता है कि मेरा उत्तर अमान्य है।
डैनमैन मैन

3
मेटा पर सहमति यह है कि यह अभी भी पोस्ट किया जा सकता है लेकिन जीतने के लिए लागू नहीं है। आपको संभवतः ओपी
डाउगाटैट

क्या आप erएक भी टोकन बना सकते हैं ?
सुलैमान उको

4

गोल्फस्क्रिप्ट (275 बाइट्स)

इसमें गैर-मुद्रण योग्य ASCII वर्ण शामिल हैं, इसलिए यहां एक हेक्सडंप है:

0000000: 3a6b 2757 6f72 6b20 4974 0a4d 616b 6586  :k'Work It.Make.
0000010: 0444 6f8c 0873 2055 730a 4861 7264 6572  .Do..s Us.Harder
0000020: 0a42 6574 7485 0346 6173 8504 5374 726f  .Bett..Fas..Stro
0000030: 6e67 9503 4d6f 7265 2054 6861 6e0a 486f  ng..More Than.Ho
0000040: 7572 0a4f 8203 4e65 76ae 0345 8304 4166  ur.O..Nev..E..Af
0000050: b204 df06 730a 4f96 048c 07ed 7020 d606  ....s.O.....p ..
0000060: 20f4 0720 de07 fb05 20e4 062c 9b05 7320   .. .... ..,..s 
0000070: 5573 20ee 1220 df04 20f3 0420 e406 f903  Us .. .. .. ....
0000080: 20e8 0720 4e65 9b04 eeff eeff eeb6 d206   .. Ne..........
0000090: fe03 e817 df0f 2ce0 05da 5c27 d908 2042  ......,...\'.. B
00000a0: 6574 d303 e017 2053 7472 6f6e 67bd 03e9  et.... Strong...
00000b0: 0ee8 0520 4166 2dec ffec 040a ec1b eb26  ... Af-........&
00000c0: e728 d80c c60f c128 4d61 6b65 d004 4265  .(.....(Make..Be
00000d0: 74c3 04d0 0e9a 0373 2055 7320 5374 726f  t......s Us Stro
00000e0: 6e67 e212 486f e303 4166 fc04 ed16 277b  ng..Ho..Af....'{
00000f0: 6b7b 7b6b 247d 2a30 3a6b 3b7d 7b31 3237  k{{k$}*0:k;}{127
0000100: 2e32 243c 7b2d 3a6b 7d2a 3b7d 6966 7d2f  .2$<{-:k}*;}if}/
0000110: 5d28 2b                                  ](+

यह कैसे काम करता है? जहां तक ​​मैं बता सकता हूं कि ऐसा लगता है कि मैं केवल "राइफल और ओटिट" रणनीति का उपयोग कर रहा हूं, जो मुझे आश्चर्यचकित करता है। फिर भी, इसका मतलब है कि मैं इस जवाब के पीछे दूसरे स्थान पर हूं।
स्तर नदी सेंट

हैंड-कोडेड लेम्पेल-ज़िव। कुछ खास दिलचस्प नहीं। मैं बहुत हद तक बिंदु था जिसे मैंने मेटा में बनाने की कोशिश की थी, लेकिन स्पष्ट रूप से पर्याप्त रूप से आश्वस्त नहीं था।
पीटर टेलर

1
वैसे मैं वास्तव में निराश हूं कि कुछ लोगों ने गीत की संरचना का पूरा फायदा उठाया। मौका था, इस तथ्य के रूप में कि मैं रूबी में दूसरे स्थान पर हूं, आपके पीछे केवल 28 बाइट्स हैं। मुझे विश्वास है कि गोल्फस्पॉट में मेरे जवाब का एक हिस्सा 275 बाइट्स से कम में आएगा। क्या आप अन्यथा सोचते हैं?
स्तर नदी सेंट

मैंने उस पर व्याकरण जनरेटर की अपनी पूरी बैटरी की कोशिश की, और आश्चर्यचकित था कि एलजेड आगे निकल गया (हालांकि लालची व्याकरण बिल्डर केवल एक बाइट के पीछे था)। लेकिन मुझे आश्चर्य नहीं होगा अगर इस गोल्फस्क्रिप्ट के एक बंदरगाह या रूबी में 276-बाइट के लालची व्याकरण के एक बंदरगाह के 303 बाइट्स से कम पर निकले।
पीटर टेलर

2

रूबी - 643 बाइट्स

संपादित करें: 899 से 830 तक नीचे गोल्फ।

Edit2: 830 -> 755

Edit3: 755 -> 684।

Edit4: 684 -> 670।

Edit5: 670 -> 643।

मैंने वास्तव में माणिक का उपयोग नहीं किया है, इसलिए मुझे यकीन है कि इसे नीचे गिराया जा सकता है, यह सिर्फ एक प्रयास है:

l=%w[Work Make Do Harder Better Faster Stronger More Than Hour Our Never Ever After Over Faster,]
i,j,f,u,d=->x{l[x]+' It'},->x,y{l[x]+' It '+l[y]+' '},->a,b,c,d,e{a+' '+b+' '+c+' '+d+' '+e},'s Us ',l[6]
s,q,w,e,r,y,k=f[l[10],l[0],'Is',l[11],l[14]],j[0,3],j[1,4],j[2,15],j[2,5],->d,e{f[l[7],l[8],l[12],d,e]},l[1]+u
t,z,m=e+k,->a{puts q+w,t+d,y[l[9],a],s,''},y['','']
2.times{puts i[0],i[1],i[2],k,l[3],l[4],l[5],d,l[7]+' '+l[8],l[9],l[10],l[11],l[12],l[13],l[0]+' Is',l[14],''}
7.times{z[l[13]]}
puts q+i[1],t,f[l[7],l[8],l[12]+',',l[9],''],s,''
3.times{z['Af-']}
puts q,w,r+k+d,y[l[9],''],s,'',q,r,m,s,'',q,w,r,k+d,m,l[9]+' '+l[13],s

2

जावा 518 / 490Bytes

संपादित करें: अनावश्यक 7 बाइट्स और स्थिर {} चाल के साथ एक जावा 6 संस्करण जोड़ा गया। Edit2: स्पष्टीकरण का विस्तार

class E{public static void main(String[]_){String l="\n#, #Work#Make#Do#Makes Us#Hard#Bett#Fast#Strong#More#Than#Hour#Our#Nev#Ev#Aft#Af-#Work Is#Ov# #er# It",a="cwadwaewafagvahvaivajvakulamanaovapvaqvasatvaa",z="anusuovutvaa",y="kulupvu",x="cwugv",w="fujva",b=x+"udwuhvuaewuivb"+w,c=b+y+"muqvu"+z,d=x+"bdwaewuivbfakulupvbm"+z,e=b+y+"mur"+z,f=x+"adwuhvaewuivu"+w+y+z+x+"aewuivakulupv"+z+x+"adwuhvaewuiva"+w+"kulupvamuqv"+z,r=a+a+c+c+c+c+c+c+c+d+e+e+e+f;for(char o:r.toCharArray())System.out.print(l.split("#")[o-97]);}}

Java6:

class E{static{String l="\n#, #Work#Make#Do#Makes Us#Hard#Bett#Fast#Strong#More#Than#Hour#Our#Nev#Ev#Aft#Af-#Work Is#Ov# #er# It",a="cwadwaewafagvahvaivajvakulamanaovapvaqvasatvaa",z="anusuovutvaa",y="kulupvu",x="cwugv",w="fujva",b=x+"udwuhvuaewuivb"+w,c=b+y+"muqvu"+z,d=x+"bdwaewuivbfakulupvbm"+z,e=b+y+"mur"+z,f=x+"adwuhvaewuivu"+w+y+z+x+"aewuivakulupv"+z+x+"adwuhvaewuiva"+w+"kulupvamuqv"+z,r=a+a+c+c+c+c+c+c+c+d+e+e+e+f;for(char o:r.toCharArray())System.out.print(l.split("#")[o-97]);}}

पाठ में कई "ईआर" के साथ संकेत के लिए @ क्रिस ड्रॉस्ट के लिए धन्यवाद। पहला स्ट्रिंग एक लुकअप टेबल है, दूसरा भाग वैल्यू से मैजिक वैल्यू घटाकर टेबल में एक इंडेक्स के रूप में लोअरकेस लेटर्स (जो एससीआई में एक अनुक्रमिक ब्लॉक हैं) का उपयोग करता है।

दूसरे भाग में अलग-अलग लंबाई के कई तार होते हैं (छोटे वाले कई छंदों के बीच साझा किए जाने वाले सामान्य भाग होते हैं) जो चर के माध्यम से लूपिंग होने से पहले एक लंबे समय तक इकट्ठे होते हैं


अच्छा जवाब! +1 और मुझे पता है यह 1.5 साल के बारे में किया गया है, लेकिन आप गोल्फ दो बातें कर सकते हैं: निकालें lऔर स्ट्रिंग युक्त का उपयोग सभी #के लिए-प्रत्येक पाश, और बदलने के सीधे में charकरने के लिए के लिए-प्रत्येक लूप में int: for(int o:r.toCharArray())System.out.print("\n#, #Work#Make#Do#Makes Us#Hard#Bett#Fast#Strong#More#Than#Hour#Our#Nev#Ev#Aft#Af-#Work Is#Ov# #er# It".split("#")[o-97]);में कौन सा परिणाम -5 बाइट्स / 513 बाइट्स
केविन क्रूज़सेन

2

जावास्क्रिप्ट ES6, 440 बाइट्स 438 बाइट्स

यह सरल संपीड़न अनुकूलन का एक गुच्छा है। एक-लाइनर के रूप में:

eval("a='w_m_d_u_h_b_f_s_M_H_O_N_E_A_W_VX';b='w hTm b_d f,Tu s_M ETH A_O W N VX';c=bRA/,'Y');o={};'wWork It|mMake It|dDo It|uMakes Us|hHard&bBett&fFast&sStrong&MMore Than|HHour|OOur|NNev&EEv&AAft&WWork Is|VOv&X\\n\\n|YAf-|_\\n|T 'R&/g,'er|').split('|').map(x=>o[x[0]]=x.slice(1));console.log((a+a+b.repeat(7)+bR._/g,'_')R,?T/g,',T')+c+c+c+bRT/,'_')R,/,'')+bR,?T. ._/g,'_')+bR,?T/g,'_'))R\\w/g,x=>o[x]).trim())".replace(/R/g,'.replace(/'))

यह एक निष्पादन योग्य स्क्रिप्ट के माध्यम से लिखा गया था iojs --harmony_arrow_functions file.js; आप console.log()"आउटपुट लिरिक्स" के अर्थ के आधार पर ओवरहेड को शेव कर सकते हैं ।

व्याख्या

बाहरी प्रदर्शन करने के बाद .replace(), को खिलाया गया कोड eval:

// The first three lines, with each phrase compressed to a single character, newlines
// compressed to _, and block-endings compressed to X. Call this compressed-format.
a = 'w_m_d_u_h_b_f_s_M_H_O_N_E_A_W_VX';

// The compressed-format main block: this is repeated seven times literally but
// every other stanza, besides `a` above, ultimately uses some simple variant
// of this block.
b = 'w hTm b_d f,Tu s_M ETH A_O W N VX';
// The new character T above is a new character we're adding to compressed-format, it is
// a space in the main block but also a hook for some regular expressions later.

// We need one more entry in compressed-format: some blocks, here assigned to
// the variable `c`, shorten "After" to Y = "Af-".
c = b.replace(/A/, 'Y');

// Now we want to build a lookup table for this compressed format above. That is done by
// these lines, which have also been compressed:
o={};
'wWork It|mMake It|dDo It|uMakes Us|hHard&bBett&fFast&sStrong&MMore Than|HHour|OOur|NNev&EEv&AAft&WWork Is|VOv&X\n\n|YAf-|_\n|T '
    .replace(/&/g, 'er|')
    .split('|')
    .map(x => o[x[0]] = x.slice(1));
// The fact that so many fragments end in 'er' allows us to actually shave a couple 
// bytes above, but the compression scheme is fundamentally creating a dict like
//     {a: "Phrase 1", b: "Phrase 2", c: "Phrase 3", d: "Phrase 4"}
// from the string "aPhrase 1|bPhrase 2|cPhrase 3|dPhrase4".

// Now we have the part that actually does the work:
console.log(
    ( // build-string phase
        // first two opening blocks `a`
        a + a + 

        // seven repetitions of `b`
        b.repeat(7) +

        // a version of `b` without final words and with commas before each T.
        b.replace(/._/g, '_').replace(/,?T/g, ',T') + 

        // three repetitions with the 'Af-' suffix.
        c + c + c + 

        // one with the first T converted into a newline and no commas
        b.replace(/T/, '_').replace(/,/, '') + 

        // one with only the first halfs of the three lines
        b.replace(/,?T. ._/g, '_') + 

        // one with no commas and all T's converted to newlines.
        b.replace(/,?T/g, '_')
    ) // end build-string phase
    // Now we convert from compressed-format to actual format
    .replace(/\w/g, x => o[x])
    // We are only told that one trailing newline is allowed; we have two extra:
    .trim() 
)

यश

  • @vihan, जिन्होंने मुझे याद दिलाया कि ES6 में .repeatस्ट्रिंग्स के लिए यह चमकदार नया फ़ंक्शन भी है , जिससे 2 बाइट्स बचते हैं ।

आप शायद b.repeat(7)इसके बजाय का उपयोग कर सकते हैंb+b+b+b+b+b+b
डाउनगोट

1

पॉवरशेल, 659 बाइट्स

$a=@(" ","`n",",","Stronger","Make It","Do It","Makes Us","Harder","Better","Faster","Work It","More Than","Hour","Our","Never","Ever","After","Work Is","Over","Af-")
$z="1000070"
$y="01130017001400180101"
$x="010500090200060"
$v="00301110015001200"
$b="100104010501060107010801090103011101120113011401150116011701180101"
$c=$z+"0040008$x$v"+"16$y"
$d=$z+"20004$x"+"1110015020012$y"
$e=$z+"0040008$x$v"+"19$y"
$f=$z+"10400080105000900060003011100150012$y"
$g=$z+"105000901110015$y"+"10000701040008010500090106000301110015011200160113001700140018"
$($b,$b,$c,$c,$c,$c,$c,$c,$c,$d,$e,$e,$e,$f,$g|%{for($i=0;$i-lt$_.length;$i+=2){$a[$_.Substring($i,2)]}})-join''

कीवर्ड की एक सरणी बनाता है $a, फिर संख्यात्मक स्ट्रिंग्स की एक श्रृंखला का उपयोग करके गीतों को एन्कोड करता है जो एक forलूप में भेजे जाते हैं । लूप दो-अंकीय सब्सट्रिंग्स लेता है, $aसरणी से संबंधित कीवर्ड को खींचता है , और अंत में -join''यह सब एक साथ जोड़ता है।

मुझे लगता है कि यह इस पद्धति के बारे में जितना अच्छा हो सकता है, हर बार जब मैंने आगे गोल्फ करने की कोशिश की (जैसे, 040008एक नए चर के साथ बदल रहा है), यह एक युगल बाइट्स के रूप में निकला क्योंकि प्रतिस्थापन लंबाई पर्याप्त नहीं थी सभी अतिरिक्त उद्धरणों की आवश्यकता है। हालाँकि मैंने कुछ नए उत्तर पोस्ट किए हैं जब से मैंने शुरू किया है कि थोड़ा अलग तरीके हैं जो दिखते हैं कि वे PowerShell में छोटे हो सकते हैं (जैसे कि ASCII वर्णों का उपयोग दो अंकों के बजाय सांकेतिक शब्दों में बदलना करने के लिए, शायद?), मैं के साथ छड़ी करने जा रहा हूं? यह वाला।

संपादित करें - मेरे द्वारा उपयोग किए गए प्रतिस्थापन एन्कोडिंग को भूल गए:

00  <space>
01  `n
02  ,
10  Work It
04  Make It
05  Do It
06  Makes Us
07  Harder
08  Better
09  Faster
03  Stronger
11  More Than
12  Hour
13  Our
14  Never
15  Ever
16  After
17  Work Is
18  Over
19  Af-

यदि आपको किसी पात्र के
असिसी

1

GolfScript , 251 बाइट्स गॉल्फ़्ड

'Work It
Make It
Do It
Makes Us
Harder
Better
Faster
Stronger
More Than
Hour
Our
Never
Ever
After
Work Is
Over

'2*.n/:a;56,{:@4%.2&+2*:^a=' ':|4^+a='jSRSSS]SSSSSST'81base 3@?/3%[|', 'n]=^)a=+@ 51%48/!*|237118176 2 55@-?/1&@44%32/'Af-'*5^+a=if^9/n*n}/

इसे ऑनलाइन आज़माएं!

[]तदनुसार अनावश्यक और सरलीकृत कोड हटा दिया गया। बदल दिया iऔर jकरने के लिए @और ^खाली स्थान के की अनुमति हटाने के लिए। एक ही तीन वर्णों को दोहराने से बचने के ' 'लिए चर की पहली घटना को सौंपा |

गोल्फस्क्रिप्ट , पहला कार्य संस्करण 262 बाइट्स

'Work It
Make It
Do It
Makes Us
Harder
Better
Faster
Stronger
More Than
Hour
Our
Never
Ever
After
Work Is
Over

'2*.n/:a;56,{:i;[i 4%.2&+2*:j a=' '4j+a='jSRSSS]SSSSSST'81base 3i?/3%[' '', 'n]=j)a=+i 51%48/!*' '237118176 2 55i-?/1&i 44%32/'Af-'*5j+a=if j 9/n*n]}/

इसे ऑनलाइन आज़माएं!

यह एक ही मूल एल्गोरिथ्म का उपयोग करके गोल्फ रुपी में मेरे रूबी उत्तर का एक बंदरगाह है: दो बार टोकन की सूची का उत्पादन, फिर उन्हें छंद में पंक्तिबद्ध करें और प्रत्येक पंक्ति की विशिष्टताओं के लिए समायोजन करते हुए, छंद लाइन का निर्माण करें।

कुछ मतभेद हैं। सही मध्य-पंक्ति विराम चिह्न की संख्या आधार 81 में है (आसानी से यह एक छपने योग्य अस्सी वर्ण प्रति कविता बनाता है); और अंतिम एन्कोडिंग को प्रिंट करने या न करने के लिए नंबर एन्कोडिंग संशोधित किया गया है क्योंकि सूचकांक 55-iइसके बजाय है i-28(उत्तरार्द्ध को पूर्णांक के लिए ट्रंक करने के बजाय आंशिक संख्या उत्पन्न करने वाली नकारात्मक शक्तियों के साथ समस्या पैदा करने के लिए पाया गया था।)

टिप्पणी की गई

'Work It
Make It
Do It
Makes Us
Harder
Better
Faster
Stronger
More Than
Hour
Our
Never
Ever
After
Work Is
Over

'2*                                               #make a string of all the tokens twice and push on the stack
.n/:a;                                            #duplicate the string, split into tokens at newline to form array. Assign to a
56,{:i;                                           #iterate through i= (0..55) 
  [i 4%.2&+2*:j                                   #calculate j=(i%4+(i%4&2))*2 to cycle through 0 2 8 10.
  a=' '                                           #leave a[j] on stack followed by space (token A)
  4j+a=                                           #leave a[j+4] on stack (token B))
  'jSRSSS]SSSSSST'81base 3i?/3%[' '', 'n]=j)a=+   #leave ' ' ', ' or newline on stack as appropriate followed by a[j+1] (token C)
  i 51%48/!*                                      #multiply the data described in the previous line by  !(i%51/48)  (1 or 0)
  ' '                                             #leave a space on the stack
  237118176 2 55i-?/1&                            #leave 237118176/2**55-i & 1 on stack (true or false indicates token D required)
  i 44%32/'Af-'*5j+a=                             #leave i%44/32= 0 or 1 copies of 'Af-' on the stack. Leave a[j+5] on the stack.  
  if                                              #depending on value of last but one line, select an option from the previous line.
  j 9/n*n]                                        #leave a newline on the stack. if 9/n is 1 or more (last line of verse) leave an additional newline
}/                                                #close the loop
                                                  #printing done by implied stack dump on program exit.

252 बाइट्स। व्हाट्सएप से बचने के लिए अनुपयोगी प्रतीकों को चर नामों के रूप में उपयोग करें और " "एक चर में स्थान ( ) स्टोर करें । इसके अलावा, एक चर से बाहर आदत डालने के बाद पॉप मत करो।
बाहर निकलना

@EriktheOutgolfer सुझावों के लिए धन्यवाद, लेकिन मैंने पहले से ही 251 बाइट संस्करण पोस्ट किया है, जिसमें उनमें से अधिकांश शामिल हैं। आपने इससे पहले एक स्थान देखा था, 51हालांकि मैं चूक गया था। मैं इसे बाद में ठीक कर दूंगा, और संभवतः इसे छोटा करने के अन्य तरीकों की तलाश करूंगा। यह मेरा पहला गोल्फस्क्रिप्ट कार्यक्रम है, और जब उन्हें प्रतीकों को चर के रूप में उपयोग किया जाता है, तो मुझे उन्हें पढ़ना बहुत कठिन लगता है, इसलिए मैंने अपना 262-बाइट पहला काम करने वाला संस्करण कम से कम अभी के लिए छोड़ दिया है।
लेवल रिवर सेंट

आह तुम स्पष्ट रूप से किया था, योग्य।
बाहर निकलना

0

पायथन - 1056 चार्टर्स

a,b,d,s,w,i,t,e,f,h,H,mi,mu,mt,ad,n,o,O="After","Better","Do It ","Stronger","Work ","Is ","It ","Ever ","Faster ","Harder ","Hour ","Make It ","Makes Us ","More Than ","Af-","Never ","Our ","Over"
owinO=o+w+i+n+O
mus=mu+s
df=d+f
dfmu=df[0:-1]+", "+mu
dfmus=df+mus
dfcmus=df[0:-1]+", "+mus
ha=h+a
Ha=H+a
mib=mi+b
mte=mt+e
mteh=mte+H
mtech=mte[0:-1]+", "+H
mtehad=mteh+ad
mteha=mteh+a
wi=w+i
wt=w+t
wth=wt+h
wthmt=wth[0:-1]+", "+mi
wthmib=wth+mi+b
E = ""
l =[wt,mi,d,mu,h,b,f,s,mt,H,o,n,e,a,wi,O,E,wt,mi,d,mu,h,b,f,s,mt,H,o,n,e,a,wi,O,E,wthmib,dfcmus,mteha,owinO,E,wthmib,dfcmus,mteha,owinO,E,wthmib,dfcmus,mteha,owin
O,E,wthmib,dfcmus,mteha,owinO,E,wthmib,dfcmus,mteha,owinO,E,wthmib,dfcmus,mteha,owinO,E,wthmib,dfcmus,mteha,owinO,E,wthmt,dfmu,mtech,owinO,E,wthmib,dfcmus,mteha
d,owinO,E,wthmib,dfcmus,mtehad,owinO,E,wthmib,dfcmus,mtehad,owinO,E,wth,mib,dfmus,mteh,owinO,E,wth,df,mte,owinO,E,wth,mib,df,mus,mte,Ha,owinO]

for ln in l:
    print ln

अभी भी चर नामों के साथ सुधार के लिए जगह है, लेकिन इसकी शुरुआत है।


2
हो सकता है कि यह आपके सभी चर नामों की एक सूची को अलग से लिखने में मदद करे ताकि आप आसानी से देख सकें कि किस अक्षर का अभी तक उपयोग नहीं किया गया है और फिर अपने लंबे चर नामों की खोज करें?
ट्राइकोप्लाक्स

0

रूबी, 486 बाइट्स

i=%w(Work\ It Make\ It Do\ It Makes\ Us Harder Better Faster Stronger More\ Than Hour Our Never Ever After Work\ Is Over)
z=i[1]+p+i[5]
y=i[2]+p+i[6]
x=z+n+y
w=i[3]+p+i[7]
v=i[8]+p+i[12]
u=w+n+v
t="Our "+i[14]+" Never Over"
s=i[0]+p+i[4]
r=i[9]+p+i[13]
n="\n"
p=' '
m=', '
a=i.join n
q=n+t
l=s+n
b=s+p+x+m+u+p+r+q
c=s+m+i[1]+n+y+m+i[3]+n+v+m+i[9]+q
d=b.gsub("After","Af-")
e=l+x+p+u+p+i[9]+q
f=l+y+n+v+q
g=l+x+n+u+n+r+q
def o s
s+"

"
end
puts o(a)*2+o(b)*7+o(c)+o(d)*2+o(d)+o(e)+o(f)+g

0

रूबी, 483 बाइट्स

puts "#{'a buc bud bucs eufuguhuiuj kulumuoupuqua rutuu'*2}#{'a b f c b gud b h, cs e iuj k p l qum a r o tuu'*7}a b f, c bud b h, cs euj k p, lum a r o tuu#{'a b f c b gud b h, cs e iuj k p l num a r o tuu'*3}a b fuc b gud b h cs e iuj k p lum a r o tuua b fud b huj k pum a r o tuua b fuc b gud b hucs e iuj k pul qum a r o tu".gsub /./,Hash[[*?a..?u,' ',','].zip %w{Work It Make Do Us Harder Better Faster Stronger More Than Hour Our Af- Never Ever After Is s Over}+[?\n,' ',',']]

गीत में इस्तेमाल किए गए हर शब्द को एक अक्षर के साथ जोड़कर, कुछ छंदों को गुणा करके, फिर वास्तविक गीतों के साथ एन्कोड किए गए अक्षरों को प्रतिस्थापित करके काम करता है। Commas, रिक्त स्थान को छोड़ दिया गया है। uएक नई रूपरेखा है।


2
ईस्टर अंडे: वाक्यांश में शामिल हैfuc b gud
dkudriavtsev

0

PHP, 434 बाइट्स

$m="Make It";$b="$m Better";$o="Our Work Is Never Over
";$u="Makes Us";$s="$u Stronger";$d="Do It";$f="$d Faster";$e="More Than Ever";$h="Hour";$w="Work It Harder";echo strtr("001111111$w, $m
$f, $u
$e, $h
$o
222$w
$b
$f $s
$e $h
$o
$w
$f
$e
$o
$w
$b
$f
$s
$e
$h After
$o",["Work It
$m
$d
$u
Harder
Better
Faster
Stronger
More Than
$h
Our
Never
Ever
After
Work Is
Over

","$w $b
$f, $s
$e $h After
$o
","$w $b
$f, $s
$e $h Af-
$o
"]);

इसे ऑनलाइन आज़माएं!

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.