धार UI के लिए ASCII कला

30

संकट

धार प्रोग्राम से UI को फिर से बनाएँ

कोई इनपुट नहीं दिया गया है, निम्नलिखित उत्पादन:

+----------+----------+----------+
|a.exe     |##########|seeding   |
+----------+----------+----------+
|b.exe 10% |#         |leeching  |
+----------+----------+----------+
|c.exe     |##########|seeding   |
+----------+----------+----------+
|d.exe 20% |##        |leeching  |
+----------+----------+----------+
|e.exe     |##########|seeding   |
+----------+----------+----------+
|f.exe 30% |###       |leeching  |
+----------+----------+----------+
|g.exe     |##########|seeding   |
+----------+----------+----------+
|h.exe 40% |####      |leeching  |
+----------+----------+----------+
|i.exe     |##########|seeding   |
+----------+----------+----------+
|j.exe 50% |#####     |leeching  |
+----------+----------+----------+
|k.exe     |##########|seeding   |
+----------+----------+----------+
|l.exe 60% |######    |leeching  |
+----------+----------+----------+
|m.exe     |##########|seeding   |
+----------+----------+----------+
|n.exe 70% |#######   |leeching  |
+----------+----------+----------+
|o.exe     |##########|seeding   |
+----------+----------+----------+
|p.exe 80% |########  |leeching  |
+----------+----------+----------+
|q.exe     |##########|seeding   |
+----------+----------+----------+
|r.exe 90% |######### |leeching  |
+----------+----------+----------+
|s.exe     |##########|seeding   |
+----------+----------+----------+
|t.exe     |##########|seeding   |
+----------+----------+----------+
|u.exe     |##########|seeding   |
+----------+----------+----------+
|v.exe     |##########|seeding   |
+----------+----------+----------+
|w.exe     |##########|seeding   |
+----------+----------+----------+
|x.exe     |##########|seeding   |
+----------+----------+----------+
|y.exe     |##########|seeding   |
+----------+----------+----------+
|z.exe     |##########|seeding   |
+----------+----------+----------+

कार्यक्रमों के लिए प्रगति कर रहे हैं:

b=10% d=20% f=30% h=40% j=50% l=60% n=70% p=80% r=90%

#लीचिंग कार्यक्रमों के लिए राशि हैprogress/10

बाकी सभी seedingपूरी प्रगति सलाखों के साथ हैं।

नियम

  • अग्रणी और अनुगामी नए समाचारों की अनुमति है।
  • जब तक यह आउटपुट का आकार नहीं बदलता है तब तक लीडिंग और ट्रेलिंग स्पेस की अनुमति होती है।
  • आउटपुट के लिए stdout और फ़ंक्शन की अनुमति है।
  • बाइट्स में सबसे छोटा कोड जीत जाता है
code-golf  string  ascii-art  kolmogorov-complexity 
— LiefdeWen
स्रोत
5
आप जानते हैं कि .exeटॉरेंट से डाउनलोड करना सबसे उज्ज्वल काम नहीं है, एह?
— रोबू
14
@RobAu मैं और कैसे प्राप्त करूंगा इसकी f.exeएक प्रति कहीं और नहीं मिल सकती है।
— LiefdeWen
9
f.exeके साथ आता है f_readme.txtकि कहते हैं, "व्यवस्थापक के रूप में चलाएं"। वैध लगता है।
— मैजिक ऑक्टोपस Urn
@RobAu मुझे नहीं पता था, मैं नियमित रूप से लिनक्स वितरण को डाउनलोड करता हूं, जिसमें कुछ ऐसे निष्पादन योग्य शामिल हैं जिनमें बूट लोडर स्थापित होते हैं, जिनमें टोरेंट होते हैं!
— पास्कल क्यूक

जवाबों:

5

चारकोल, 98 85 83 बाइट्स

Ｆ³Ｂ⁻³⁴×¹¹ι³Ｍ↘ .exeＭ⁶→×#χ|seeding⸿Ｆ²⁵Ｃ⁰¦²↗Ｆβ↓⁺ι-Ｆ⁹«Ｊ⁷⁺³×⁴ι⁺⁺ι¹0% |#Ｐ⁺× ⁹|leeching×#ι

मैंने सोचा था कि एक टेम्पलेट की नकल करने से मुझे बहुत सारे कोड मिलेंगे, लेकिन यह सभी किसी न किसी तरह से जोड़ना चाहते हैं, हालांकि मैं 9 लूपिंग पंक्तियों को ठीक करने के लिए एक लूप का उपयोग करके 13 बाइट्स को बचाने में कामयाब रहा। स्पष्टीकरण:

Ｆ³Ｂ⁻³⁴×¹¹ι³             Make the top row of boxes
Ｍ↘ .exeＭ⁶→×#χ|seeding⸿  Print .exe, the 10 #s and seeding
Ｆ²⁵Ｃ⁰¦²                 Make 25 copies of the boxes
↗Ｆβ↓⁺ι-                 Put the letters in at the start
Ｆ⁹«                     For the 9 leeching files
   Ｊ⁷⁺³×⁴ι              Move the cursor to the percentage column
   ⁺⁺ι¹0% |#            Print the percentage and the first # of progress
   Ｐ⁺× ⁹|leeching       Erase the rest of the progress and change the status
   ×#ι                  Print the desired amount of progress

(साइड नोट: मुझे लगता है कि चारकोल में एक बग की खोज की गई है; |एक ASCII चरित्र है, लेकिन यह भी एक तीर के रूप में गिना जाता है Multiprint, इसलिए आप इसे नहीं कर सकते Multiprint।)

— नील
स्रोत
बग नहीं, आप चाहें तो इससे बच सकते हैं
— ASCII-only
@ ASCII- केवल आह सही, दुख की बात है कि deverbosifier यह नहीं जानता।
— नील
यह सच है, मुझे याद दिलाने के लिए धन्यवाद
— ASCII-only
12

पर्ल 5 , 130 बाइट्स

print$e=("+"."-"x10)x3 ."+
";printf"|$_.exe%4s |%-10s|%-9s |
$e",$|--&&$@++<9?("$@0%","#"x$@,leeching):("","#"x10,seeding)for a..z

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

मैं उम्मीद करता हूं कि कुछ बाइट्स हैं जो गोल्फ हो सकते हैं, लेकिन मैं प्रेरणा से बाहर भाग गया हूं।

लघु स्पष्टीकरण:
$eजुदाई लाइन ( +----------+----------+----------+) शामिल हैं; इसका निर्माण सीधे आगे ( ("+"."-"x10)x3 ."+\n") है।
फिर, से अधिक वर्ण मैं पाश aकरने के लिए z:
हर बार, प्रिंट "|$_.exe%4s |%-10s|%-9s |\n$e; यह printfस्ट्रिंग्स ( %s) और लेफ्ट-पैडेड स्ट्रिंग्स ( %-9s) के लिए प्लेसहोल्डर्स के साथ एक मानक है ।
अगर $|--&&$@++<9यह सच है ( $|एक विशेष चर है जिसमें 0 या 1 है, और इसे घटाकर इसके मूल्य को बढ़ा दिया जाता है), तो प्रतिशत 100% नहीं है, और प्रिंट में तीन मूल्य हैं "$@0%","#"x$@,leeching( $@0%वास्तव में बस $@ . "0" . "%"- याद रखें कि $@पहले वेतन वृद्धि हुई थी) , अन्यथा, तीन मूल्य हैं "","#"x10,seeding)।

— बापू
स्रोत
6

पायथन 2 , 182 177 बाइट्स

हालत के प्रारूप को बदलकर 5 बाइट्स बंद करने के लिए @officialaimm का धन्यवाद।

r=("+"+10*"-")*3+"+"
for i in range(26):z=i/2+1;print r+"\n|"+chr(97+i)+".exe "+["    |"+10*"#"+"|seeding ",`10*z`+"% |"+z*"#"+(10-z)*" "+"|leeching"][i%2and i<19]+"  |"
print r

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

— Fedone
स्रोत
1
— आधिकारिक
1
अच्छा! मैंने देखा है कि एक दो बार लेकिन इस उदाहरण में इसका इस्तेमाल करने के बारे में नहीं सोचा था। क्या मैं आपके उत्तर को आपके समाधान के साथ अपडेट कर सकता हूं?
— फेडोन
बेशक, आप इसे अपडेट कर सकते हैं। ;)
— आधिकारिक
— सेबस्टियन
6

SOGL V0.12 , 90 89 88 बाइट्स

ēz{L┌* +3ΟQķ|;o".exe ”oēI»L*"% |”e» #*lLκ@*"┌5%8'Ω⅞█≡θ¹‘++++e'³>e2\+?X"⅓m÷Ko→∆)№(¤^▒«‘}o

यह कोशिश करो!

स्पष्टीकरण:

ē                                 push variable E (default = input, which default is 0) and increase it after (next ē call will result in 1, or next e call - 2)
 z{                               iterate over the lowercase alphabet
   L┌*                            push 10 dashes
       +                          push "+"
        3Ο                        encase 3 copies of the dashes in pluses
          Q                       output in a new line, without popping and without disabling auto-output
           ķ|                     output in a new line "|"
             ;o                   output the current iteration (the alphabet letter)
               ".exe ”o           output ".exe "
                       ē          push E and increase the variable after
                        I         increase it
                         5*       multiply by 5 (every 2 ē calls this gets called)
                           "% |”  push "% |"

e»                                  push (E)/2
   #*                               get that mant "#"s
     l                              get the length of that string
      Lκ                            push 10-length
        @*                          push that many spaces
          "..‘                      push "|leeching  |"
              ++++                  add all those strings on the stack together ((e+1)*5, "% |", "#..#", " .. ", "|leeching |") (done this way to leave the "+-+-+-+" on the stack)
                  e'³>              push e>19
                      e2\           push e divides by 2
                         +          add together (here works like OR)
                          ?         if that then
                           X          remove the added-together string
                            "..‘      push "    |##########|seeding   |"
                                }   END
                                 o  output POP (either the added string or full/seeding version)
implicitly output POP (since none of tTpP were called), which is the separator line
— dzaima
स्रोत
SOGL धड़कता है .... चारकोल ?!
— श्री Xcoder
1
@ Mr.Xcoder यह सबसे आम परिदृश्य imo है।
— आउटगोल्फ
क्यों होता है पतन?
— द्विजिमा
4

जावास्क्रिप्ट, 232 230 228 226 बाइट्स

(s='+----------'.repeat(3),p=0)=>[...'abcdefghijklmnopqrstuvwxyz'].map((c,i)=>(b=i%2,p=b?p+10:p,x=b&p<91,`${s}+'
|${c}.exe ${x?p+'%':'   '} |${'#'.repeat(x?p/10:10).padEnd(10)}|${x?'leeching':'seeding '}  |`)).join`
`+`
${s}+`
  • -2 बाइट्स थैंक्स टू @ स्टेपेन एस - डिफॉल्ट फंक्शन पैरामीटर्स का उपयोग करना
  • -2 बाइट्स ओपी के लिए धन्यवाद - कुछ जगहों की जगह
  • -2 बाइट्स @ शुग्गी को धन्यवाद - विनाशकारी वर्णमाला स्ट्रिंग

डेमो

कोड स्निपेट दिखाएं

— Weedoze
स्रोत
अंतिम पंक्ति गायब है। इसके अलावा, सबमिशन और स्निपेट अलग-अलग हैं; उदाहरण के लिए "जोंक" गायब है।
— झबरा
@ शैगी उत्तर अपडेट किया गया - फॉलो करने के लिए धन्यवाद
— वेदेज़
फंक्शन बॉडी के चारों ओर s की आवश्यकता को हटाकर फंक्शन पैरामीटरों को ले जाकर sऔर pडिफॉल्ट करके: 2 बाइट्स (): फिडल
— स्टीफन
मुझे यकीन नहीं है, लेकिन क्या आप ${x?'leeching ':'seeding '}|निम्न में बदलाव नहीं कर सकते ${x?'leeching':'seeding '} |:?
— LiefdeWen
@Liefde जब आप सही हैं! धन्यवाद
— Weedoze
3

PHP , 179 बाइट्स

बिना इनपुट के 

for($a=a;$x<53;++$x&1?:$a++)printf($x&1?"
|$a.exe%4s |%-10s|%-10s|
":str_pad("",34,"+----------"),($y=$x%4>2&$x<36?++$z:"")?$y."0%":"",str_repeat("#",$y?:10),$y?leeching:seeding);

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

PHP , 176 बाइट्स

इनपुट के साथ 

for($a=a;$x<53;)printf($x&1?"
|$a.exe%4s |%-10s|%-10s|
":str_pad("",34,"+----------"),($y=strstr($argn,++$x&1?:$a++)[2])?$y."0%":"",str_repeat("#",$y?:10),$y?leeching:seeding);

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

— जार्ग हुल्सरमन
स्रोत
पहले संस्करण से 9 बाइट्स बचाएं: (-2) ++से निकालें ++$x&1, $y=++$x%4|$z>9?"":++$z."0%"दूसरे printfपैरामीटर (-9) के रूप में उपयोग करें और (+2) $zसे पहले डालें:10
— टाइटस
2

पायथन 3 , 255 बाइट्स

मुझे यकीन है कि इसे जल्द ही अपडेट किया जा सकता है:

e,l='.exe ',('+'+10*'-')*3+"+";print(l)
for i in zip(['|'+chr(z)+e+'    |'+"#"*10+'|seeding   |'if z%2or z>115else'|'+chr(z)+e+str((z-96)//2*10)+'% |'+(z-96)//2*"#"+(10-(z-96)//2)*" "+"|leeching  |"for z in range(97,123)],[l]*26):print(i[0],i[1],sep="\n")

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

— मिस्टर एक्सकोडर
स्रोत
इसके बजाय leeching |और seeding |, क्या आप इसे leechingऔर में नहीं बदल सकते seeding +" |"?
— लिफडेविन
@Liefde जब मुझे डर लगता है कि 8 बाइट्स लंबी हैं ...
— श्री एक्सकोडर
चलो, "जल्द ही अपडेट हो रहा है"? वैसे भी सूची के साथ 246 बाइट्स और / या ।
— user202729
इसके अलावा, //2*10सिर्फ *5और 10-(z-96)//2सिर्फ है 58-z//2।
— user202729
2

जावा (ओपनजेडके 8) , 244 229 228 227 226 224 222 218 217 बाइट्स

o->{String x="----------+",z="+"+x+x+x,s=z;for(int c=96,p;++c<123;s+=s.format("%n|%c.exe%4s |%-10s|%-10s|%n"+z,c,p>9?"":p+"0%","##########".substring(0,p),p>9?"seeding":"leeching"))p=(p=c/2-48)>9|c%2>0?10:p;return s;}

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

-2 बाइट्स @KevinCruijssen को धन्यवाद!

— ओलिवियर ग्रेजायर
स्रोत
आपका leechingऔर seedingसही संरेखित हैं।
— LiefdeWen
वाह, तेज टिप्पणी! मैंने बस पोस्ट करने के बाद देखा और इसे ठीक करने में व्यस्त था: पी
— ओलिवियर ग्रेजायर
एक
— अति सूक्ष्म अंतर
उपद्रव? नहीं, आप नहीं थे :)
— ओलिवियर ग्रेजायर
1
खतरे .. जबकि मैं ठीक कर रहा था और अपने जवाब में एक स्पष्टीकरण जोड़ रहा था कि आपने मुझे इसे हराया है .. और 34 बाइट्स छोटे मैं जोड़ सकता हूं .. मुझे कुछ सिमुलेशन दिखाई देते हैं, लेकिन .formatऔर 0%, का स्मार्ट उपयोग और +1! Btw, आप अपने उत्तर को कुछ और के साथ शुरू करके s=z, जैसे कि गोल्फ कर सकते हैं : o->{String x="----------+",z="+"+x+x+x,s=z;for(int c=96,p;++c<123;)s+=s.format("%n|%c.exe %3s |%-10s|%-10s|%n"+z,c,(p=(c%2>0|c/2-48>10)?10:c/2-48)<10?p+"0%":"","##########".substring(0,p),p<10?"leeching":"seeding");return s;}( 225 बाइट्स )
— केविन क्रूज़सेन
1

ब्रिंगोल्फ , 673 655 बाइट्स

9..#+[#-]#+[#-]#+[#-]"+
|"!&@V"a.exe     |"!&@V9[##]"|seeding   |
"!&@v!&@v<1+>!&@V8##[# ]"|leeching  |
"!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<$_##>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<$_##>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<$_##>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<$_##>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<<$_##>>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<<<$_##>>>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<<<<$_##>>>>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<<<<<$_##>>>>>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@vv<<<<<<<<<$_##>>>>>>>>>!&@v!&@v<1+>!&@v!&@vv!&@v<1+>!&@v!&@vv!&@v<1+>!&@v!&@vv!&@v<1+>!&@v!&@vv!&@v<1+>!&@v!&@vv!&@v<1+>!&@v!&@vv$_!&@;

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

मैंने इसे पहले कहा है और मैं इसे फिर से कहूंगा: ASCII कला में ब्रिंगोल्फ खराब है।

कम से कम यह बाइट्स का केवल 1 / 3rd हिस्सा है जो वास्तव में आउटपुट को हार्डकोड में ले जाएगा

— Skidsdev
स्रोत
1

वी , 107 बाइट्स

¬azÓ./|&.exeò
ddÎAµ |±°#|seeding³ |
ÙÒ-4ñr+11lñddç^/P
jp4G9ñ8|R00%3l10r llRleeching4jñV{10g
çä/WylWl@"r#

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

Hexdump:

00000000: ac61 7ad3 2e2f 7c26 2e65 7865 f20a 6464  .az../|&.exe..dd
00000010: ce41 b520 7cb1 b023 7c73 6565 6469 6e67  .A. |..#|seeding
00000020: b320 7c0a d9d2 2d34 f172 2b31 316c f164  . |...-4.r+11l.d
00000030: 64e7 5e2f 500a 6a70 3447 39f1 387c 5230  d.^/P.jp4G9.8|R0
00000040: 3025 1b33 6c31 3072 206c 6c52 6c65 6563  0%.3l10r llRleec
00000050: 6869 6e67 1b34 6af1 567b 3130 6701 0ae7  hing.4j.V{10g...
00000060: e42f 5779 6c57 6c40 2272 23              ./WylWl@"r#
— DJMcMayhem
स्रोत
1

जाप , 98 बाइट्स

;27Æ4î+ ¬q-pU=10ÃíC¬£'|²¬q[X+".exe {W=Yu ©°T<U©T*U ?W+'%:P}"'#pW/UªU `äÊA Ð:g`¸g!W]m!hUî)q|})c ·

एक बग कि भोजनालयों के कारण नवीनतम संस्करण में काम नहीं करता है 4î+, q-p10और q|है, लेकिन में काम करता है के लिए प्रतिबद्धf619c52 । इसे ऑनलाइन टेस्ट करें!

— ETHproductions
स्रोत
1

टी-एसक्यूएल, 238 बाइट्स

DECLARE @ INT=1,@D CHAR(11)='+----------'L:PRINT @D+@D+@D+'+
|'+CHAR(@+96)+'.exe '+IIF(@%2=0AND
@<20,CONCAT(@/2,'0% |',REPLICATE('#',@/2),SPACE(10-@/2),'|leeching  |'),'    |##########|seeding   |')SET @+=1IF @<27GOTO L
PRINT @D+@D+@D+'+'

प्रक्रियात्मक समाधान, स्वरूपित:

DECLARE @ INT=1, @D CHAR(11)='+----------'
L:
    PRINT @D + @D + @D + '+
|' + CHAR(@+96) + '.exe ' + 
    IIF(@%2=0 AND @<20, 
       CONCAT(@/2,'0% |',REPLICATE('#',@/2),SPACE(10-@/2),'|leeching  |'),
       '    |##########|seeding   |')
   SET @+=1
IF @<27 GOTO L
PRINT @D + @D + @D + '+'

लूप में सब कुछ (एसईटी तक) एक ही प्रिंट स्टेटमेंट का हिस्सा है, जिसमें पहले स्ट्रिंग शाब्दिक के अंदर एक लाइन ब्रेक भी शामिल है।

मैं एक सेट-आधारित समाधान पर काम कर रहा हूं (एक तालिका बनाएं और पॉपुलेट करें, फिर उसमें से चयन करें), लेकिन मुझे यकीन नहीं है कि यह छोटा होने जा रहा है या नहीं।

— BradC
स्रोत
1

जावा 8, 271 263 262 बाइट्स

o->{String a="+----------",b=a+a+a+"+\n",r=b;for(int c=96,t;++c<123;r+="|"+(char)c+".exe "+(t>0?(c/2-48)+"0%":"   ")+" |##########".substring(0,t>0?c/2-46:12)+"         |".substring(t>0?c/2-49:9)+(t>0?"leeching":"seeding ")+"  |\n"+b)t=c<115&c%2<1?1:0;return r;}

कुछ नहीं के लिए यह सब परेशानी ..>>;)
( @ OliverGrégoire द्वारा छोटा जावा उत्तर )।

स्पष्टीकरण:

इसे यहाँ आज़माएँ।

o->{                       // Method with unused Object parameter and String return-type
  String a="+----------",b=a+a+a+"+\n",
                           //  Temp String "+----------+----------+----------+\n"
         r=b;              //  Result-String
  for(int c=96,t;++c<123   //  Loop from 'a' to 'z':
      ;                    //    After every iteration:
       r+=                 //     Append the result-String with:
         "|"               //      A literal "|"
         +(char)c          //      + the character
         +".exe "          //      + literal ".exe "
         +(t>0?            //      If the current character is below 's' and even unicode:
           (c/2-48)+"0%"   //       + the percentage
          :                //      Else:
           "   ")          //       + the spaces
         +" |##########"   //      + the progress bar
           .substring(0,   //       By using a substring from 0 to 
             t>0?          //        If the current character is below 's' and even unicode:
              c/2-46       //         'b' = 3; 'd' = 4; 'f' = 6; etc.
             :             //        Else:
              12)          //         12 (the entire progress bar)
         +"         |"     //      + spaces after the progress bar
           .substring(     //       By using a substring from
             t>0?          //        If the current character is below 's' and even unicode:
              c/2-49       //         'b' = 0; 'd' = 1; 'f' = 2; etc.
             :             //        Else:
              9)           //         9 (all the spaces)
         +(t>0?            //      If the current character is below 's' and even unicode:
           "leeching"      //       + literal "leeching"
          :                //      Else:
           "seeding ")     //       + literal "seeding "
         +"  |\n"          //      + literal "  |" + new-line
         +b)               //      + `b` ("+----------+----------+----------+\n")
  t=c<115&c%2<1?           //   If the current character is below 's' and even unicode:
     1                     //    `t` = 1
    :                      //   Else:
     0;                    //    `t` = 0
                           //  End of loop
  return r;                //  Return the result-String
}                          // End of method
— केविन क्रूज़सेन
स्रोत
लूप में एक के charबजाय का उपयोग करें int। यह आपको बाद में इसे डालने की अनुमति नहीं देता है। tजीरो और +=बाद में इनिशियलाइज़ किया जा सकता है । यह अभी भी कम होना चाहिए।
— ओलिवियर ग्रेजायर
@ ओलिवियरग्रेयर यह वास्तव में 2 बाइट्स लंबा है। intऔर (char)& t=...;बनाम charऔर {t=1;t*=...;}। जब तक मैं कुछ याद कर रहा हूँ।
— केविन क्रूज़सेन
नहीं, आप कुछ भी याद नहीं कर रहे हैं, यह मेरा विचार था। मैंने आपके कोड के कुछ अन्य हिस्सों को ध्यान में नहीं रखा।
— ओलिवियर ग्राएगोइरे
1

सादा टीएक्स, 306 बाइट्स

\let\a\advance\def\b{+\r{\r-9-+}3\par}\def\s{\r~5|\r\#9\#|seeding\r~3|}\def\r#1#2{{\i0\loop#1\a\i1
\ifnum\i<#2\repeat}}\newcount\i\i`a\newcount\j\j1\tt\loop\b|\char\i.exe\ifodd\i\s\else\ifnum\i<`s\
\the\j0\%~|\r\#\j{\j-\j \a\j10 \r~\j}\a\j1|leeching\r~2|\else\s\fi\fi\endgraf\a\i1 \ifnum\i<`\{\repeat\b\bye

कुछ स्पष्टीकरणों के साथ अधूरा:

\let\a\advance
\def\b{+\r{\r-9-+}3\par}%           The bar between rows: '+' + 3*(9*'-' + '-' + '+') + '\n'
\def\s{\r~5|\r\#9\#|seeding\r~3|}%  The common part for seeding lines, similar to \b
\def\r#1#2{{%                       Macro for repeating #1 #2 times
% Note the local grouping here which is needed for nested \loops and allows us to reuse the global \i
  \i0%
  \loop
    #1%
    \a\i1 %
    \ifnum\i<#2%
   \repeat%
}}%                                 
\newcount\i \i`a%                   Counter for ASCII values of letters, start with 'a'
\newcount\j \j1%                    Counter for percentages; shorter than modulo tricks
\tt
\loop
  \b|\char\i.exe%
  \ifodd\i
    \s%                             Odd lines are seeding lines
  \else
    \ifnum\i<`s\ %                  Even line up to 'r'
      \the\j0\%~|\r\#\j%            Print percentage and progress bar
      {\j-\j \a\j10 \r~\j}%         10-\j spaces after the progress bar
      \a\j1%
      |leeching\r~2|%
    \else
      \s%                           There's no \ifeven, hence the repetition here
    \fi
  \fi
  \endgraf%                         Print '\n'. \par doesn't work here, because \loop isn't a \long macro
  \a\i1
  \ifnum\i<`\{%                     Repeat until \j <= 'z'
\repeat
\b
\bye
— सिराकुसा
स्रोत
1

05AB1E , 120 बाइट्स

AS".exe"«'A17×S9L‚ζJJðK€H©T*т%εD0Q_i'%«ëð3×}}‚ζεðýð«}®'#×T®-úí"leeching  seeding   "Tô®TQè)ζ'|ýε'|.ø}õ.ø'-T∍'+«3×'+ì¶.øý

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

यहाँ बहुत अधिक गोल्फिंग करना है, 90 बाइट्स से नीचे होने पर स्पष्टीकरण पोस्ट करूँगा।

— जादू ऑक्टोपस Urn
स्रोत
1

स्टैक्स , 53 68 64 बाइट्स

â"{≤╞c~£ÿτδ¬│∙}Dgoô₧»öÖ#9▌ó♂i◘ÿkùâGCå`è╙/♠Gδb,φW0EqΔ┘δth½àJZ¿l╦#

इसे चलाएं और डीबग करें

अनपैक्ड और अनगोल्डेड यह इस तरह दिखता है।

'+'-A*+34:mQ
VaF
  '|p
  ".exe "+
  |;i^hA?X 
  $.0%+
  xA<Y*+G
  '#x*G
  `Qz/"D?d=T"`jy@G
  zP
  Q
}A(p'|p

ध्यान दें कि यदि आप विस्तारित समाधान से व्हाट्सएप और टिप्पणियों को हटाने के लिए "गोल्फ" बटन का उपयोग करते हैं, तो यह गलत तरीके से दोगुना हो जाता है }। यदि आप अतिरिक्त चरित्र को हटा देते हैं, तो यह सही तरीके से काम करना जारी रखता है।

— पुनरावर्ती
स्रोत
0

/// , 264 बाइट्स

/~/\/\///!/---~@/!!!-~$/@+@+@~</+
|~>/|
+~(/###~*/  ~}/|leeching*~[/.exe ~;/0% |~{/[**|(((#|seeding* ~]/>$</+$<a{]b[1;# ****}]c{]d[2;##****}]e{]f[3;( ***}]g{]h[4;(#***}]i{]j[5;(## **}]k{]l[6;((**}]m{]n[7;#((* }]o{]p[8;##((*}]q{]r[9;((( }]s{]t{]u{]v{]w{]x{]y{]z{>$+

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

प्रतिस्थापनों के एक समूह को परिभाषित करने और उन्हें उपयोग करने के लिए उनकी तुलना में अधिक वर्णों को बदलने का काम करता है।

— कॉमरेड स्पार्कलपनी
स्रोत
0

गणितज्ञ, 274 बाइट्स

a=Alphabet[];n=StringPadRight;o=ToString;Column@Join[Row/@Table[{g="+----------+----------+----------+\n","|"<>o@a[[i]]<>".exe ",If[EvenQ@i&&i<20,s=o[5i]<>"% ";k="|"<>Table["#",i/2];f="leeching";,k="|##########";f="seeding";s="    "];s,n[k,11]<>"|",n[f,10],"|"},{i,26}],{g}]
— J42161217
स्रोत
0

चारकोल , 154 149 143 130 130 बाइट्स

Ａ⁵δＦβ«Ｆ³«+χ»+⸿Ａ∨﹪δ²›δ⁹⁵θ|ι.exe⎇θ… ⁵⁺⁺ δ% ⁰|⎇θ…#χ⁺…#∕δχ… ⁻χ∕δχ⎇θ|seeding   |⸿↧|leeching  |⸿Ａ⁺⁵δδ»Ｆ³«+χ»+

इसे ऑनलाइन आज़माएं! (क्रिया संस्करण से लिंक करें।)

  • 27 बाइट्स नील की मास्टर चारकोलिंग तकनीकों के लिए धन्यवाद बचाता है।
— चार्ली
स्रोत
आप उपयोग करके बाइट्स की एक पूरी नाव को बचा सकते हैं \\r: इसे ऑनलाइन आज़माएं! । ध्यान दें कि मैंने डमी ऑपरेशन डाला है क्योंकि मुझे कोई विभाजक नहीं मिल रहा है।
— नील
@ वास्तव में, ऐसा लगता है कि आत्मघाती मुद्रण संक्षेप से छोटे होते हैं और पूरे स्ट्रिंग को मुद्रित करते हैं। \rचाल का उल्लेख नहीं करने के लिए , मुझे नहीं पता था कि।
— चार्ली
0

बबलगम , 150 बाइट्स

00000000: e007 3d00 8c5d 0015 8b71 ec14 6414 8031  ..=..]...q..d..1
00000010: 7fc3 2b24 3568 ca81 7ab5 363e c3b7 f500  ..+$5h..z.6>....
00000020: c926 d3f0 55d9 926f 75a8 f8d0 806f 1f12  .&..U..ou....o..
00000030: d71f b824 7e75 a7f2 544f 0364 ee5e 98be  ...$~u..TO.d.^..
00000040: a327 c36c 2ff1 8e6e df94 858e 82d0 d9da  .'.l/..n........
00000050: 77d6 fac6 5548 64aa 7a29 78fa 6886 3c85  w...UHd.z)x.h.<.
00000060: 0494 905e 74de a209 e927 42c8 418d 8250  ...^t....'B.A..P
00000070: ee39 c16b a4c2 9add 0b17 f8b0 9984 9aa8  .9.k............
00000080: defb 2875 31a9 c136 0ec2 6f28 9f8c 9990  ..(u1..6..o(....
00000090: 10d4 0000 0d0a                           ......

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

— LyricLy
स्रोत
0

पर्ल 6, 225 219

my&f={say ("+"~"-"x 10)x 3~"+"};my&g={f;my$b=$^c>9??"   "!!$c*10~"%";say "|$^a.exe $b |{'#'x$c}{' 'x(10-$c)}|$^d  |"};my \s="seeding ";for 1..9 {g chr(95+2*$_),10,s;g chr(96+2*$_),$_,"leeching"};g $_,10,s for "s".."z";f
— bb94
स्रोत
0

लूआ, 380 बाइट्स

s=string.gsub
r=string.rep
function l(i)return".exe "..i.."0% |"..r("#",i)..r(" ",10-i).."|leeching  |\n"end
print((s(s("Z|aY|b"..l(1).."Z|cY|d"..l(2).."Z|eY|f"..l(3).."Z|gY|h"..l(4).."Z|iY|j"..l(5).."Z|kY|l"..l(6).."Z|mY|n"..l(7).."Z|oY|p"..l(8).."Z|qY|r"..l(9).."Z|sY|tY|uY|vY|wY|xY|yY|zY","Y",".exe     |##########|seeding   |\nZ"),"Z","+----------+----------+----------+\n")))

gsubपंक्ति डिवाइडर और बोने की पंक्तियों को बनाने के लिए उपयोग करता है। lजोंक पंक्तियों को उत्पन्न करता है। नामकरण gsubऔर repअधिक बाइट्स बचाता है।

— dragonite44
स्रोत
0

जेस्टेक्स , 126 बाइट्स

►-○EO.♥/(:►+:1►+;+₧D0%4►|22♫♥φézï2♂bdfhjlnpr♀*U!↑)☺:♣<!,♂% |♀:2&₧#=-₧#/')▬►#◙')§► ◙21♫♠~√╫WσΓÇ2◙↓♫♥¿Ç~√₧#/►#:1♫♣~√▐┬╞¿:2◙►|41%

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

व्याख्या

►-          # Push literal -
○           # Push literal 9
E           # Push the second stack value the absolute value of the first stack value times.
O           # Collapse all stack values into a string, then push that string.
.           # Store the first stack value in the d register.
♥           # Push literal 3
/           # Enter an iteration block over the first stack value.
(           # Push the value contained in the d register.
:           # Push the sum of the second and first stack values.
►+          # Push literal +
:           # Push the sum of the second and first stack values.
1           # End an iteration block.
►+          # Push literal +
;           # Push the difference of the second and first stack values.
+           # Store the first stack value in the a register.
₧D          # Push literal abcdefghijklmnopqrstuvwxyz
0           # Enter an iteration block over the first stack value and push the iteration element register at the beginning of each loop.
%           # Push the value contained in the a register.
4           # Print the first stack value, then a newline.
►|          # Push literal |
2           # Print the first stack value.
2           # Print the first stack value.
♫♥φézï      # Push literal .exe 
2           # Print the first stack value.
♂bdfhjlnpr♀ # Push literal bdfhjlnpr
*           # Push the value contained in the iteration element register.
U           # Push a true if the second stack value contains the first stack value, else false.
!           # Push a copy of the first stack value.
↑           # Enter a conditional block if first stack value exactly equals true.
)           # Push the value contained in the iteration index register.
☺           # Push literal 1
:           # Push the sum of the second and first stack values.
♣           # Push literal 5
<           # Push the product of the second and first stack values.
!           # Push a copy of the first stack value.
,           # Store the first stack value in the b register.
♂% |♀       # Push literal % |
:           # Push the sum of the second and first stack values.
2           # Print the first stack value.
&           # Push the value contained in the b register.
₧#          # Push literal 10
=           # Push the quotient of the second and first stack values.
-           # Store the first stack value in the c register.
₧#          # Push literal 10
/           # Enter an iteration block over the first stack value.
'           # Push the value contained in the c register.
)           # Push the value contained in the iteration index register.
▬           # Enter a conditional block if the second stack value is less than the top stack value.
►#          # Push literal #
◙           # End a conditional block.
'           # Push the value contained in the c register.
)           # Push the value contained in the iteration index register.
§           # Enter a conditional block if the second stack value is greater than or equal to the top stack value.
►           # Push literal  
◙           # End a conditional block.
2           # Print the first stack value.
1           # End an iteration block.
♫♠~√╫WσΓÇ   # Push literal |leeching  
2           # Print the first stack value.
◙           # End a conditional block.
↓           # Enter a conditional block if first stack value exactly equals false.
♫♥¿Ç~√      # Push literal     |
₧#          # Push literal 10
/           # Enter an iteration block over the first stack value.
►#          # Push literal #
:           # Push the sum of the second and first stack values.
1           # End an iteration block.
♫♣~√▐┬╞¿    # Push literal |seeding   
:           # Push the sum of the second and first stack values.
2           # Print the first stack value.
◙           # End a conditional block.
►|          # Push literal |
4           # Print the first stack value, then a newline.
1           # End an iteration block.
%           # Push the value contained in the a register.
            # Implied println upon termination.

मुझे यकीन है कि यह काफी कम हो सकता है।

— Quantum64
स्रोत
0

/// , 226 बाइट्स

/;/ "//:/$$$+//,/0% |//*/###//)/   //(/!
|//'/,*//&/.exe //$/+----------//"/ |leeching  |
:
|//!/&) |***#|seeding)|
:/:
|a(b&1,#)) ;c(d&2,##));e(f&3'))"g(h&4'#) ;i(j&5'##);k(l&6'*)"m(n&7'*# ;o(p&8'*##;q(r&9'**"s(t(u(v(w(x(y(z!

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

प्रतिस्थापन को परिभाषित करने के लिए थोड़ा अधिक परिष्कृत दृष्टिकोण। अंतःक्रियात्मक रूप से यहां कोशिश करें!

— कोनोर ओ ब्रायन
स्रोत
0

पास्कल (एफपीसी) , 294 286 266 263 बाइट्स

const m='----------+';Q=#10'+'+m+m+m+#10;S='.exe     |##########|seeding   |'+Q;var i:word;begin write(Q);for i:=1to 9do write('|',chr(95+i*2),S,'|',chr(96+i*2),'.exe ',i,'0% |',StringOfChar('#',i),'|leeching  |':22-i,Q);for i:=115to 122do write('|',chr(i),S)end.

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

तो ... मैं दोनों प्रमुख और अनुगामी newline: D के साथ समाप्त हुआ

— AlexRacer
स्रोत
0

पॉवरशेल , 224 210 181 174 169 160 बाइट्स

$l=("+"+"-"*10)*3+"+
"
0..25|%{"$l|$([char](97+$_)).exe "+("    |$("#"*10)|seeding ",("$(++$c/2)0% |{0,-10}|leeching"-f("#"*($c/2))))[$_%2-and$_-lt18]+"  |"}
$l

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

अब 64 बाइट्स कम भयानक हैं

कुछ नीट ट्रिक्स: परन्स को बचाने के लिए "$ (सामान)" का एक बहुत संयोजन। हम केवल विषम संख्या चाहते हैं, जो $ _% 2 = 1 बनाता है, इसलिए हमें इसके लिए -eq की आवश्यकता नहीं है। अब 5 बाइट्स को बचाने के लिए if-else के बजाय सूची अनुक्रमण का उपयोग करता है। एक अन्य बाइट के लिए `n से भी छुटकारा मिलता है। मैं "$ c`0%" संस्करण और शून्य को अलग करने के लिए नहीं मिल सकता था, इसलिए वर्तमान मार्ग 1 बाइट था जो एक साथ दो तारों को चमकाने से कम था। अब -f प्रारूपण के साथ।

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