অলিম্পিক গেমসের লোগো আঁকুন [বন্ধ]


107

চ্যালেঞ্জ

অলিম্পিক গেমসের লোগো আঁকুন ...

অলিম্পিক গেমস লোগো

... চরিত্র হিসাবে (যেমন ASCII) শিল্প!

নমুনা আউটপুট

      * * *               * * *               * * *
  *           *       *           *       *           *
*               *   *               *   *               *
*               * * *               * * *               *
*           *   *   *   *       *   *   *   *           *
  *       *   *       *   *   *   *       *   *       *
      * * *               * * *               * * *
          *               *   *               *
            *           *       *           *
                * * *               * * *

আপনার শিল্পটি আমার মতো দেখতে ঠিক হবে না, তবে এটি অলিম্পিকের রিংগুলিকে যথাযথভাবে উপস্থাপন করতে হবে যা এটি সনাক্তযোগ্য।

বিধি

  • প্রোগ্রামটি অবশ্যই কনসোলটিতে শিল্পটি লিখতে হবে।
  • সংক্ষিপ্ততম কোড (বাইটগুলিতে, যে কোনও ভাষায়) জয়ী হয়।
  • একটি সমাধান যা তাদের নিজ নিজ রঙগুলিতে রিংগুলি মুদ্রণ করে (বা নিকটবর্তী উপস্থাপনা) একটি বিয়োগ-বিশ-পয়েন্ট বোনাস প্রদান করা হবে।

বিজয়ী ফেব্রুয়ারি 23 নির্বাচন করা হবে য় 2014 শীতকালীন অলিম্পিক শেষে।


বিজয়ী


7
20 বোনাস পয়েন্ট। ওম, আমি কেন আমার স্কোরের জন্য +20 চাই?
জাস্টিন

21
হুম, এটি একটি ট্রেডমার্ক…
মোয়ালা

4
@ মোওলা আমি মনে করি এটি ন্যায্য ব্যবহারের নীতির আওতায় পড়ে।
Nzall

11
রঙিন রঙে, এটি স্পষ্ট যে তারা এন্টারলকিং রিংগুলি কেবল ওভারল্যাপিং নয় । এখনও পর্যন্ত কয়েকটি এন্ট্রি তার জন্য হিসাব করেছে।
রব কেনেডি

6
সম্পূর্ণরূপে IANAL: সোফওয়্যারটি লিখতে যা ঠিক আছে * ও ****** আই আর ** জিএস আঁকেন, এটি কার্যকর করা ঠিক হবে না। :-)
কার্ল উইথফট

উত্তর:


23

এপিএল (82) (-20 = 62)

সম্পাদনা করুন: পরিবর্তনের জন্য, এই প্রোগ্রামটি যথেষ্ট সহজ যে ট্রাইএপিএল এটি স্পর্শ করবে, যাতে আপনি এটি চালাতে পারেন (কেবলমাত্র লাইনটি এতে আটকান)।

আমি 'রঙ' বিটটি দাবি করতে পারি কিনা তা নিশ্চিত নই, যদিও আমি তাদের সকলকে আলাদাভাবে উপস্থাপন করছি।

2/' ▓█░▓▒'[1+(13↑⍉n)⌈¯13↑⍉32↑¯26↑⌈1.1×11↓n←⍉c,0,2×c,0,2×c←(⍳2/10)∊⌈5+5×1 2∘○¨⍳1e4]

এপিএল কনসোলটি রঙ সমর্থন করে না, তাই আমি ছায়াযুক্ত ব্লক অক্ষর ব্যবহার করেছি (স্ট্রিংয়ের শুরুতে অক্ষরগুলি প্রতিস্থাপনের মতো অন্য কোনও এএসসিআইআই আর্ট নির্ধারণ করা সহজ হবে))

এগুলি অখণ্ড চেনাশোনাগুলির মতো হওয়া উচিত (আপনার ফন্টের উপর নির্ভর করে))

      2/' ▓█░▓▒'[1+(13↑⍉n)⌈¯13↑⍉32↑¯26↑⌈1.1×11↓n←⍉c,0,2×c,0,2×c←(⍳2/10)∊⌈5+5×1 2∘○¨⍳1e4]
    ▓▓▓▓▓▓▓▓▓▓▓▓          ████████████          ▓▓▓▓▓▓▓▓▓▓▓▓    
  ▓▓            ▓▓      ██            ██      ▓▓            ▓▓  
▓▓                ▓▓  ██                ██  ▓▓                ▓▓
▓▓            ░░░░░░░░░░░░          ▒▒▒▒▒▒▒▒▒▒▒▒              ▓▓
▓▓          ░░    ▓▓  ██  ░░      ▒▒    ██  ▓▓  ▒▒            ▓▓
▓▓        ░░      ▓▓  ██    ░░  ▒▒      ██  ▓▓    ▒▒          ▓▓
▓▓        ░░      ▓▓  ██    ░░  ▒▒      ██  ▓▓    ▒▒          ▓▓
▓▓        ░░      ▓▓  ██    ░░  ▒▒      ██  ▓▓    ▒▒          ▓▓
  ▓▓      ░░    ▓▓      ██  ░░  ▒▒    ██      ▓▓  ▒▒        ▓▓  
    ▓▓▓▓▓▓░░▓▓▓▓          ██░░██▒▒████          ▓▓▒▒▓▓▓▓▓▓▓▓    
          ░░                ░░  ▒▒                ▒▒            
            ░░            ░░      ▒▒            ▒▒              
              ░░░░░░░░░░░░          ▒▒▒▒▒▒▒▒▒▒▒▒                

বা:

      2/' bByRg'[1+(13↑⍉n)⌈¯13↑⍉32↑¯26↑⌈1.1×11↓n←⍉c,0,2×c,0,2×c←(⍳2/10)∊⌈5+5×1 2∘○¨⍳1e4]
    bbbbbbbbbbbb          BBBBBBBBBBBB          RRRRRRRRRRRR    
  bb            bb      BB            BB      RR            RR  
bb                bb  BB                BB  RR                RR
bb            yyyyyyyyyyyy          gggggggggggg              RR
bb          yy    bb  BB  yy      gg    BB  RR  gg            RR
bb        yy      bb  BB    yy  gg      BB  RR    gg          RR
bb        yy      bb  BB    yy  gg      BB  RR    gg          RR
bb        yy      bb  BB    yy  gg      BB  RR    gg          RR
  bb      yy    bb      BB  yy  gg    BB      RR  gg        RR  
    bbbbbbyybbbb          BByyBBggBBBB          RRggRRRRRRRR    
          yy                yy  gg                gg            
            yy            yy      gg            gg              
              yyyyyyyyyyyy          gggggggggggg                

165

কমোডোর 64 বেসিক

সরাসরি স্ক্রিনে লেখা এবং রঙের মেমরি।

কার্যক্রম

আউটপুট:

আউটপুট


আপনি কীভাবে স্প্রাইটস দিয়ে এটি করেন তা এখানে।


1
সেটা অসাধারণ ছিল. +1 টি। আমরা কি একটি বাইট গণনা পেতে পারি?
আদম মারাস

2
মনে রাখবেন যে আপনি গল্ফ করতে চাইলে আপনি কমান্ড এবং লাইন সংখ্যাগুলিও C64 বেসিকের সংক্ষিপ্ত বিবরণে সংক্ষিপ্ত করতে পারেন।
গ্যাব্রিয়েল ডি'আন্টোনা

15
এই উত্তর সম্পর্কে আমাকে বিরক্ত করার একমাত্র বিষয়: এই আসকি শিল্পটি কেমন?
জাস্টিন


7
@Quincunx: যেহেতু PETSCII এছাড়াও যাও CBM হওয়া ASCII হিসাবে পরিচিত হয়, এই যোগ্যতা অর্জন করতে পারে। আপনি যদি অঙ্কন করার জন্য আলাদা চরিত্রটি ব্যবহার করতে চান (এটি আরও ক্লাসিক এএসসিআইআই আর্টের মতো দেখানোর জন্য), তবে ১০০ লাইনে 160 (উল্টানো স্থান) 42 (অ্যাসিস্ট্রিক) দিয়ে প্রতিস্থাপনের কৌশলটি করা উচিত।
হেইনজি

86

এইচটিএমএল ফিডল - 48 , 35 , 33 টি অক্ষর (ধন্যবাদ @ ডোম এবং @ সিএনএসটি!)

OOO<p style="margin:-15px 6px">OO

আউটপুট:

এখানে চিত্র বর্ণনা লিখুন


2
এর পরিবর্তে আপনি আরও চরগুলি সংরক্ষণ করতে পারেন: OOO<div style="margin:-10px 5px">OOপরিবর্তে ... (আমার মনে হয় এটি অবশ্য একটি ব্লক হওয়া দরকার <div/>)
ডম হেস্টিংস

এটি কনসোল আউটপুট না হওয়ায় ফ্রি-স্টাইল অলিম্পিক্স প্রতিযোগিতায় আপনি আরও ভাল: কোডগল্ফ.স্ট্যাকেক্সেঞ্জারভিউ
কিউ

@ ডোমহাস্টিংস: শুভ কল! উত্তর আপডেট হয়েছে :)
ব্রিগুই 37

3
তাহলে কেন বিরক্ত হ'ল পরিবর্তে divব্যবহার করতে পারবেন p!
cnst

2
@ পাইগামেইনার্ড: এটি আপনার "এএসসিআইআই আর্ট" সংজ্ঞাটির উপর নির্ভর করে: হ্যাঁ যদি আপনার সংজ্ঞাটি "এএসসিআইআই অক্ষরগুলি একটি ছবি গঠনের ব্যবস্থা করা হয়"; না যদি আপনার সংজ্ঞাটি "ছবি গঠনের জন্য নির্দিষ্ট-প্রস্থের পাঠ্য সম্পাদককে ASCII অক্ষর" থাকে। কাজসনকোকেইন যেমন বলেছিল যে এটি কনসোলের আউটপুট কিনা তা যেমন সংজ্ঞাটি হয় "কম্পিউটারের নিয়ন্ত্রণ বা মনিটরিং ইউনিট, এতে কিবোর্ড বা কী, সুইচ ইত্যাদি রয়েছে।" , তারপরে ওয়েব ব্রাউজার আউটপুটটি মনিটরের অংশ এবং এইভাবে কনসোল (যদিও এটি সম্ভবত ওপি লক্ষ্য করে না)।
ব্রিগ্যুই 37

76

রঙে BASH - 271 - 20 = 251 - জড়িয়ে পড়া রিং সহ; পি

o='_4mGA  _0mGA  _1mG\n _4m/A \A _0m/A \\_1mA /A \\\n_4mD_3m---_0mD_2m---_1mD\n _4m\A_3m/_4m/A_0m\\_3m\\A_2m/_0m/A_1m\\_2m\A _1m/\n_4mG_3mD_0m---_2mD_1m---\n_3m   A\A /A _2m\A /_1m\n _3mA G  A_2mG\n';o=${o//D/|A   |};o=${o//A/    };o=${o//G/   ---};printf "${o//_/\\e[3}"

ফলাফল:

এখানে চিত্র বর্ণনা লিখুন


এবং এটি মজাদার জন্য একটি: 61 - 20 = 41।

x='_4mO_3m^_0m0_2m^_1mO\n_3m V _2mV\n';printf "${x//_/\\e[3}"

এখানে চিত্র বর্ণনা লিখুন


LZ77 সংস্করণ:

echo H4sIALOY5VIAA12QwRXAIAhD767ghQV8CnYbXYENOnw1YqX1xk8wQGz1UiJKKRFebLX8ARsIs7g0g/djN7CdRAYC7Pf6h+5RVR3foMdTMcqHWlS3jKr5RKO/g25doJdXZ+ii75CseU2zNkGzH6HYCPKhPGmA2Wh3+7mEDHMgb/2cUPYJH2gPhtZxAQAA|base64 -d|zcat

13
এখনও পর্যন্ত বেশিরভাগ উত্তরই রিংগুলির বিকল্প ওভারল্যাপটি সঠিকভাবে পায় না, সুতরাং স্কোরটি কিছুটা বেশি হলেও এটি একটি উঁচু মূল্য।
পিটার টেলর

1
bash: !/\\e[3}": event not found:(
লেগোস পরিবর্তন করুন

আমি মনে করি আপনার বাশ সংস্করণটি বৈধ - ওপিতে কোথাও এটি গ্রাফিকের আকার নির্দিষ্ট করে না - তবে আপনাকে "ভি" আকারের রিংগুলি ঠিক করতে হবে। রিংগুলির নীচের অংশে একটি টিলড (~) হতে পারে?
অমেলিয়াবিআর

@ অ্যালটারলগোস: আপনি সম্ভবত আপডেটের কাজগুলি খুঁজে পেতে পারেন?
রুনিয়াম

@ অ্যামেলিয়াবিআর: হ্যাঁ, এটি মজাদার জন্য আরও বেশি ছিল এবং এর গুরুত্ব সহকারে বোঝানো হয়নি। বিভিন্ন দিয়ে চেষ্টা করা। সম্ভবত এটি পছন্দ বেশি? x='54mO53m_50m052m_51mO\n53m U 52mU\n';printf "${x//5/\\e[3}"- (আমি এখানে 5 x='54mO53mA50m052mA51mO\n53m U 52mU\n';printf "${x//5/\\e[3}"টির সাথে কিছুটা খারাপ) Or
রানিয়াম

76

জিনএক্স স্পেকট্রাম 48 কে (261 বাইট) সিনক্লেয়ার বেসিক

বেসিক তালিকা:

বেসিক তালিকা

সর্বশেষ ফলাফল:

ফলাফল

প্রোগ্রাম চলমান এবং কোড পরিমাপ:

প্রোগ্রাম চলছে running

পাঠ্য বিন্যাসে বেসিক তালিকা:

5 INK VAL "7": CLS 
10 LET a=VAL "42": LET b=VAL "131": LET c=VAL "40": CIRCLE INK SGN PI;a,b,c: CIRCLE INK PI-PI;a+a+a,b,c: CIRCLE INK VAL "2";VAL "210",b,c
20 LET a=VAL "84": LET b=VAL "87": CIRCLE INK VAL "6";a,b,c: CIRCLE INK VAL "4";a+a,b,c
30 FOR l=PI-PI TO VAL "21": FOR c=PI-PI TO VAL "31": IF ATTR (l,c)<>VAL "63" THEN PRINT INK VAL "8";AT l,c;"*"
40 NEXT c: NEXT l

Emulators বা বাস্তব মেশিন ডিভাইড বা DivMMC ব্যবহার করার জন্য প্রোগ্রামের সাথে টোকা ফাইল, উপযুক্ত: http://www.zxprojects.com/images/stories/draw_the_olympics_flag.tap


17
আমি এসিফিকেশন অংশটি পছন্দ করি :)
অ্যান্ডারসেন

1
এটি খুবই সুন্দর!
pcnThird

জেড 80 স্প্রাইট গ্রাফিকের ব্যবহার কেবল জেনিয়াল !! পিএস রঙের জন্য 20 পয়েন্ট বিয়োগ করুন।
টমাস

এটি নিয়মিত শিল্প উত্পন্ন করতে এবং তারপরে এএসসিআইআই আর্ট তৈরি করতে এতটা নোংরা অনুভব করে। :)
আন্ডারগ্রাউন্ডোমোরিয়েল

আপনি কি একটি অনুলিপি-আকারে উত্স কোড অন্তর্ভুক্ত করতে পারেন?
পাওলো ইবারম্যান

44

সুতরাং আমি আসলে সঠিকভাবে পড়িনি, এটি ASCII- আর্ট, সুতরাং আমার ধারণা এটি অবৈধ। ওহো!


এইচটিএমএল 121 (141 - 20)

<pre style=line-height:3px;letter-spacing:-3px><font color=#06f>O <font color=#000>O <font color=red>O
 <font color=#fa0>O <font color=#193>O

ক্রোমে:

এটা কি!  পিঁপড়ার জন্য একটি অলিম্পিক পতাকা?

পিএইচপি 103 (123 - 20)

<pre style=line-height:3px;letter-spacing:-3px><?=($f='<font color=')."#06f>O ${f}#000>O ${f}red>O
 ${f}#fa0>O ${f}#193>O";

2
আপনি কোনও জরিমানা ছাড়াই রঙগুলি কিছুটা কাছে পেতে পারেন: নীল #06f#fa0#193
:,

2
এটি কনসোল আউটপুট না হওয়ায় ফ্রি-স্টাইল অলিম্পিক্স প্রতিযোগিতায় আপনি আরও ভাল: কোডগলফ.স্ট্যাকেক্সেঞ্জাং.কম
কাজিনকোচেন

39

রুবি: 198 টি অক্ষর - 20 = 178

a=[*0..9].map{[' ']*35}
d=->c,x,y=0{11.times{|i|7.times{|j|a[y+j][x+i]="^[[3#{c}m#^[[0m"if[248,774,1025,1025,1025,774,248][j]&1<<i!=0}}}
d[4,0]
d[0,12]
d[1,24]
d[3,6,3]
d[2,18,3]
$><<a.map{|r|r*''}*$/

(নোটগুলি যে ^[একক অক্ষর।)

নমুনা রান:

অলিম্পিক গেমস লোগো


37

গণিত - 185

c[x_, y_] := 
 Table[Boole[Abs[(i - x)^2 + (j - y)^2 - 16] < 4], {i, 0, 15}, {j, 0, 
   30}]
MatrixForm@
 Replace[Blue c[5, 4] + Black c[5, 14] + Red c[5, 24] + 
   Yellow c[9, 9] + Green c[9, 19], {0 -> "", 
   c_ + _ | c_ :> Style["*", c]}, {2}]

এখানে আউটপুট

এখানে চিত্র বর্ণনা লিখুন

ভেক্টর গ্রাফিক্সের রাস্টারাইজেশনের উপর ভিত্তি করে আর একটি সংস্করণ

MatrixForm@
 Replace[ImageData@
   Rasterize[
    Graphics[{Blue, Circle[{4, 9}, 4], Black, Circle[{14, 9}, 4], Red,
       Circle[{24, 9}, 4], Yellow, Circle[{9, 4}, 4], Green, 
      Circle[{19, 4}, 4]}], ImageSize -> {30, 15}], {c_ :> 
    Style["*", RGBColor@c]}, {2}]

এখানে চিত্র বর্ণনা লিখুন


2
আপনি সবচেয়ে সুন্দর আউটপুট জন্য পয়েন্ট পেতে।
মাইকেল স্টারন

চমৎকার কাজ. আমি আপনার কোডটির নিজস্ব সংস্করণ পোস্ট করেছি।
মিঃ উইজার্ড

34

পোস্টস্ক্রিপ্ট, 203 (-20 = 183)

%!
/Courier findfont 12 scalefont setfont
/l { setrgbcolor translate 20 { 0 30 moveto (*) show 18 rotate } repeat } def
140 200 0 0 1 l 45 -30 1 1 0 l 45 30 0 0 0 l 45 -30 0 1 0 l 45 30 1 0 0 l
showpage

আমি বজায় রেখেছি যে এটি "ASCII আর্ট" হিসাবে গণনা করা হয়েছে, যদিও এটি কনসোলটিতে লিখেনি। আউটপুট:

অলিম্পিক রিং

এটি আরও কিছুটা গল্ফ করা যেতে পারে।


19
এটি যদি ASCII শিল্প হয় তবে এটি অবশ্যই প্রথম আমি ঘোরানো অ্যাসিরিস্টক ব্যবহার করে দেখেছি।
দ্য ব্লাস্টওনে

2
আমি নিশ্চিত এটি শেষ হবে না।
ছদ্মনাম

25

উইন্ডোজ কমান্ড স্ক্রিপ্ট - 112 শতাংশ বাইট

%1%0 @echo. set
%2.= oooo 
%2,=o    o
%1%.%%.%%.%&%1%,%%,%%,%&%1o  %.%%.%  o&%1%.%%.%%.%&%1   %,%%,%&%1   %.%%.%

100% অলিম্পিক রিং

এবং অবশ্যই, বাধ্যতামূলক চিট সংস্করণ - 4 বাইট

%~n0

হিসাবে সংরক্ষণ করা:

@echo. oooo  oooo  oooo&echo.o    oo    oo    o&echo.o   oooo  oooo   o&echo. oooo  oooo  oooo&echo.   o    oo    o&echo.    oooo  oooo.cmd

10
আমাদের বিএটি এবং সিএমডি আরও উত্তর প্রয়োজন :)
আইনাচিও

21

পার্লের আরেকটি প্রচেষ্টা, 130 120

এই সাহায্য করার জন্য manatwork ধন্যবাদ

for(qw(15005 40410 802a0 80a28 41414 15005 808 2a0)){$s=sprintf"%20b",hex;$s=~y/01/ #/;print$s.substr(reverse($s),1).$/}

আউটপুট:

   # # #         # # #         # # #   
 #       #     #       #     #       # 
#         # # #         # # #         #
#       # #   # #     # #   # #       #
 #     # #     # #   # #     # #     # 
   # # #         # # #         # # #   
        #       #     #       #        
          # # #         # # #          

3
আপনি বাঁচাতে পারেন: forপরিবর্তে 4 ব্যবহার করে অক্ষর foreach; 2 টি চরিত্রগুলি (... )বৃত্তাকার sprintf()যুক্তিগুলি সরিয়ে; hexএর প্যারামিটারটি সরিয়ে 2 টি অক্ষর ; y///পরিবর্তে 1 ব্যবহার করে অক্ষর tr///; চূড়ান্ত সরিয়ে 1 টি অক্ষর ;
manatwork

@ মান্যাটওয়ার্ক ধন্যবাদ! আমি এর y///আগে কখনও শুনিনি । এখনই এটি দেখতে হবে।
চটজলদি ossifrage

20

পাইথন: 157 140 138 133 122 107 টি অক্ষর

107

( মানবিক কাজের জন্য ধন্যবাদ )

for o in"jzd360 1zlpwci 3ydgr29 20pzv5u jzd360 149ytc b8n40".split():print bin(int(o,36))[2:].rjust(34,'0')

নমুনা আউটপুট:

0001001000000001001000000001001000
0100000010000100000010000100000010
1000000001001000000001001000000001
0100000110000110000110000110000010
0001001000000001001000000001001000
0000000100000010000100000010000000
0000000001001000000001001000000000

157

print'\n'.join(['{0:b}'.format(o).rjust(39,'0') for o in [45099909288,137984246274,275230249985,276241138945,137984246274,45099909288,1078001920,352343040]])

122

(সবেমাত্র এটি শুরু করা হয়েছে, আমি এটি উন্নত করার চেষ্টা করব)

h=lambda x:bin(int("15bb511iun9aqulod22j8d4 ho8skh  "[x::8],36))[2:].rjust(20)
for x in range(8):print h(x)+h(x)[::-1][1:]

আরও ভাল আউটপুট সহ: 120 টি অক্ষর

for o in"jzd360 1zlpwci 3ydgr29 20pzv5u jzd360 149ytc b8n40".split():print bin(int(o,36))[2:].replace('0',' ').rjust(34)

নমুনা আউটপুট:

   1  1        1  1        1  1   
 1      1    1      1    1      1 
1        1  1        1  1        1
 1     11    11    11    11     1 
   1  1        1  1        1  1   
       1      1    1      1       
         1  1        1  1         

1
বেস 36 সম্পর্কে কী? এই 140 টি অক্ষর আছে: print'\n'.join(['{0:b}'.format(int(o,36)).rjust(39,'0')for o in"kpvbkq0 1re099tu 3ifszg1t 3iwiuayp 1re099tu kpvbkq0 httbls 5trxmo".split()])। "আরও ভাল আউটপুট" সংস্করণ সম্পর্কিত, সেখানে আপনি rjust()দ্বিতীয় প্যারামিটারটি ছাড়তে পারবেন । (এবং এই পোস্টের শিরোনামে একটি "টি"
sertোকান

আমি আরও ভাল সমাধান খুঁজছিলাম, আপনার চেহারা দুর্দান্ত!
evuez

1
সঙ্গে ভাল উন্নতি bin()। তবে আপনি কেন str()এটি ব্যবহার করছেন ? bin()এর রিটার্ন মান ইতিমধ্যে str
manatwork

3
5 তম লাইন হওয়া উচিত নয় 010000010100000101000101000001010000010? নীচের দুটি রিং আমার কাছে কিছুটা ভাঙা দেখায়।
চটজলদি ossifrage

@ মানবতাত্ত্বিক সত্যই, সে সম্পর্কে ভাবেনি!
evuez

17

পার্ল, 177 163

ডোম হেস্টিংসকে একটি উন্নত সংস্করণ ধন্যবাদ:

$s=$"x3;print"  .-~-. "x3 .$/." /$s  \\"x3 .$/."|$s$s "x4 ."
 \\$s ./~\\.$s./~\\.$s /
  '-./'$s'\\-/'$s'\\.-'
"."$s |$s"x3 ."
$s "." \\$s  /"x2 ."
$s"."$s'-.-'"x2;

আউটপুট:

  .-~-.   .-~-.   .-~-. 
 /     \ /     \ /     \
|       |       |       |       
 \    ./~\.   ./~\.    /
  '-./'   '\-/'   '\.-'
    |       |       |   
     \     / \     /
      '-.-'   '-.-'

2
পার্লের জন্য হুর! কয়েকটি অতিরিক্ত সঞ্চয়: "\n"যেমনটি ব্যবহার না করে $rআপনি $/কোনটি ডিফল্ট হিসাবে ব্যবহার করতে পারেন "\n", আক্ষরিক নিউলাইনগুলি আপনাকে কয়েক জায়গায় আরও বেশি সঞ্চয় করতে পারে। এছাড়াও আপনি ব্যবহার 1 এর আরও বেশি গৃহস্থালির কাজ সংরক্ষণ করতে পারবেন $s=$"x3বদলে $s=" "। আশা করি এইটি কাজ করবে!
ডম হেস্টিংস

15

সি, 257 বাইট

#include <stdio.h>
d(i,j){int r=35;float x=r,y=0;while(--r>0){char s[8]={29,(((int)y+j)/32)+32,(((int)y+j)%32)+96,(((int)x+i)/32)+32,(((int)x+i)%32)+64,31,'.',0};puts(s);x-=0.2*y;y+=0.2*x;}}main(){d(140,200);d(185,170);d(230,200);d(275,170);d(320,200);}

এটি আরও কিছুটা গল্ফ করা যেতে পারে।

এটি একটি টেকট্রনিক্স 4010 (বা একটি এমুলেটর যেমন xterm -t) এ চালিত হতে হবে। আউটপুট:

Ooutput

এটি আসলে ASCII শিল্প, যেহেতু সেগুলি সমস্ত 'all' চরিত্র. এবং এটি কনসোল আউটপুট, অনুরোধ হিসাবে। কিছু টেকট্রনিক্স এমুলেটর রঙ সমর্থন করে। আমার হয়নি, তাই আমি এটা করতে পারি না।


12

জাভা, 181 179 161 156 বাইট

enum M{M;{System.out.print(new java.math.BigInteger("2b13bp4vx9rreb1742o0tvtpxntx0mgsfw48c4cf",36).toString(2).replaceAll(".{29}","$0\n"));System.exit(1);}}

(Jdk 1.7 এ সংকলন করা হবে না, 1.6 বা তার চেয়ে কম প্রয়োজন)

আউটপুট:

11100011111110001111111000111
10111110111011111011101111101
01111111000111111100011111110
10111100111001110011100111101
11100011111110001111111000111
11111101111101110111110111111
11111111000111111100011111111

অবশ্যই বিজয়ী নয়, আসুন, এটি জাভা


2
মধ্যে ক্যাপচার না করে 2 অক্ষর স্পেয়ার replaceAll()এর রেগুলার এক্সপ্রেশন এবং ফিরে সমগ্র মিলেছে অংশ নির্বাণ: replaceAll(".{29}","$0\n")। (আপনার ফাইলের শেষে অতিরিক্ত লাইন বিরতি হতে পারে, কারণ আমি পোস্ট
কোডটিতে

1
আরও একটি জিনিস: অপসারণ করুন importএবং প্যাকেজটির নামটি সরাসরি কনস্ট্রাক্টর কলে রেখে দিন। এটি আকার 161 টি অক্ষরে হ্রাস করে।
manatwork

পরিবর্তন করে আরও 5 বাইট রক্ষা class M{static{...করা enum M{M;{...। পরবর্তী বড় পদক্ষেপটি বিগইন্টিজার থেকে মুক্তি পাচ্ছে, এটি কি সম্ভব? আমি স্ট্রিং.ফর্ম্যাট দিয়ে কিছু যাদু করার চেষ্টা করছি তবে এখনও কোনও ফলাফল নেই।
ইউরি শাইলভ

12

হাস্কেল, 200

main=mapM(putStrLn.map(\b->if b then '#' else ' '))$(map.map)(\(x,y)->or$map(\(n,m)->(<2).abs.(18-)$sqrt$(n-x)^2+(m-y*2)^2)$[(20,20),(60,20),(100,20),(40,40),(80,40)])$map(zip[0..120].repeat)[0..30]

আউটপুট:

            #################                       #################                       #################            
         ########### ###########                 ########### ###########                 ########### ###########         
      #######               #######           #######               #######           #######               #######      
     #####                     #####         #####                     #####         #####                     #####     
   #####                         #####     #####                         #####     #####                         #####   
  #####                           #####   #####                           #####   #####                           #####  
 #####                             ##### #####                             ##### #####                             ##### 
 ####                               #### ####                               #### ####                               #### 
 ####                               #### ####                               #### ####                               #### 
 ###                                 ### ###                                 ### ###                                 ### 
 ####                           #################                       #################                           #### 
 ####                        ########### ###########                 ########### ###########                        #### 
 #####                    #######  ##### #####  #######           #######  ##### #####  #######                    ##### 
  #####                  #####    #####   #####    #####         #####    #####   #####    #####                  #####  
   #####               #####     #####     #####     #####     #####     #####     #####     #####               #####   
     #####            #####    #####         #####    #####   #####    #####         #####    #####            #####     
      #######        #####  #######           #######  ##### #####  #######           #######  #####        #######      
         ########### ###########                 ########### ###########                 ########### ###########         
            #################                       #################                       #################            
                     ###                                 ### ###                                 ###                     
                     ####                               #### ####                               ####                     
                     ####                               #### ####                               ####                     
                     #####                             ##### #####                             #####                     
                      #####                           #####   #####                           #####                      
                       #####                         #####     #####                         #####                       
                         #####                     #####         #####                     #####                         
                          #######               #######           #######               #######                          
                             ########### ###########                 ########### ###########                             
                                #################                       #################                                

গল্ফড আউট:

{-# LANGUAGE NoMonomorphismRestriction #-}

olympMids = [(1,1),(3,1),(5,1),(2,2),(4,2)]
circleRadius = 0.9
circleBorder = 0.1
scaleFactor = 20
verticalScale = 0.5

distance :: Floating a => (a,a) -> (a,a) -> a
distance (x,y) (x2,y2) = sqrt $ (x2-x)^2 + (y2-y)^2

match :: (Floating a, Ord a) => (a,a) -> (a,a) -> Bool
match v v2 = (<circleBorder) . abs . (circleRadius-) $ distance v v2

matchOlymp :: (Floating a, Ord a) => (a,a) -> Bool
matchOlymp v = or $ map (match $ scale v) $ olympMids
  where
    scale (x,y) = (x / scaleFactor, y / scaleFactor / verticalScale)

board :: (Enum a, Num a) => a -> a -> [[(a, a)]]
board lx ly = map (zip [0..lx] . repeat) [0..ly]

printOlymp = mapM (putStrLn . map to) $ (map.map) matchOlymp $ board 120 30

main = printOlymp

to :: Bool -> Char
to True = '#'
to False = ' '

2
আমি এখনও হাসি map.mapকারণ এটি মজার শোনায়। : ডি
ভেক্টরওয়েগ

দেখে মনে হচ্ছে এটি একরকম ফুলে গেছে ...
সাম্ব

রিং বা কোড?
ভেক্টোরিওগ

আমি রিংগুলি বলতে চাই :-)
সাম্ব

11

রুবি, ৯

p"\044"*5

#satire

বিধিগুলি এমন শিল্পের জন্য মঞ্জুরি দেয় যা উদাহরণের মতো দেখতে ঠিক লাগে না তবে এটি অবশ্যই "অলিম্পিকের রিংগুলিকে যথাযথভাবে উপস্থাপন করতে পারে যা এটি সনাক্তযোগ্য"

আপনি অলিম্পিক গেমসের লোগোটির এই প্রতিনিধিত্বকে চিনতে পারেন।


মজাদার :) একজন শিকাগোয়ান হিসাবে, আমি আপনাকে বলতে পারি যে মেয়র যখন গেমস সাজানোর সময় দেখেছিলেন ঠিক সেটাই!
ডিন র‌্যাডক্লিফ

ভ্যাঙ্কুওয়ারাইট (২০১০ গেমস) হিসাবে, আমি এটি সম্পর্কিতও করতে পারি। :-)
ড্যারেন স্টোন

8
আমার মনে হচ্ছে আমি এখানে কোনও অভ্যন্তরীণ রসিকতা মিস করছি :
ডুরকনব

2
@ ডুরকনোবফসনো দুঃখিত, আমি যদিও আপনি চরিত্রের কোডগুলি সম্পর্কে বিভ্রান্ত হচ্ছেন। যদি আপনি অলিম্পিক এবং ডলারের লক্ষণগুলির মধ্যে সংযোগ না পান তবে আমি আপনাকে সেখানে সহায়তা করতে পারি না।
অ্যামেলিয়াবিআর

8
আউটপুট হল:
$
রজার

11

জাভাস্ক্রিপ্ট - 170 185 189 চারস

'jzd36071zlpwci73ydgr29720pzv5u7jzd3607149ytc7b8n40'.split(7).map(function(x){a=parseInt(x,36).toString(2);console.log((Array(35-a.length).join(0)+a).replace(/0/g,' '))})

আউটপুট:

   1  1        1  1        1  1    
 1      1    1      1    1      1  
1        1  1        1  1        1 
 1     11    11    11    11     1  
   1  1        1  1        1  1    
       1      1    1      1        
         1  1        1  1         

২ য় জাভাস্ক্রিপ্ট - 25 টি অক্ষর

console.log('O O O\n O O')

আউটপুট:

O O O 
 O O 

দ্বিতীয়টি অলস


1
আপনি বাঁচাতে পারেন; "4" পরিবর্তে "4" বিভাজক হিসাবে এবং 4 সংখ্যা (উদ্ধৃতি ব্যতীত) split()'প্যারামিটার হিসাবে ব্যবহার করে 2 টি অক্ষর ; শেষ 2 ;টি সরিয়ে 2 অক্ষর ।
মানবসমাজ

এ (বর্তমানে) ফায়ারফক্স শুধুমাত্র সংস্করণ উপরে আরও বেশি কমে যাবে, 172 অক্ষর: 'kpvbkq041re099tu43ifszg1t43iwiuayp41sdk52824kpvbkq04httbls45trxmo'.split(4).map(x=>{a=parseInt(x,36).toString(2);console.log(' '.repeat(39-a.length)+a.replace(/0/g,' '))})
manatwork

ধন্যবাদ, আপনার পরামর্শ যুক্ত, আমি আপাতত এটি ব্রাউজারটি স্বাধীন রেখে দেব।
এডুয়ার্ড ফ্লোরিয়েন্সু


@ njzk2 ইয়ুপ, এটি সমাধান করুন סּ_סּ
এডুয়ার্ড ফ্লোরিইনসকু

11

বাইনারি! (265 CHARS)

0001111100000000111110000000011111000
0100000001000010000000100001000000010
1000000001111100000000011111000000001
0100000011000011000001100001100000010
0001111100000000111110000000011111000
0000000010000001000001000000100000000
0000000001111100000000011111000000000

এটি জয়ের পক্ষে অনেক বড়, তবে কমপক্ষে এটি দুর্দান্ত দেখাচ্ছে!


ম্যাট্রিক্সে অলিম্পিক লোগো।
ব্যবহারকারী 13107

@ ব্যবহারকারী 13107 কি?
ডোজার 789

10

পিএইচপি - 99 (-20?)

 bbbb  ####  rrrr
b    b#    #r    r
b   ybyy  g#gg   r
 bbyb  ##g#  rrrr
   y    yg    g
    yyyy  gggg

এটি অবশ্যই স্বীকৃত। আমি বলি যে আমার "রঙ" গণনা; এটি একটি নিবিড় উপস্থাপনা।

যদি আপনি এটি পছন্দ করেন না, তবে এখানে

গল্ফস্ক্রিপ্ট - 101 (-20?)

' bbbb  ####  rrrr
b    b#    #r    r
b   ybyy  g#gg   r
 bbyb  ##g#  rrrr
   y    yg    g
    yyyy  gggg'

16
কোডটি কোথায়?
পূর্বাবস্থায় ফিরে

14
@Undo যে হয় কোড ;-)
Doorknob

সত্য, আমি পিএইচপি জানি না। এটিই কেবলমাত্র পিএইচপি প্রোগ্রাম / স্টাইল আমি লিখতে জানি। (অবশ্যই আমি কোনও টিউটোরিয়াল দিয়েছি, তবে আমি এটি ভুলে গিয়েছি)।
জাস্টিন

2
পিএইচপি একজনের কী বিবিবিবি হিসাবে প্রকাশিত হবে না #####rrrbb # #rrb ybyy g # gg r bbyb ## g #rrr y yg g yyyy gggg স্ক্রিনে?
মিস্টার লিস্টার 22'14

4
আপনাকে যোগ করতে হবে header("Content-Type: text/plain"), ওয়েব সার্ভারের জন্য ডিফল্টটি পাঠ্য / এইচটিএমএল
ক্রোল্টন

10

বাশ + চিত্রম্যাগিক: 163 টি অক্ষর

e=ellipse
c=,10,5,0,360
convert -size 70x20 xc:black +antialias -stroke white -fill none -draw "$e 10,5$c$e 34,5$c$e 58,5$c$e 22,10$c$e 46,10$c" xpm:-|tr -dc ' .
'

নমুনা আউটপুট:

.

     ...........             ...........             ...........
   ....       ....         ....       ....         ....       ....
 ...             ...     ...             ...     ...             ...
..                 ..   ..                 ..   ..                 ..
..                 ..   ..                 ..   ..                 ..
.                ...........             ...........                .
..             ......   ......         ......   ......             ..
..           ...   ..   ..   ...     ...   ..   ..   ...           ..
 ...        ..   ...     ...   ..   ..   ...     ...   ..        ...
   ....     ......         ......   ......         ......     ....
     ...........             ...........             ...........
            ..                 ..   ..                 ..
            ..                 ..   ..                 ..
             ...             ...     ...             ...
               ....       ....         ....       ....
                 ...........             ...........

10

পার্ল 6: 112 77 56 টি অক্ষর, 75 বাইট

say flip .ord.base(2).trans("01"=>" @")for"𜜜𢢢񃣡𦶲𜜜䔐㣠".comb
  • ইউনিকড স্ট্রিং! (উপরের স্ট্রিংটি "\ x1C71C \ x228A2 \ x438E1 \ x26DB2 \ x1C71C \ x4510 \ x38E0")
  • .comb স্ট্রিংয়ে পৃথক অক্ষরের একটি তালিকা দেয় (যেভাবেই যুক্তি ছাড়াই)
  • .ord অক্ষর থেকে অক্ষর কোড নম্বর দেয়
  • .base(2) সেই ইন্টের বেস -২ এনকোডিং সহ একটি স্ট্রিং প্রদান করে
  • .trans আরও ভাল দৃশ্যমানতার জন্য অঙ্কগুলি স্থান এবং @ এর সাথে প্রতিস্থাপন করে
  • flip একটি স্ট্রিংয়ের অক্ষরগুলিকে বিপরীত করে দেয় যাতে শীর্ষস্থানীয় 0 এর অনুপস্থিতি অঙ্কনকে বিশৃঙ্খলা না করে।
  অনুষ্ঠান غونډ
 @ @ @ @ @ @ @
@ @@@ @@@ @
 @ @@ @@ @@ @@ @
  অনুষ্ঠান غونډ
    @ @ @ @
     অনুষ্ঠান

edit2: কিউওট শব্দ এবং বেস -36 এনকোডযুক্ত নতুন সমাধান

say flip :36($_).base(2).trans("01"=>" @")for<2HWC 315U 5XI9 3ESY 2HWC DN4 B8G>
  • <ABC DEF GHI> পার্ল 6-এ একটি উদ্ধৃতি-শব্দের বাক্য গঠন, তাই আপনি স্ট্রিংয়ের একটি তালিকা পান
  • :36($_)একটি বেস-36 এনকোড স্ট্রিং থেকে কোন int সৃষ্টি $_( forলুপ ডিফল্ট পরিবর্তনশীল)

সম্পাদনা করুন: পুরানো দ্রবণটির অঙ্কন ভাল (কপি করা হয়েছে) তবে এটি দীর্ঘ:

  say flip :36($_).base(2).trans("01"=>" o")for<KPVBKQ0 1RE099TU 3IFSZG1T 3IWIUAYP 1SDK5282 KPVBKQ0 HTTBLS 5TRXMO>
   ooooooooo
 oooooo
oooooooo
oooooooooo
 oooooooooo
   ooooooooo
        উহ
          oooooo

10

গণিত 1855 175

10 টি বাইট গণিত দ্বারা সংরক্ষিত।

নীচে রিংগুলি ASCII 'ও'র হয়।

"ও" অক্ষরটি খানিকটা স্বচ্ছ, সেঞ্চুরি গথিকের মধ্যে ফন্টের আকার = 145 প্রিন্টার পয়েন্টে 5 বার মুদ্রিত হয়েছিল।

এটি টার্মিনাল আর্ট নয়। তবে এটি আসকি শিল্পের উইকিপিডিয়া সংজ্ঞাটিকে পুরোপুরি সন্তুষ্ট করে: http://en.wikedia.org/wiki/ASCII_art

Graphics[{Opacity@.8,Style["O",#]~Text~#2&@@@{{Blue,{-1.5,1}},{Black,{0,1}},{Red,{1.5,1}},{Orange,{-.8,.4}},{Darker@Green,{.8,.4}}}},BaseStyle->{145,FontFamily->"Century Gothic"}]

অলিম্পিক রিং


2
এটি কনসোল আউটপুট না হওয়ায় ফ্রি-স্টাইল অলিম্পিক্স প্রতিযোগিতায় আপনি আরও ভাল: কোডগল্ফ.স্ট্যাকেক্সেঞ্জা.কম
কিউ

FontSize -> সরানো যেতে পারে।
গণিত

@ মধু, সত্য আমি কেবলমাত্র আউটপুটটিকে যুক্তিসঙ্গত আকার করতে ফন্টের আকার ব্যবহার করি।
ডেভিডসি

@DavidC আমি বলতে চাচ্ছি আপনি প্রতিস্থাপন করতে পারে FontSize -> 145দ্বারা 145
গণিত

@mathe। হ্যাঁ! ধন্যবাদ।
ডেভিডসি

8

জাভাস্ক্রিপ্ট: 153 অক্ষর

আমি দেখতে চেয়েছিলাম যে আমি বৃত্তগুলি গ্রাফ করতে বীজগণিত ব্যবহার করে আরও দ্রুত এটি করতে পারি কিনা:

s="";c=[3,7,11,7,19,7,7,4,15,4];for(y=10;y>0;y--){s+="\n";for(x=0;x<23;x+=.5){t=1;for(i=0;i<9;i+=2){a=x-c[i];b=y-c[i+1];d=a*a+b*b-9;t&=(d<0?-d:d)>3}s+=t}}

( cদশটি অক্ষর বাঁচাতে চ্যাপ্টাযুক্ত পাঁচটি (x, y) জোড়া, চেনাশোনাগুলির কেন্দ্রগুলির একটি অ্যারে)

আউটপুট:

1110000000111111111000000011111111100000001111
1000111110001111100011111000111110001111100011
0011111111100111001111111110011100111111111001
0011111111100000001111111110000000111111111001
0011111110000111000011111000011100001111111001
1000111100001111100001110000111110000111100011
1110000000111111111000000011111111100000001111
1111111100111111111001110011111111100111111111
1111111110001111100011111000111110001111111111
1111111111100000001111111110000000111111111111

159 অক্ষরটি আরও কিছুটা পাঠযোগ্য:

s="";c=[3,7,11,7,19,7,7,4,15,4];for(y=10;y>0;y--){s+="\n";for(x=0;x<23;x+=.5){t=1;for(i=0;i<9;i+=2){a=x-c[i];b=y-c[i+1];d=a*a+b*b-9;t&=(d<0?-d:d)>3}s+=t?" ":t}}

আউটপুট:

   0000000         0000000         0000000    
 000     000     000     000     000     000  
00         00   00         00   00         00 
00         0000000         0000000         00 
00       0000   0000     0000   0000       00 
 000    0000     0000   0000     0000    000  
   0000000         0000000         0000000    
        00         00   00         00         
         000     000     000     000          
           0000000         0000000            

ইন 167 অক্ষর আমরা "রং" আছে:

s="";c=[3,7,11,7,19,7,7,4,15,4];for(y=10;y>0;y--){s+="\n";for(x=0;x<23;x+=.5){t=1;for(i=0;i<9;i+=2){a=x-c[i];b=y-c[i+1];d=a*a+b*b-9;t&=(d<0?-d:d)>3;h=t?i:h}s+=t?" ":h}}

আউটপুট:

   8888888         0000000         2222222    
 888     888     000     000     222     222  
88         88   00         00   22         22 
88         8844400         0066622         22 
88       4444   0044     6600   2266       22 
 888    4444     0004   6000     2226    222  
   8888888         0000000         2222222    
        44         44   66         66         
         444     444     666     666          
           4444444         6666666            

এবং 189 টি অক্ষরের সাহায্যে আমি ব্যাসার্ধটিকেও rসামঞ্জস্য করতে পারি :

r=5;s="";c=[r,0,2*r+1,r,3*r+2,0,4*r+3,r,5*r+4,0];for(y=-r;y<3*r;y++){s+="\n";for(x=0;x<9*r;x+=.5){t=1;for(i=0;i<9;i+=2){a=x-c[i];b=y-c[i+1];d=a*a+b*b-r*r;t&=(d<0?-d:d)>r;h=t?i:h}s+=t?" ":h}}

http://jsfiddle.net/mblase75/5Q6BX/


7

এপিএল, ৮ টি চর / বাইট *

সর্বনিম্ন চর গণনার জন্য এখানে একটি উত্তর দেওয়া হচ্ছে (এটি সর্বোপরি কোড গল্ফ)

2 5⍴'○ '

আউটপুট:

○ ○ ○
 ○ ○ 

প্রতীকটি হ'ল এপিএল সার্কেল অপারেটর। আপনি যদি কঠোরভাবে ASCII আউটপুট চান তবে আপনি পরিবর্তে একটি 'O' রাখতে পারেন। আমি কেবল এপিএল প্রতীক ব্যবহার করা উপযুক্ত বলে মনে করেছি fit


কেবল কিক্সের জন্য, এখানে রঙিন সংস্করণ রয়েছে (37 টি বর্ণ - 20 = 17 স্কোর)

2 20⍴'m',⍨¯2↓3↓∈(⊂'m○ ^[[3'),⍪'40132 '
                      ‾‾ ← single Esc character, type Ctrl+V Esc on the terminal

আউটপুট: রঙ রিং টার্মিনাল আউটপুট ⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯⎯ *: এপিএল নিজস্ব (লিগ্যাসি) একক বাইট অক্ষরে
লেখা যেতে পারে যা এপিএল প্রতীকগুলিকে উপরের 128 বাইট মানগুলিতে মানচিত্র করে। সুতরাং, স্কোর করার উদ্দেশ্যে, এন চরগুলির একটি প্রোগ্রাম যা কেবলমাত্র এসকিআইআই অক্ষর এবং এপিএল প্রতীক ব্যবহার করে তা এন বাইট দীর্ঘ হিসাবে বিবেচনা করা যেতে পারে।


7

সিএসএস, 1176 922 855 771 বাইট, -20 রঙ বোনাস = 751

html,head,title,body{display:block; color:transparent; font:bold 1em/1 monospace; height:0}
link,meta,style{display:none}
:before,:after{float:left; color:#000; white-space:pre;
content:'   @@@@@@@\A  @@@     @@@\A@@         @@ \A            @@\A@@         @@\A@@         @@\A  @@@     @@@\A    @@@@  @'}
html:before{color:blue}
title:before,title:after{color:blue; position:absolute; left:0; top:3em; content:'@@'}
title:after{color:red; top:7em; content:'                                   @@'}
head:after{color:red}
body:before{clear:left; content:'     '}
body:after,html:after{position:relative; top:-5em; color:#EC0;
content:'    @  @@@@\A   @@@     @@@\A  @@         @@\A  @@         @@\A  @@\A  @@         @@\A   @@@     @@@\A     @@@@@@@'}
html:after{color:#090}

কেবল সিএসএস, কোনও মার্কআপের প্রয়োজন নেই। এখানে মার্কআপবিহীন ঝাঁকুনি দেখুন: http://jsfiddle.net/XcBMV/12/

রিং

রঙে এবং সঠিক ওভারল্যাপ সহ।


6

পার্ল - 12 টি অক্ষর

say"OOO\nOO"

ঠিক আছে, সুতরাং এটি কোনও বিশেষভাবে শৈল্পিক উপস্থাপনা নয়। ;-)

সামান্য কিউটার:

perl -MTerm::ANSIColor=:constants -E'say ON_BRIGHT_WHITE,BLUE,O,BLACK,O,RED,O,$/,YELLOW,O,GREEN,O,RESET'

6

জিএএস বিধানসভা 16-বিট বিআইওএস ওএল লোডার - 617 - 20 = 597

এখানে দৈর্ঘ্যে পাগল হয়ে যাওয়া, তাই কেবল এটির মজাদার জন্য।


এটি খুব বেশি লোড করে না, তবে এটি অলিম্পিক গেমসের লোগোটিকে রঙ সহ এএসসিআইআই হিসাবে লোড করে;)

কোড:

.code16;S:jmp o;nop;o:mov $1984,%ax;mov %ax,%ds;mov %ax,%es;movw $t,%si;r:lodsb;or %al,%al;jz q;cmp $33,%al;jg k;movb $0,c;call X;inc %dh;mov $0,%dl;call G;jmp r;k:sub $48,%al;mov %al,%cl;add %al,c;lodsb;cmp $32,%al;je v;mov %al,%bl;and $15,%bl;mov $35,%al;v:mov $9,%ah;mov $0,%bh;mov $0,%ch;int $16;call X;mov c,%dl;call G;jmp r;q:ret;G:mov $2,%ah;int $16;X:mov $3,%ah;mov $0,%bh;int $16;ret;c:.byte 0;t:.asciz "3 5A9 5H9 5D!1 1A7 1A5 1H7 1H5 1D7 1D!1A9 1A4N9 1H4B9 1D!1A7 1N1 1A3 1H1 1N5 1B1 1H3 1D1 1B7 1D!1 1A5 1N1 1A5 1H1 1N3 1B1 1H5 1D1 1B5 1D!3 4A1N9 4H1B9 5D!8 1N7 1N5 1B7 1B!9 1 5N9 5B!";.=S+510;.word 0xaa55

(লিনাক্স) এমবিআর চিত্রটি তৈরি এবং নিষ্কাশন করুন

as -o olymp.o olymp.S
objcopy -O binary olymp.o olymp.img

এমুলেটরে চলছে

(এটি এখনও আমার হোম কম্পিউটারে পরীক্ষা করে দেখেনি ...)

qemu-system-i386 olymp.img

ফলাফল

এখানে চিত্র বর্ণনা লিখুন


4
আপনি অবশ্যই বাহ্যিক সংস্থানকে চরমভাবে ব্যবহার না করার ধারণাটি গ্রহণ করেন, তাই না? +1
অ্যাডাম মারাস

@ অ্যাডামারস: হ্যাঁ, এবং এটি আছে;), চেষ্টা করে দেখতে হয়েছিল। এরপরে হ'ল ওএসের আসল বোঝা অন্তর্ভুক্ত করা। O`Loader II।
রানিয়াম

আপনি যদি বাইনারি পরিমাপ করেন তবে এটি কীভাবে স্কোর করে তা ধরে নিবেন যে ডিস্কটিতে ইতিমধ্যে একটি বুট সেক্টর রয়েছে যাতে আপনি 55h এএএচ শেষে (কোনও সম্পর্কিত প্যাডিং সহ) বাদ দিতে পারেন?
স্যামবি

@ সাম্ব: এটি হবে ২5৫ বাইট, ২৫৫ পিটি যেখানে কোড অংশটি প্রায় ৯১ বাইট এবং ভেরিয়েবল + প্লটের ডেটা 184 বাইট।
রানিয়াম

5

টিআই-বেসিক (16 বাইট)

দ্রষ্টব্য: টিআই-বেসিক টোকেনাইজড। যদি আমি সঠিকভাবে মনে করি, ClrHomeএবং Dispএক-বাইট টোকেন হয়।

ClrHome
Disp "O O O"," O O

4
#include<iostream.h>
#include<conio.h>
#define tc textcolor

void circle(int x,int y,int k)
{
  tc(k);
  int n;
  for(n=0;n<=6;n++)
  {

    if(n==0||n==6)
    {
      gotoxy(x+3,y+n);
      cprintf("* * *");
    }
    else if(n==1||n==5)
    {
      gotoxy(x+1,y+n);
      cprintf("*");
      gotoxy(x+9,y+n);
      cprintf("*");
    }
    else if(n>1&&n<5)
    {
      gotoxy(x,y+n);
      cprintf("*");
      gotoxy(x+10,y+n);
      cprintf("*");
    }
  }
}

void main()
{
  clrscr();
  circle(1,1,BLUE);
  circle(14,1,WHITE);
  circle(27,1,RED);
  circle(8,4,YELLOW);
  circle(21,4,GREEN);
  _setcursortype(0);
  getch();
}

টার্বো সি ++ 3.0 সংকলকটিতে তৈরি।  চেষ্টা করা কোডটি যতটা সম্ভব সংক্ষিপ্ত করে দেওয়ার চেষ্টা করুন


7
1) দয়া করে কোড ব্লক চিহ্নিত করতে মার্কডাউন ব্যবহার করুন এবং পোস্ট কোডটি পাঠযোগ্য able 2) এটি একটি কোড-গল্ফ চ্যালেঞ্জ হিসাবে, আপনার কোডটির আকারটি কঠোরভাবে প্রয়োজনীয় করার চেষ্টা করুন। 3) দয়া করে আপনার উত্তরে একটি শিরোনাম লাইন যুক্ত করুন ( ব্যবহৃত পছন্দ, কোডের দৈর্ঘ্য এবং উপার্জিত স্কোর উল্লেখ করে আপনার পছন্দ অনুযায়ী কিছু মার্কআপ দিয়ে জোর দেওয়া হয়েছে (সাধারণত শিরোনাম 1 বা গা bold় ))।
manatwork
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.