একটি সাইনোসয়েডাল তরঙ্গ মুদ্রণ করুন (উল্লম্বভাবে)

42

টার্মিনালে উল্লম্বভাবে একটি ক্রমাগত সাইনোসাইডাল তরঙ্গ প্রিন্ট করুন। প্রোগ্রামটি শেষ হওয়া উচিত নয় এবং ধারাবাহিকভাবে তরঙ্গকে নীচে স্ক্রোল করা উচিত (এটি কোনওভাবে বাধা না দেওয়া ব্যতীত)। আপনি ধরে নিতে পারেন যে ওভারফ্লো কোনও সমস্যা নয় (যেমন আপনি ইনক্রিমেন্টিং কাউন্টারগুলি বা অসীম পুনরাবৃত্তি সহ অসীম লুপগুলি ব্যবহার করতে পারেন)।

তরঙ্গ নিম্নলিখিত বৈশিষ্ট্যগুলি সন্তুষ্ট করা উচিত:

  • প্রশস্ততা = 20 টি অক্ষর (শীর্ষ প্রশস্ততা)
  • সময়কাল = 60 থেকে 65 লাইন (অন্তর্ভুক্ত)
  • আউটপুটে কেবল ফাঁকা স্থান, নিউলাইন এবং |
  • আউটপুট প্রতিটি লাইন পরে, 50ms বিরতি

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

                    |
                      |
                        |
                          |
                            |
                              |
                                |
                                 |
                                   |
                                    |
                                     |
                                      |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                   |
                                  |
                                |
                               |
                             |
                           |
                         |
                       |
                     |
                   |
                 |
               |
             |
            |
          |
        |
       |
     |
    |
   |
  |
 |
 |
 |
 |
 |
 |
 |
  |
   |
    |
     |
      |
        |
         |
           |
             |
               |
                 |
                   |
                     |
                       |
                         |
                           |
                             |
                              |
                                |
                                  |
                                   |
                                    |
                                      |
                                      |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                    |
                                   |
                                  |
                                |
                               |
                             |
                           |
                         |
                       |
                     |
                   |
                 |
               |
             |
           |
          |
        |
       |
     |
    |
   |
  |
 |
 |
 |
 |
 |
 |
 |
  |
   |
    |
     |
       |
        |
          |
            |
             |
               |
                 |
                   |

উপরের আউটপুটটি চিরতরে চলতে হবে যতক্ষণ না অন্যথায় বাধা দেওয়া হয়, যেমন: সাইন ইন বা সিগ্কিল, অথবা টার্মিনাল উইন্ডো বন্ধ করে দেওয়া, বা আপনি নিজের মেশিনটি বন্ধ করে দেন, বা সূর্য পৃথিবী গ্রাস করে ইত্যাদি ইত্যাদি

সংক্ষিপ্ততম কোড জিতেছে।

বিঃদ্রঃ. আমি ডিসপ্লে স্ক্রোলিং ওয়েভগুলিতে একই ধরণের সমস্যা সম্পর্কে সচেতন কিন্তু এটি ঠিক একই নয়। আমার সমস্যা হিসাবে, তরঙ্গটি "জায়গায়" স্ক্রোল করা উচিত নয় - কেবল এটি টার্মিনালে আউটপুট করে। এছাড়াও, এটি একটি আসিটি-আর্ট সমস্যা, সুতরাং এটির পরিকল্পনা করার জন্য ম্যাথেমেটিকাকে ব্যবহার করবেন না।

code-golf  ascii-art  kolmogorov-complexity 
— ace_HongKongIndependence
সূত্র
1
পিক প্রশস্ততা, শীর্ষ থেকে শিখরের প্রশস্ততা বা মূল-বর্গ প্রশস্ততা?
— ডেভিডসি
পিক প্রশস্ততা।
— #_HongKongI depend depend
1
জাস্ট | গুলি এবং কোনও ফাঁকা জায়গা দিয়ে কোনও তরঙ্গ আঁকতে ঠিক আছে?
— জেলাতিন
1
সমস্ত উত্তর এখনও অবৈধ। তারা কেবল স্বাক্ষরের জন্য নয় সিগিলের জন্যও থামে।
— সর্বাধিক Ried 9
1
@ ম্যাক্স নিখুঁতভাবে নিহত, আমি এটিকে "চিরতরে চলতে হবে" অন্যথায় বাধা না দিলে পরিবর্তন করব।
— #HongKongInd dependence

উত্তর:

12

এপিএল (35)

(হ্যাঁ, এটি 35 বাইটে ফিট করে, এখানে 1 বাইট এপিএল এনকোডিং রয়েছে )

{∇⍵+⌈⎕DL.05⊣⎕←'|'↑⍨-21+⌈20×1○⍵×.1}1

ব্যাখ্যা:

  • {... }1: শুরুতে 1 দিয়ে ফাংশনটি কল করুন
  • 1○⍵×.1: সরকারী কাজের জন্য যথেষ্ট বন্ধ sin(⍵×π÷30)। ( 1○হয় sin)
  • -21+⌈20: পরিসীমাটিকে স্বাভাবিক করুন 1..40এবং অস্বীকার করুন
  • '|'↑⍨: Nস্ট্রিং থেকে শেষ অক্ষরগুলি গ্রহণ করুন '|'(যার |শেষে ফাঁকা ফাঁকা স্থান রয়েছে results
  • ⎕←: প্রদর্শন
  • ⌈⎕DL.05: 50 এমএস অপেক্ষা করুন এবং ফিরে আসুন 1। ( ⎕DLআয় সময় এটা আসলে ঢুকে, যা পাসে হতে যাচ্ছে পরিমাণ 0.05, যে মান আপ rounding দেয় 1)।
  • ∇⍵+: সেই নম্বরটি যোগ করুন ( 1) ⍵এবং আবার ফাংশনটি চালান।
— সামুদ্রিক
সূত্র
2
ডার্ন ... আমি ভেবেছিলাম ট্রিগনোমেট্রিক ফাংশন এবং সময় বিলম্ব আপনাকে ছেলেরা
— ছাড়িয়ে
2
এখানে একটি 33 চর এক:{⎕←'|'↑⍨-⌈20×1+1○⍵⋄∇.1+⍵⊣⎕DL.05}0
— টোবিয়া
3
@ LOL। আপনার এপিএলটি পরীক্ষা করা উচিত, এটি কোনও অভিনব ভাষা নয়। এটি অনেক পুরানো এবং কয়েক দশক ধরে বৃহত সিস্টেমে ব্যবহৃত হচ্ছে। এটি অন্য যে কোনও কিছুর সাথে তুলনায় বেশ অনন্য। আইএমএইচও প্রতীকগুলি এটিকে আরও পঠনযোগ্য করে তোলে যে এএসসিআইআই-কেবলমাত্র ডেরিভেটিভস (জে)
— টোবিয়া
22

সি, 74 73 70 69 67 টি অক্ষর

@Ugoren এবং অন্যদের কাছ থেকে অনেকগুলি ভাল ধারণা সহ 67 টি চরিত্রের সমাধান:

i;main(j){main(poll(printf("%*c|\n",j=21+sin(i++*.1)*20,0),0,50));}

পুনরাবৃত্তির পরিবর্তে লুপের সাথে 69 চরিত্রের সমাধান:

i;main(j){while(printf("%*c|\n",j=21+sin(i++*.1)*20,0))poll(0,0,50);}

পার্ল অঞ্চলে পৌঁছন। :)

— treamur
সূত্র
1
এটি @ এসের নিজস্ব সি উত্তর দ্বারা অনুপ্রাণিত হয়েছিল।
— treamur
2
আমি মনে করি আপনি 5E4পরিবর্তে ব্যবহার করতে পারে 50000।
— মুশিফিল
2
আমি মনে করি আপনি / 10 এর পরিবর্তে * .1 ব্যবহার করতে পারেন।
— মোয়ালা
1
@ মুসিফিল, আমি 5E4 ব্যবহার করার বিষয়েও ভেবেছিলাম, তবে এটি কার্যকর হয় না: সংকলক usleep()প্রোটোটাইপ না দেখিয়ে আপনাকে পরিষ্কারভাবে 5E4 নিক্ষেপ করতে হবে।
— treamur
2
আপনি ভালো printf, মধ্যে ঞ থেকে নিয়োগ চলন্ত দ্বারা আরো দুটি অক্ষর কেটে যাবে: printf("%*s\n",j=21+sin(i++*.1)*20,"|")। ফলাফলের ধরণটি এখনও অবধি তাই এটি একটি বৈধ ক্ষেত্র প্রস্থের আর্গুমেন্ট।
— আর্ট
12

গণিত 121 104 80 67 64

n=1;While[0<1,Spacer[70 Sin[n Pi/32]+70]~Print~"|";Pause@.05; n++]

জ্যা

— DavidC
সূত্র
প্রশ্ন বলছে যে এটি গণিত করার জন্য ম্যাথমেটিকাকে ব্যবহার করবেন না। এটি কি একরকমের চেয়ে আলাদা?
— মালাচি
13
@ মালাচি হ্যাঁ এটি অন্যান্য উত্তরগুলির মতোই এটি গণনা করতে গণিত ব্যবহার করে। গণিতকে প্লট করতে ব্যবহার করা গণিতকে প্লট করতে x=20*sin(pi*y/30)+20বা অনুরূপ কিছু বলছে ।
— জাস্টিন
ঠিক আছে আমি যা পেয়েছি তা পেয়েছি স্পষ্টকরণের জন্য আপনাকে ধন্যবাদ
— মালাচি
1
এবং এখানে একটি 58 ​​চর সংস্করণ রয়েছেDo[Spacer[70*Sin[n*Pi/32]+70]~Print~"|";Pause@.05,{n,18!}]
— আজাসজা
1
তোমার দর্শন লগ করা নয় ম্যাথামেটিকাল ব্যবহারকারী, কিন্তু আমি মনে করি আপনি পরিবর্তন করতে পারেন 1 == 1থেকে 0 < 11 গৃহস্থালির কাজ হ্রাস।
— সিসিপি
11

পার্ল, 48 (68)

জিএনইউ স্লিপ সংস্করণ: 48

print$"x(25+20*sin).'|
';$_+=.1;`sleep .05`;do$0

ক্রস প্ল্যাটফর্ম: 68

use Time::HiRes"sleep";print$"x(25+20*sin).'|
';$_+=.1;sleep.05;do$0

শেল স্লিপ ফাংশন ব্যবহার করে সময় :: হাইআরএস মডিউলটির ব্যবহার সরানো হয়েছে। রুবির উদাহরণ অনুসারে সংক্ষিপ্ত পরিমাণ বৃদ্ধি। Mo "এবং $ 0 ব্যবহার করে প্রিমোর কাজকর্মের ইঙ্গিতগুলি দেখে সংক্ষিপ্ত বিবরণ প্রিমো ধন্যবাদ mo

— KevinColyer
সূত্র
আমি এটি ফাইল হিসাবে সংরক্ষণ করে test.plদৌড়েছি perl ./test.pl, তবে অপেক্ষার সময়টি নির্দিষ্টকরণের সাথে মেলে না। এছাড়াও, তরঙ্গের প্রশস্ততা খুব ছোট। (এই প্রশস্ততা শিখর এবং সুস্থিতি অবস্থান মধ্যে দৈর্ঘ্য বোঝায়।)
— ace_HongKongIndependence
আমি অনুমান করি যদি আমি ইনক্রিমেন্টটি .105 থেকে .1 এ পরিবর্তন করি তবে আমি রুবিকে 56 টি পিঠে মারব!
— কেভিনকলিয়ার 16'14
@ প্রিমো - আমার শেল স্লিপ 1 সেকেন্ডের চেয়েও কম সময়ের তুলনায়
— কমবে
man sleep→ unsigned int sleep(unsigned int seconds);। এটি ত্রুটি করবে না, তবে প্রকৃত ঘুমের ব্যবধানটি শূন্য। পরিবর্তন: কিছু প্রস্তাবনা পুলিশের খাটো করতে $dকরতে $_, এবং তারপর ব্যবহার (25+20*sin), এবং পরিবর্তন \nএকটি আক্ষরিক সম্পর্কে newline জন্য।
— প্রিমো
2
@primo man 1 sleepএকটি জিএনইউ / লিনাক্স ব্যাশ শেল উপর আমাদের বলেUnlike most implementations that require NUMBER be an integer, here NUMBER may be an arbitrary floating point number.
— ace_HongKongIndependence
11

পার্ল - 64 (বা 60) বাইট

নিম্নলিখিতটিতে একটি উইন্ডোজ-নির্দিষ্ট শেল কমান্ড ব্যবহার করা হয়েছে:

`sleep/m50`,print$"x(20.5-$_*(32-abs)/12.8),'|
'for-32..31;do$0

নিম্নলিখিতটিতে একটি জিএনইউ / লিনাক্স-নির্দিষ্ট শেল কমান্ড ব্যবহার করা হয়েছে:

`sleep .05`,print$"x(20.5-$_*(32-abs)/12.8),'|
'for-32..31;do$0

উভয় 64 বাইট এ।

  • পিরিয়ড 64 হয়।
  • সর্বাধিক প্রশস্ততা হ'ল হ'ল 20।
  • বক্ররেখা নিখুঁতভাবে প্রতিসম হয়।
  • প্রতিটি সময়কাল অভিন্ন।
                    |
                      |
                         |
                           |
                             |
                               |
                                |
                                  |
                                   |
                                    |
                                     |
                                      |
                                       |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                   |
                                  |
                                |
                               |
                             |
                           |
                         |
                      |
                    |
                  |
               |
             |
           |
         |
        |
      |
     |
    |
   |
  |
 |
 |
|
|
|
|
|
 |
 |
  |
   |
    |
     |
      |
        |
         |
           |
             |
               |
                  |
                    |
                      |
                         |
                           |
                             |
                               |
                                |
                                  |
                                   |
                                    |
                                     |
                                      |
                                       |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                   |
                                  |
                                |
                               |
                             |
                           |
                         |
                      |
                    |
                  |
               |
             |
           |
         |
        |
      |
     |
    |
   |
  |
 |
 |
|
|
|
|
|
 |
 |
  |
   |
    |
     |
      |
        |
         |
           |
             |
               |
                  |
                    |

মনে রাখবেন যে এটি হুবহু সাইনোসয়েডাল তরঙ্গ নয়, বরং চতুর্ভুজীয় দ্বিখণ্ডিত। একটি সত্য পাপের বিরুদ্ধে চক্রান্ত করা:

প্রয়োজনীয় গ্রানুলারিটিতে এগুলি দৃশ্যত পৃথক isting

যদি নান্দনিকতা এতটা গুরুত্বপূর্ণ না হয় তবে আমি 60 বাইট বিকল্প প্রস্তাব করি , পিরিয়ড দৈর্ঘ্য 62, সর্বোচ্চ 20-22 ডলার প্রশস্ততা এবং সামান্য অসম্পূর্ণতা সহ:

`sleep/m50`,print$"x(20-$_*(31-abs)/12),'|
'for-31..30;do$0
— Primo
সূত্র
এটি কোনও সাইনোসাইডাল ওয়েভ নয়; এটি কেবল প্যারোব্লাস (যদি আমি আপনার কোডটি সঠিকভাবে পড়ি)। (আপনি যদি কিছু সাইনোসয়েডাল তরঙ্গ দিয়ে এটি উপস্থাপন করতে পারেন তবে আমি ফাংশনটি দেখতে পছন্দ করব)।
— জাস্টিন
সাইন একটি সূত্র, আপনি যদি সূত্রটি প্রতিলিপি করেন তবে এটি এখনও সিনুসয়েডাল তরঙ্গ। এবং এটি সম্ভবত কিছু ফ্যাশনে সাইন এর বৈকল্পিক।
— মালাচি
8

রুবি 56

i=0
loop{puts" "*(20*Math.sin(i+=0.1)+20)+?|;sleep 0.05}
— daniero
সূত্র
P দিয়ে প্রতিস্থাপনের অনুমতি রয়েছে?
— স্লাইডডপ্যান
1
@ স্লাইড্পডান আমি মনে করি আমি করব না, যেহেতু এটি কিছু আঁকতে চ্যালেঞ্জ। pপ্রতিটি লাইনের চারপাশে ডাবল উক্তি যুক্ত হবে এবং "অঙ্কন" পরিবর্তন করবে।
— দানিরো
7

বেফুঞ্জ 98 - 103 100

:1g:02p' \k:02gk,'|,a,$ff*:*8*kz1+:'<\`*
468:<=?ABDEFGGGHGGGFEDBA?=<:86420.,+)'&$#"!!! !!!"#$&')+,.02

এমন একটি প্রোগ্রামের চিয়ার্স যা এটি করে, ত্রিকোনোমিত্রিক ক্ষমতা ছাড়াই ভাষায়; আসলে প্রথম প্রোগ্রাম। দ্বিতীয় লাইনটি কেবল ডেটা; পাপের ascii মানের সাথে সম্পর্কিত চরিত্রটি একটি স্থানের অক্ষরে যুক্ত হয়েছে।

সম্পাদনা করুন: আমি স্থানটি বিয়োগ না করে 3 টি অক্ষর সংরক্ষণ করেছি; sinusoid ডান 32 টি ইউনিট অনুবাদ করা হয় (যা কার্যকর)।

বেফুঞ্জেরও স্লিপ কমান্ড বা অনুরূপ কিছু নেই। এটা একটা ফিঙ্গারপ্রিন্ট এটি চমৎকার হবে, কিন্তু আমি একটিও খুঁজে পাইনি, তাই ff*:*8*push কর্মের 8*225**2( 405000) এবং kzএকটি noop রান যে অনেক বার (ভাল, যে অনেক বার +1)। পাইফুঞ্জের সাথে উইন্ডোজ কমান্ড লাইনে এটি প্রায় 50 মিলিসেকেন্ডে পরিণত হয়, তাই আমি বলি আমি ভাল। দ্রষ্টব্য: যদি কেউ এর জন্য ভাল আঙুলের ছাপ জানেন তবে দয়া করে আমাকে জানান।

কোডের শেষ অংশটি সহজেই পরীক্ষা করে থাকে যে কাউন্টারটি (ডেটা লাইনের জন্য) ডাটা অতীত হয়েছে, যদি হয় তবে, কাউন্টারটি 0 এ পুনরায় সেট করা হয়।

আমি ব্যবহৃত এই তথ্য তৈরি করতে।

টেলর সিরিজ

যদিও এই সংস্করণটি 105 টি অক্ষর, আমি কেবল এটি অন্তর্ভুক্ত করতে হয়েছিল:

:::f`!4*jf2*-:::*:*9*\:*aa*:*:01p*-01g9*/a2*+\$\f`!4*j01-*b2*+:01p' \k:01gk,$'|,a,ff*:*8*kz1+:f3*`!3*j$e-

আমি আমার প্রোগ্রামটি ছোট করার চেষ্টা করছিলাম, এবং কোসাইনের জন্য টেলর সিরিজটি দেখার সিদ্ধান্ত নিয়েছিলাম (সাইন গণনা করা শক্ত)) আমি এখানে অনুরোধ করা সময়কালের সাথে মিলিত xহতে পরিবর্তন করেছি pi * x / 30, তারপরে 20প্রশস্ততার সাথে মিলিয়ে বহুগুণ । আমি কিছু সরলীকরণ তৈরি করেছি (বাতিল করে দেওয়ার জন্য সমন্বয়যুক্ত কারণগুলি, ফাংশনের মান খুব বেশি পরিবর্তন না করে)। তারপরে আমি এটি বাস্তবায়ন করেছি। দুঃখের বিষয়, এটি একটি সংক্ষিপ্ত বাস্তবায়ন নয়।

:f`!4*jf2*-

টেলর সিরিজের মানগুলি (সম্পর্কে x = 15) সঠিক হয়ে যাচ্ছে কিনা তা পরীক্ষা করে । যদি সেগুলি হয় তবে আমি x - 30তার পরিবর্তে টেলর সিরিজটি গণনা করি x।

:::*:*9*\:*aa*:*:01p*-01g9*/a2*+

টেলর সিরিজের আমার বাস্তবায়ন x = 0, যখন xস্ট্যাকের মান হয় on

\$\f`!4*j01-*

টেলর সিরিজের মান সমন্বয় প্রয়োজন হলে টেলর সিরিজের মান উপেক্ষা করে ates

b2*+

কোসাইন ওয়েভকে ইতিবাচক করুন; অন্যথায়, মুদ্রণ কাজ করবে না।

:01p' \k:01gk,$'|,a,

তরঙ্গ মুদ্রণ

ff*:*8*kz1+

অস্থায়ীভাবে 50 মিলিসেকেন্ডের জন্য অপেক্ষা করুন, তারপরে ইনক্রিমেন্ট x

:f3*`!3*j$e-

যদি x45 এর বেশি হয় তবে এটিকে -14-এ পরিবর্তন করুন (আবার, টেলর সিরিজের ত্রুটি সমন্বয়)।

— জাস্টিন
সূত্র
এটি ঠিক সেই ধরণের উত্তরের জন্য আমি প্রত্যাশায় রয়েছি, আশা করি আপনি এটি গল্ফ করতে পারেন :)
— এসহোংকং নির্ভরতা
1
সেখানে! আমি সাফল্যের সাথে -5 অক্ষর দ্বারা কোডের দৈর্ঘ্য হ্রাস পেয়েছি! এবং এখনও উন্নতির জন্য জায়গা আছে!
— জাস্টিন
@ কুইনকঙ্কস আমার পার্ল দ্রবণটি ট্রিগ ফাংশনগুলিতে কোনও বিল্ট ব্যবহার করে না;)
— প্রিমো
6

পাইথন, 108,93,90,89, 88

import math,time
a=0
while 1:print" "*int(20+20*math.sin(a))+"|";time.sleep(.05);a+=.1

এখন অসীম স্ক্রোলিং সহ :)

সম্পাদনা: ঠিক আছে, 90. যথেষ্ট?

সম্পাদনা: সম্পাদনা: না, 89।

সম্পাদনা: সম্পাদনা: সম্পাদনা: বুথবাইকে 88 ধন্যবাদ ।

— গ্যাব্রিয়েল ডি'আন্টোনা
সূত্র
দুঃখিত যদি আমি প্রশ্নটি পরিষ্কার না করে থাকি - আপনার প্রোগ্রামটি শেষ হওয়া উচিত নয় এবং ধারাবাহিকভাবে তরঙ্গকে সাইন স্ক্রোল করা উচিত (সাইন ইন করা ব্যতীত)
— #HongKongInd dependence
1
a=0.-> a=0আপনাকে 88
— বুথবি
5

পিএইচপি, 59 টি অক্ষর

<?for(;;usleep(5e4))echo str_pad('',22+20*sin($a+=.1)).~ƒõ;
— অ্যালেক্স ব্যারেট
সূত্র
1
আপনি নিজের echo ...;জায়গায় কিছু বাইট ব্যবহার করে সংরক্ষণ করতে পারেন fwrite(STDOUT,...);।
— প্রিমো
যেভাবেই কমান্ড লাইন থেকে কল করার সময় এটি বোঝা যায়। 10 টি অক্ষর সংরক্ষণ করা হয়েছে - ধন্যবাদ প্রিমো।
— অ্যালেক্স ব্যারেট
1
58:<?for(;;)echo~str_pad(ƒõ,22+20*sin($a+=.1),ß,usleep(5e4));
— প্রিমো
খুব সুন্দর. আমি এই পরিবর্তনগুলি দিয়ে আমার উত্তর সম্পাদনা করব না, আপনার নিজের হিসাবে পোস্ট করা উচিত।
— অ্যালেক্স ব্যারেট
1
@ এটিকে একটি আনসি এনকোডিং দিয়ে সংরক্ষণ করা দরকার। আইডিয়োন স্বয়ংক্রিয়ভাবে সবকিছুকে utf-8 এ রূপান্তর করে, যা ভেঙে যায়। ~ƒõশুধু শর্টহ্যান্ডের জন্য "|\n"।
— প্রিমো
3

জাভাস্ক্রিপ্ট 88 76 78 টি অক্ষর

setInterval('console.log(Array(Math.sin(i++/10)*20+21|0).join(" ")+"|")',i=50)

কেন্ডাল ফ্রেয়ের কোডের ভিত্তিতে।

— joeytje50
সূত্র
আপনি কখনই আরম্ভ করবেন না i, সুতরাং এটি একটি তরঙ্গের পরিবর্তে একটি সরল রেখা প্রিন্ট করে।
— গিলি
আমার ভুল ... এটি সম্ভবত কাজ করেছে কারণ আমি ইতিমধ্যে আমার কনসোলটিতে কেন্ডালের স্ক্রিপ্টটি চালিয়েছি, তাই আমার জন্য ইতিমধ্যে আমার সূচনা হয়েছিল।
— joeytje50
3

সি - 86 + 3 টি অক্ষর

সম্পাদনার জন্য শিয়ানা এবং জোশকে ধন্যবাদ Thanks

i;main(j){for(;j++<21+sin(i*.1)*20;)putchar(32);puts("|");usleep(50000);i++;main(1);}

আমি; মূল (ঞ) {জন্য (ঞ = 0; ঞ ++, <20 + + পাপ (ঝ / 10) * 20;।) putchar (32); রাখে ( "|"); usleep (50000); আমি ++,; মেন () ;}

(জে = 0; জে ++ <20 + পাপ (i) * 20;) পুটচর (32); পুটস ("|"); ইউএসপ (50000); আই + =। 1; মূল (মূল) );}

-lmপতাকাটি দিয়ে সংকলিত , আমি ধরে নিচ্ছি আমার 3 টি অক্ষর যুক্ত করা দরকার

— ace_HongKongIndependence
সূত্র
1
পাপ করার আহ্বানের মধ্যে আপনি যদি আমি একটি অন্তর্নিহিত তৈরি করে এবং কেবল এটি 10.0 (বা একটি চর সংরক্ষণ করার জন্য 9.9) দিয়ে ভাগ করে নিয়ে কাজ করেন? i;main(j){for(j=0;j++<20+sin(i/10.0)*20;)putchar(32);puts("|");usleep(50000);i++;main();}
— shiona
printf("%*s\n",(int)(21+sin(i++/10.)*20),"|")
— লুপটির
1
হুম ... আমি যদি এই উত্তরটি আমার উত্তরে ব্যবহার করি তবে আমি সত্যিই নিজেকে দোষী মনে করব, বিশেষত যখন এটি আমার নিজের প্রশ্ন ... আপনি নিজেই কোনও উত্তর পোস্ট করার বিষয়টি বিবেচনা করবেন?
— #_HongKongInd dependence
ঠিক আছে, করবে। ধন্যবাদ। :)
— ট্রামুর
1
আপনি যদি আরো দুটি অক্ষর বন্ধ শেভ পারেন যদি আপনি অপসারণ j=0: i;main(j){for(;j++<21+sin(i/10.)*20;)putchar(32);puts("|");usleep(50000);i++;main(1);}। এটি 0 টি আর্গুমেন্টের সাথে প্রোগ্রামটি আহ্বান করা হয় এমন ধারণার উপর নির্ভর করে।
— জোশ
3

টিআই-বেসিক, 33 বাইট 

While 1:Output(8,int(7sin(X)+8),"!":Disp "":π/30+X→X:End

নিম্নলিখিত সতর্কতা বিদ্যমান :

  1. 16x8 এর পর্দার সীমাবদ্ধতার কারণে, এই সাইন ওয়েভটি কেবলমাত্র 7 এর প্রশস্ততা রাখে (60 এর সময়কালে এখনও বজায় থাকে)

  2. |চরের অ্যাক্সেসের কোনও সহজ উপায়ের অভাবে, !পরিবর্তে ব্যবহৃত হয়

  3. সঠিক সিস্টেম টাইমার না থাকার কারণে, বিলম্বটি কার্যকর হয় না। যাইহোক, রান গতি প্রায় সঠিক প্রদর্শিত হবে।

— মাইক ক্লার্ক
সূত্র
1
হেই, যেহেতু টিআই-বেসিকটি এক / দুই-বাইট টোকনে গণনা করা হয়, এটি আসলে 33 বাইট ("56 অক্ষর" নয়), সুতরাং এটি অবশ্যই চ্যালেঞ্জটি জিততে হবে!
— এমআই রাইট
প্রশস্ততা জিনিসটি বাদে ...
— লিটারোসিয়াসট
ঠিক আছে, হ্যাঁ, তবে বাইটস দিয়ে যাওয়া ঠিক আছে।
— এমআই রাইট
2

জাভাস্ক্রিপ্ট - 88

setInterval(function(){console.log(Array(Math.sin(i++/10)*20+21|0).join(" ")+"|")},i=50)

আমি নিশ্চিত যে কেউ এমন কিছু নিয়ে আসতে পারে যা আসলে চালাক।

— কেন্ডাল ফ্রে
সূত্র
2

জে - 103,58,5754

আইআরসি থেকে দুর্দান্ত ছেলেদের ধন্যবাদ

(0.1&+[6!:3@]&0.05[2:1!:2~' |'#~1,~[:<.20*1+1&o.)^:_]0

ডান থেকে বামে শব্দগুলিতে এটি পড়ে: 0 অসীম সময় থেকে শুরু করুন: পাপ, 1 যুক্ত করুন, 20 দ্বারা গুণ, তল, 1 যোগ করুন (সুতরাং এটি 2 উপাদানগুলির অ্যারে হয়ে যায়), দুটি বাইট অনুলিপি করুন '|' অনুরূপভাবে, এটি মুদ্রণ করুন, 0.05s অপেক্ষা করুন এবং 0.1 যোগ করুন

অসীম লুপের পরিবর্তে আমরা পুনরাবৃত্তি ব্যবহার করতে পারি, এটি 2 টি অক্ষর বাঁচাতে পারে তবে কিছু সংখ্যক পুনরাবৃত্তির পরেও স্ট্যাক ত্রুটি তৈরি করবে

($:+&0.1[6!:3@]&0.05[2:1!:2~' |'#~1,~[:<.20*1+1&o.)0

যেখানে $:একটি পুনরাবৃত্তি কল।

— ফিটফাট
সূত্র
আপনার কি কিছুটা ব্যাখ্যা যুক্ত করতে আপত্তি হবে, যাতে জে সিনট্যাক্সের সাথে অপরিচিত লোকেরা (আমার মতো) আপনার উত্তরটি বুঝতে পারে?
— #HongKongInd dependence
এটা তোলে ট্রেন গঠন সঙ্গে সম্পর্কে fussing 50 অক্ষরের মধ্যে এই কমান সম্ভব: (+2*(%20)6!:3@[2:1!:2~' |'#~1,~[:<.20*1+1&o.)^:_]0। পুনরাবৃত্তি সংস্করণটি এবার 1 টি চর সংরক্ষণ করে $:@(+2*(%20)6!:3@[2:1!:2~' |'#~1,~[:<.20*1+1&o.)0যদিও এটি বাইরে বেরিয়ে আসার আগে বেশি দিন স্থায়ী হয়।
— অ্যালগরিদমশর্ক
2

হাস্কেল - 75

main=putStr$concat["|\n"++take(floor$20+20*sin x)(repeat ' ')|x<-[0,0.1..]]

দুর্ভাগ্যক্রমে, আমি আমার চর গণনা দ্বিগুণ না করে 50 মিমি বিরতি দেওয়ার প্রোগ্রামটি পাইনি, সুতরাং এটি কেবল কনসোলকে প্লাবিত করে, তবে এটি সাইন ওয়েভ তৈরি করে।

এখানে বিরতি সহ পুরো কোড (নতুন লাইনের সাথে 138 টি অক্ষর) রয়েছে:

import GHC.Conc
import Control.Monad
main=mapM_(\a->putStr a>>threadDelay 50000)(["|\n"++take(floor$20+20*sin x)(repeat ' ')|x<-[0,0.1..]])
— Zaq
সূত্র
2
বিরতি দেওয়া ছিল অন্যতম প্রয়োজনীয়তা। আপনি কি বিরতি দিয়ে কোড পোস্ট করতে পারেন?
— জাস্টিন
ঠিক আছে, আমি এটি পোস্ট। আমি চাই হ্যাসেল আপনাকে আমদানি ছাড়াই কোডটি বিরতি দিন।
— Zaq
প্রশস্ততা দ্বারা আমি শিখার প্রশস্ততা অর্থাত্ আপনার বর্তমান প্রোগ্রামের প্রশস্ততার দ্বিগুণ। আপনি 20+20*sin xযোগ্যতার পরিবর্তে এটিকে পরিবর্তন করতে ইচ্ছুক হতে পারেন ।
— #HongKongInd dependence
ওহ, অবশ্যই আমার ধারণা আমি প্রশ্নের সেই অংশটির ভুল ব্যাখ্যা করেছি।
— জাক
2

পার্ল 6: 46 টি অক্ষর

sleep .05*say ' 'x(25+20*.sin),'|'for 0,.1...*

অসীম অলস বিন্যাস ব্যবহার করে যা তৈরি 0,0.1 ... *, যে উপর লুপ। গুণিত হিসাবে 1 হিসাবে চিহ্নিত হিসাবে sayফিরে আসে Bool::True, এইভাবে আমি এটি একটি একক বিবৃতিতে রাখতে পারি।

— Ayiko
সূত্র
আমি দেখতে পাচ্ছি কেন sleepএবং .05আলাদা করতে হবে। কিন্তু আমি ভাবছি যদি মধ্যে স্থান sayএবং ' 'বাধ্যতামূলক?
— ম্যাথিয়াস
হ্যাঁ: s এটি "এক সারিতে 2 টি শর্ত দেয়" say' 'একজনের জন্য ত্রুটিটি ব্যবহার করতে পারে say(' ')তবে এই ক্ষেত্রে 1 টি অতিরিক্ত অতিরিক্ত ...
— আইয়িকো
1
@ মাথিয়াস: পার্ল In-এ তালিকার ক্ষেত্রে হয় যুক্তি নিতে হবে না, তাদের পরে কোনও জায়গা রাখা উচিত নয়, বা প্রথম বন্ধনী ব্যবহার করতে হবে। এটি পার্ল 5 এর বিপরীতে কোড গল্ফের জন্য ডিজাইন করা কোনও ভাষা নয় (তবে এতে অনেকগুলি বিল্টিন বৈশিষ্ট্য রয়েছে, সুতরাং এটি ব্যবহারযোগ্য)।
— কনরাড বোরোস্কি
@ এক্সফিক্স ব্যাখ্যাটির জন্য আপনাকে ধন্যবাদ। আমি ভাষাটি পছন্দ করি তবে আমি এখনও এটিকে পুরোপুরি সন্ধান করিনি, কারণ আমি এখনও এটি কোনও কাজের প্রকল্পে ব্যবহার করতে পারি না। যাইহোক, আমি সবসময় কিছু পার্ল 6 স্ক্রিপ্ট লেখার পরিকল্পনা করি। @ আইাইকো, আমি আপনার পার্ল 6 টি পোস্টের প্রশংসা করছি :-)
— ম্যাথিয়াস
2

fugly জাভাস্ক্রিপ্ট - 77

i=setInterval("console.log(Array(Math.sin(i+=.1)*20+20|0).join(' ')+'|')",50)

এবং যদি আমরা এটি ফায়ারফক্সে করি - 73

i=setInterval("console.log(' '.repeat(Math.sin(i+=.1)*20+20|0)+'|');",50)

এবং যদি আমরা কদর্য - 67

i=setInterval("throw(' '.repeat(Math.sin(i+=.1)*20+20|0)+'|');",50)
— eithed
সূত্র
1

scala, 92,89, 87

def f(i:Int){println(" "*(20+20*math.sin(i*.1)).toInt+"|");Thread sleep 50;f(i+1)};f(1)
— ValarDohaeris
সূত্র
(20+20*math.sin(i*.1))এটি 1 চার দ্বারা হ্রাস করে, এটি বৈধ সিনট্যাক্স বলে ধরে নেওয়া (স্কালার সাথে আমার কোনও অভিজ্ঞতা নেই)
— #HongKongInd dependence
ধন্যবাদ, তবে আমি নিজেই এটি আবিষ্কার করেছি :)
— ভালারডোহারিস
1

পাইথন 3, 103

বোকা frikk'n আমদানি ...

import time,math
t=0
while 1:t+=(.05+t<time.clock())and(print(' '*int(20+20*math.cos(t*1.9))+'|')or.05)

"ঘুম" এর পরিবর্তে, এই বাস্তবায়নটি সিপিইউতে গ্রেন্ড হয় কারণ পাইথন দেয়ালের ঘড়ির চেয়ে ভাসমান-পয়েন্ট সিপিইউ ক্লকটি সহজ করে তোলে। এই পদ্ধতিটি ফ্রিওলকে হারাবে না , তবে এটি মজাদার তাই আমি এটিকে ছেড়ে দিচ্ছি।

— boothby
সূত্র
1

সি শার্প

[152] অক্ষর

namespace System{class P{static void Main(){for(var i=0d;;){Console.Write("{0,"+(int)(40+20*Math.Sin(i+=.1))+"}\n",'|');Threading.Thread.Sleep(50);}}}}

আমি রানের বিদ্যমান সি # উত্তর পেতে পারি না এবং আমার যথেষ্ট খ্যাতি না থাকায় আমি ডাউনওয়েট করতে পারি না

এটি লুপ ঘোষণার পরে দু'একটি {অনুপস্থিত এবং একটি নিখোঁজ ছিল )।

আমি অনুমান করি যে তরঙ্গটি যখন চালিত হয় তখন তার চেহারাতে ভিন্নতা হ'ল আমরা এই তরঙ্গটি প্রদর্শন করার চেষ্টা করছি।

যদি আমরা নেমস্পেস এবং পদ্ধতি ঘোষণার গণনা না করে থাকি তবে এটি কার্যকারী সংস্করণের জন্য [104] অক্ষর হবে

for(var i=0d;;){Console.Write("{0,"+(int)(40+20*Math.Sin(i+=.1))+"}\n",'|');Threading.Thread.Sleep(50);}
— মালাখি
সূত্র
অন্যান্য সি # উত্তর জিএমসিএসে কাজ করে। এটি প্রথমে সংকলন করতে ব্যর্থ হয়েছে, তবে আমার মনে হয় এটি উত্স কোডের মধ্যে কিছু প্রিন্টযোগ্য অক্ষর নেই বলে। এটি একটি খালি ফাইলে আবার টাইপ করার পরে, সংকলনটি সফল।
— #HongKongInd dependence
সংকলকরা পিক হতে পারে, হাহ?
— মালাচি
1

ভিবি [236] [178]

আপনি কীভাবে ট্যাবগুলি গণনা করবেন তা নিশ্চিত নন, আমি এখানে পেস্ট করার আগে আমি নোটপ্যাড ++ থেকে গণনাটি নিয়েছিলাম। নিউলাইনগুলি বাধ্যতামূলক, সম্ভবত কেউ কেন কোড গল্ফিংয়ের জন্য এটি ব্যবহার পছন্দ করে না।

Module Module1
Sub Main()
Dim i
While True
Console.WriteLine("{0:" & (40 + 20 * Math.Sin(i = i + 0.1)) & "}", "|")
Threading.Thread.Sleep(50)
End While
End Sub
End Module
— মালাখি
সূত্র
1

সি শার্প

যাদু লাইন [91] অক্ষর

for(var i=0d;;Console.Write("{0,"+(int)(40+20*Math.Sin(i+=.1))+"}\n",'|'))Thread.Sleep(50);

ওয়ার্কিং প্রোগ্রাম নীচে। [148] অক্ষর

namespace System{class P{static void Main(){for(var i=0d;;Console.Write("{0,"+(int)(40+20*Math.Sin(i+=.1))+"}\n",'|'))Threading.Thread.Sleep(50);}}}
— জন ক্লিয়ারজ
সূত্র
দুঃখিত যদি আমি প্রশ্নটি পরিষ্কার না করে থাকি - আপনার প্রোগ্রামটি শেষ হওয়া উচিত নয় এবং ধারাবাহিকভাবে তরঙ্গকে নীচে স্ক্রোল করা উচিত (সাইন ইন করা ব্যতীত)। এছাড়াও, দয়া করে একটি অক্ষর গণনা যুক্ত করুন।
— #HongKongInd dependence
দুঃখিত যে বিট সম্পর্কে ভুলে গেছি। এখনই স্থির।
— জন ক্লিয়ারজেড
আমি মনে করি আপনি "থ্রেড.স্লিপ" গুলি হারাতে পারেন এবং ভেরু দিয়ে "ফ্লোট" পরিবর্তন করতে পারেন :) ১১7 অক্ষর। - দুঃখিত অপেক্ষাটির সময়টি দেখেনি .. এখন 133 অক্ষর। using System;class P{static void Main(){for(var i=0d;;Console.Write("{0,"+(int)(40+20*Math.Sin(i+=.1))+"}\n",'|'))Thread.Sleep(50);}}
— মেদিনী বায়কাল
1
আমি Threading.Thread.Sleep(50)কিছু ভুল করছি বলে VS2010 এ সংকলন করতে পারছি না?
— মালাচি
1
আমি এটি চালাতে সক্ষম হয়েছি, তবে আমাকে কিছু বন্ধনী এবং সেমি-কলোন যুক্ত করতে হয়েছিল এবং এটি প্রতিটি সময়কালে একইরকম লাগে না
— মালাচি
1

টিআই-বেসিক, 30 বাইট

অন্যান্য নির্ভুলতার তুলনায় কিছু সঠিকতার ব্যয়ে ছোট আকারের উন্নতি। দ্রষ্টব্য যে টিআই-বেসিক প্রযুক্তিগতভাবে | চরিত্রটি, তবে আপনাকে এটি কম্পিউটারের মাধ্যমে স্থানান্তর করতে হবে বা এটি অ্যাক্সেস করার জন্য একটি অ্যাসেম্বলি প্রোগ্রাম ব্যবহার করতে হবে।

While 1
Output(8,int(8+7sin(Ans)),":
Disp "
.03π+Ans
End
— এমআই রাইট
সূত্র
ওহ, এই চ্যালেঞ্জটি কত পুরনো ছিল তা দেখেনি! এটি আরও গল্ফ করার চেষ্টা
— এমআই রাইট
যাইহোক, .03πহতে পারে .1, যা এখনও প্রয়োজনীয় ব্যবধানের মধ্যে রয়েছে।
— লিটারোসিয়াসট
ভালো লাগল, ধন্যবাদ! আপনি কি আউটপুট কমান্ডটি গল্ফ করতে পারে এমন কোনও উপায় দেখেন? এছাড়াও, যেহেতু আমার একটি সিএসই রয়েছে, তাই আমি কয়েক বাইটের দামে ডান প্রশস্ততা (26-চর স্ক্রিন) এ এটি পেতে পারি।
— এমআই রাইট
না, আউটপুট কমান্ডটি দুর্দান্ত দেখাচ্ছে - খুব খারাপ ডিস্কের একটি উদ্ধৃতি দরকার। প্রশস্ততা 20 টি অক্ষর হওয়া উচিত, পর্দার প্রস্থের 39 প্রয়োজনীয়তা তৈরি করে So সুতরাং এটি কেবল গ্রাফ স্ক্রিনে কাজ করবে এবং এটি করার কোনও ছোট উপায় নেই।
— লিটারোসিয়াসট
1

জুলিয়া - 68

সম্পাদনা করুন: এমএল এবং এসকে ধন্যবাদ

i=0;while 0<1;println(" "^int(20sin(.1i)+20)*"|");i+=1;sleep(.05)end

ঠিক আছে, এটি বনাম এপিএল প্রতিযোগিতা করতে পারে না, তবে এখানে আমার চেষ্টা।

আউটপুট:

                    |
                      |
                        |
                          |
                            |
                              |
                               |
                                 |
                                  |
                                    |
                                     |
                                      |
                                       |
                                       |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                   |
                                  |
                                |
                              |
                             |
                           |
                         |
                       |
                     |
                   |
                 |
               |
             |
           |
         |
        |
      |
     |
    |
   |
  |
 |
|
|
|
|
|
 |
 |
  |
   |
     |
      |
       |
         |
           |
             |
              |
                |
                  |
                    |
                      |
                        |
                          |
                            |
                              |
                                |
                                 |
                                   |
                                    |
                                     |
                                      |
                                       |
                                       |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                   |
                                 |
                                |
                              |
                            |
                          |
                        |
                      |
                    |
                  |
                 |
               |
             |
           |
         |
       |
      |
     |
   |
  |
  |
 |
|
|
|
|
|
 |
  |
  |
    |
     |
      |
        |
         |
           |
             |
               |
                 |
                   |
                     |
                       |
                         |
                           |
                            |
                              |
                                |
                                 |
                                   |
                                    |
                                     |
                                      |
                                       |
                                       |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                  |
                                 |
                               |
                              |
                            |
                          |
                        |
                      |
                    |
                  |
                |
              |
            |
           |
         |
       |
      |
    |
   |
  |
 |
 |
|
|
|
|
|
 |
  |
   |
    |
     |
      |
        |
          |
           |
             |
               |
                 |
                   |
                     |
                       |
                         |
                           |
                             |
                              |
                                |
                                  |
                                   |
                                    |
                                     |
                                      |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                       |
                                      |
                                     |
                                    |
                                  |
                                 |
                               |
                             |
                            |
                          |
                        |
                      |
                    |
                  |
                |
              |
            |
          |
         |
       |
      |
    |
   |
  |
 |
 |
|
|
|
|
 |
 |
  |
   |
    |
     |
       |
        |
          |
            |
             |
               |
                 |
                   |
                     |
                       |
                         |
                           |
                             |
                               |
                                |
                                  |
                                   |
                                    |
                                      |
                                      |
                                       |
                                        |
                                        |
                                        |
                                        |
                                        |
                                       |
                                      |
                                      |
                                     |
                                   |
                                  |
                                |
                               |
                             |
                           |
                         |
                       |
                     |
                   |
— সিসিপি
সূত্র
1
আমি জুলিয়া জানি না, কিন্তু এটা ব্যবহার করা সম্ভব .05পরিবর্তে 0.05মধ্যে sleep?
— #HongKongInd dependence
প্রকৃতপক্ষে হ্যাঁ! ধন্যবাদ
— সিসিপি
এটি ডাউন কাটা 68 টি অক্ষর : i=0;while 0<1;println(" "^int(20sin(.1i)+20)*"|");i+=1;sleep(.05)end--- sin(i/10)*20সমান20sin(.1i)
— এমএল
আমি জুলিয়াকে চিনি না, তবে আপনি কি তার পরিবর্তে সমস্ত প্রাকৃতিক সংখ্যার উপরে লুপের পুনরাবৃত্তি করতে পারেন?
— lirtosiast
1

ম্যাটল্যাব, ৮১ বাইট

t=0;while(fprintf('%s\n',i))i=[];t=t+1;i(fix(21+20*sind(t*6)))='|';pause(.05);end

আমি iসর্বদা এমএটিএলবি-তে শুরু হওয়া সত্যটি আপত্তি জানালাম যার অর্থ আমি প্রথমে শুরু fprintfনা করে whileবিবৃতিতে রেখে দিতে পারি i। এর অর্থ এই নয় যে প্রোগ্রামটি প্রথমে একটি খালি লাইন আউটপুট করে তবে আমি মনে করি এটি অনুমান করা নিষিদ্ধ নয়।

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

— Sanchises
সূত্র
"আমি ম্যাটল্যাব-এ সর্বদা আরম্ভ করা এই সত্যটির অপব্যবহার করেছি, যার অর্থ আমি প্রথমে আরম্ভ না করেই বিবৃতিতে এফপ্রিন্টফ রাখতে পারি।" সত্যিই চালাক! +1 টি!
— স্টিভি গ্রিফিন
0

এফ # - 90 79 77 76

পুনরাবৃত্তি ব্যবহার করে একটি সমাধান এখানে

let rec f x=printfn"%*c"(int(20.*sin x)+21)'|';Thread.Sleep 50;f(x+0.1)
f 0.

এটি সম্ভবত আরও উন্নত করা যেতে পারে।

— pswg
সূত্র
এফ # সম্পর্কে কিছু না জেনে আমি ধরে নিচ্ছি যে থ্রেড S ঘুম এমএসে একটি মান প্রত্যাশা করে, তাই আপনি 0 এর একটির হাত থেকে মুক্তি পেতে পারেন এবং থ্রেড করুন। 50. ঘুমান :) :)
— ভালারডোহারিস
@ ভালারডোহেরিস আপনি ঠিক বলেছেন আমি প্রয়োজনীয়তা ভুল পড়েছি।
— PSwg
0

অটোহটকি 176

SetKeyDelay,-1
run Notepad.exe
WinWaitActive, ahk_class Notepad
p:=0
loop
{
sleep 50
p+=Mod(Floor(A_index/40),2)?-1:1,t:=""
loop % p
t .= " "
sendinput % t "|`n"
}
esc::Exitapp

স্ক্রিপ্ট চালান। এটি নোটপ্যাড খুলবে এবং অক্ষরগুলি মুদ্রণ করবে। প্রস্থান করতে যেকোন সময় Esc চাপুন।

— এভি
সূত্র
0

ক্লোজার, 121

সংক্ষিপ্ত সংস্করণ:

(loop[a 0](println(clojure.string/join(repeat(int(+ 20 (* 20 (Math/sin a)))) " ")) \|)(Thread/sleep 50)(recur(+ a 0.1)))

সুন্দর সংস্করণ:

(loop [a 0]
  (println (clojure.string/join (repeat (int (+ 20 (* 20 (Math/sin a)))) " ")) \|)    
  (Thread/sleep 50)
  (recur(+ a 0.1)))

পিরিয়ড 64 হয়।

এটিকে টাইপ করুন lein replবা ফাইলে সংরক্ষণ করুন sin.cljএবং এর সাথে চালান lein exec sin.clj(লিন-এক্সিকিউট প্লাগইন প্রয়োজন)।

— ctrlrsf
সূত্র
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.