আইজফজাল্লাজাকুলের অগ্ন্যুত্পাত?


18

2010 বছর, একটি আইসল্যান্ডীয় ভলকানো, সংক্ষেপে নামে Eyjafjallajökull সূত্রপাত, আমার দীর্ঘ পরিকল্পিত ফ্লাইট ফলে বাতিল হচ্ছে।

যদি আবার কখনও এটি ঘটে, আমি সত্যিই আগে থেকে জানতে চাই, সুতরাং দয়া করে আমাকে একটি সাধারণ ভিজ্যুয়াল সতর্কতা ব্যবস্থা তৈরিতে সহায়তা করুন!

ইনপুট

নিন আইসল্যান্ডীয় আবহাওয়া অফিস একটি ইনপুট (STRING) হিসাবে অগ্ন্যুত্পাত সতর্কতা কোড:

গ্রীন - আগ্নেয়গিরিটি স্বাভাবিক, অ-বিস্ফোরক অবস্থায় রয়েছে।

ইয়েলো - আগ্নেয়গিরি জ্ঞাত পটভূমি স্তরের উপরে উন্নীত অশান্তির লক্ষণগুলি অনুভব করছে।

কমলা - আগ্নেয়গিরির অগ্ন্যুত্পাত হওয়ার সম্ভাবনা বৃদ্ধি সহ অস্থিরতা প্রদর্শন করছে।

লাল - বায়ুমণ্ডলে ছাইয়ের উল্লেখযোগ্য পরিমাণে নির্গমন হওয়ার সাথে অগ্নুৎপাত আসন্ন হওয়ার পূর্বাভাস দেওয়া হয়েছে।

আউটপুট

গ্রাফিক (এএসসিআইআই আর্ট) সতর্কতা, আইজফজাল্লাজাকুলের রাজ্যের চিত্র তুলে ধরে।

গ্রীন (আইজফজাল্লাজাকুল বিশ্রাম নিচ্ছে)

      al   la 
     j       j
  jaf         öku
 y               l
E                 l
-------------------

ইয়েলো (কিছু ধোঁয়া দেখা দেয়!)

       ~   ~
         ~
      al   la 
     j       j
  jaf         öku
 y               l
E                 l
-------------------

কমলা (আরও ধোঁয়া!)

      ~  ~  ~
       ~   ~
         ~
      al   la 
     j       j
  jaf         öku
 y               l
E                 l
-------------------

লাল (আরও বেশি ধোঁয়া এবং কিছু ছাইও!)

   `~ ~ ~ ~ ~ ~`
    ` ~  ~  ~ ` 
     ` ~   ~ ` 
       ` ~ `  
      al   la 
     j       j
  jaf         öku
 y               l
E                 l
-------------------

বিধি

  • আপনি পর্দায় আউটপুট (stdout), বা একটি স্ট্রিং ফিরে আসতে পারেন
  • এটি ! সংক্ষিপ্ত উত্তর (বাইটে), জিতল
  • প্রতিস্থাপন করুন মুক্ত মনে Ö সঙ্গে
  • ট্রেলিং স্পেসগুলি অনুমোদিত তবে প্রয়োজনীয় নয়
  • সর্বাধিক এক ট্রেলিং নিউলাইন অনুমোদিত
  • সর্বাধিক ৪ টি শীর্ষস্থানীয় নিউলাইনগুলি অনুমোদিত (ধোঁয়ার জায়গায়)

উচ্চারিত: AY-JAH-FUH-JUH-AH-LAH-JUh-KUh-EW-LUH?
যাদু অক্টোপাস উরন

@ কারাসোকম্পুটিং - প্রায়! :)
জেপেলিন

অন্তত এটা চেয়ে খাটো এর Tungnafellsjökull পি:
FlipTack

@ DRMcMoylex No, ঠিক একটি টাইপো এখনই ঠিক করা উচিত। ধন্যবাদ!
zeppelin

নামটি সংক্ষিপ্ত না হওয়ার বিষয়ে আপনি রসিকতা করেছেন তবে এটির ইংরেজি অনুবাদ "দ্বীপ পর্বত হিমবাহ" এর চেয়ে এটি অত্যন্ত বর্ণনামূলক এবং খাটো এবং এটি আরও অনেক সুন্দর বলে মনে হচ্ছে। : পি
মার্টিন এন্ডার

উত্তর:


2

রুবি, 161

আইসল্যান্ডের বিখ্যাত ল্যান্ডমার্ক, আইজফজাল্লাজাকুল টাওয়ারটি সম্পর্কে আমার এই মন্তব্য।

সংক্ষিপ্তভাবে সংক্ষিপ্ত তবে আমি এখনও ধোঁয়া গল্ফ করার জন্য ভাল উপায় নিয়ে আসতে পারি নি।

->n{m=85-n[-3].ord>>2
%w{`~+~+~+~+~+~` `+~++~++~+` `+~+++~+` `+~+` al%3sla j%7sj jaf%9soku y%15sl E%17sl}.map{|i|(i%"").tr(?++?`*m," ").center(19)}[m,9]+[?-*19]}

পরীক্ষা প্রোগ্রামে অসম্পূর্ণ

f=->n{m=85-n[-3].ord>>2     #From ASCII code of 3rd from last letter, derive m=0 for RED up to 4 for GREEN (uppercase.)
  %w{`~+~+~+~+~+~` `+~++~++~+` `+~+++~+` `+~+` al%3sla j%7sj jaf%9soku y%15sl E%17sl}.
  map{|i|                   #For each line above decode as follows:
    (i%"").                 #Replace %Xs with X spaces, by inserting  empty strings and padding sprintf style. 
    tr(?++?`*m," ").        #Replace + with space. If not red, replace ` with space.
    center(19)}[m,9]+       #Centre output to 19 characters per line. Start printing at line m and go on to the end (never more than 9 lines.)
  [?-*19]                   #Add a row of --- at the bottom.
}

puts f[gets.chomp]

6

ব্যাচ, 284 বাইট

@set e=echo 
@%e%off
set s=      
set t=   
goto %1
:RED
set t= ` 
%e%   `~ ~ ~ ~ ~ ~`
:ORANGE
%e%   %t%~  ~  ~%t%
:YELLOW
%e%    %t%~   ~%t%
%e%%s%%t%~%t%
:GREEN
%e%%s%al   la 
%e%     j%s% j
%e%  jaf %s%  oku
%e% y %s%%s%  l
%e%E%s%%s%%s%l
%e%--------------------

দ্রষ্টব্য: লাইন 1 এবং 7 এর একটি পূর্ববর্তী স্থান রয়েছে, লাইন 3 এর ছয়টি এবং লাইন 4 এর তিনটি রয়েছে।


1
ভাল ব্যবহার goto
NoOneIs এখানে

1

পিএইচপি, 307 288 279 বাইট

$o=" ";while($x<19)$o[$x+19*(($d=abs($x-9))>4?$d>7?$d-5:2:$d>3)]="Eyjafjal   lajokull"[$x++];echo strtr((($n=ord($argv[1])/8&3)-2?"":"   1~ ~ ~ ~ ~ ~2\n").($n%3?"     1~  ~  ~2\n":"").($n?"      1~   ~2\n       1 ~ 2\n":"").chunk_split(str_pad($o,114,"-"),19),12,$n-2?"  ":"`´");

কুরুচিপূর্ণ

ভাঙ্গন

$o=" ";                                         // 0.init $o to string
while($x<19)$o[$x+19*(                      // 1.paint volcano
    ($d=abs($x-9))>4?$d>7?$d-5:2:$d>3           // 1a map [0..19] to row offsets
    )]="Eyjafjal   lajokull"[$x++];
echo strtr(                                     // 7. print
    (($n=ord($argv[1])/8&3)                     // 4.map GYOR to 0312
        -2?"":"   1~ ~ ~ ~ ~ ~2\n")             // 5a.add smoke & stuff for red
        .($n%3?"     1~  ~  ~2\n":"")           // 5b for orange
        .($n?"      1~   ~2\n       1 ~ 2\n":"")// 5c for yellow
    .chunk_split(                               // 3.insert linebreaks
        str_pad($o,114,"-")                     // 2.add ground
    ,19)
,12,$n-2?"  ":"`´");        // 6.replace stuff with ticks for red, with blanks else

1

জাভাস্ক্রিপ্ট (ES6), 235 220 218 বাইট

c=>[344,592,160,640,192,32,28,2,1,~0].map(n=>(s='6222222661116600660').replace(/./g,(_,i)=>n&(1<<i|512>>i-9)?(s+'6allajjjafökuylEl')[p++]||'-':' '),p=0).join`
`.replace(/\d/g,n=>n%4<'GYOR'.search(c[0])?n&4?'`':'~':' ')


1

জাভাস্ক্রিপ্ট (ES6), 286 262 199 194 183 বাইট

ফাংশন ইনপুট পাস f(), যেমন f('GREEN')

Y=`7~3~
9~
`
f=n=>({G:'',Y,O:`5 ~2~2~
`+Y,R:'3`~ ~ ~ ~ ~ ~`\n4` ~2~2~ `\n5` ~3~ `\n7` ~ `\n'}[n[0]]+`6al3la
5j7j
2jaf9oku
 y15l
E17l
`+'-'.repeat(19)).replace(/\d+/g,n=>' '.repeat(n))

-63 by বাইট: স্পেস জেনারেট করার জন্য ফাংশনের পরিবর্তে রেইগেক্স ব্যবহার করা হয়।


কি sসত্যিই এটা মূল্য? আমার গণনা অনুসারে এটি 4 বাইট সাশ্রয় করে ... তবে 16 বাইটের দাম পড়ে। অন্যদিকে, আমি মনে করি আপনি _আরও কয়েকটি ব্যবহার করে কয়েকটি বাইট সংরক্ষণ করতে পারেন ।
নীল

ORANGE এর জন্য অবৈধ ফলাফল উত্পন্ন করে (ধোঁয়া সঠিকভাবে সংযুক্ত করা হয়নি)
জেপেলিন

@ নীল হ্যাঁ, আমি অনুমান করেছিলাম যে আমার সত্যিকারের চেয়ে বেশি বার এটি প্রয়োজন it : পি
darrylyeo

@zeppelin ফিক্সড
darrylyeo

এটি এখন আমার জন্য "আর সংজ্ঞায়িত নয়" দিয়ে ব্যর্থ হয়েছে :(
জেপেলিন

1

> <> (মাছ) 351 339 302 বাইট

\l?!;o00.>~00.
\a"-------------------"a"l                 E"a"l               y "a"ukö         faj  "a"j       j     "a" al   la      "
\i:"R"-?!v
 " `  "a~<|.!00"   `~ ~ ~ ~ ~ ~`"a"    ` ~  ~  ~ ` "a"     ` ~   ~ ` "a"       ` ~"
\ :"G"-?!v
\}a"~         "a"~   ~       "
\{:"Y"-?!v
\~a"~  ~  ~      "

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

সম্পাদনা 1; লাইন ব্রেক কমাতে প্রাথমিক আগ্নেয়গিরির স্ট্রিংটি 1 লাইনে সরানো হয়েছে, শূন্য স্থান পূরণ করতে বিপরীতে 'রেড' স্ট্রিং সরানো হয়েছে। (12 বাইট সংরক্ষিত)

সম্পাদনা 2; 'ও' চেক আউট এবং অন্য 3 টি ইনপুট না করা হলে কেবল মুদ্রণ করুন (এটি কোনও 'সবুজ, লাল, কমলা, হলুদ' ইনপুট নির্দিষ্ট করে না। স্ট্রিংগুলিকে বাইপাসে চালনা এবং স্পেস ব্যবহার করে) অতিরিক্ত কমান্ড। (37 বাইট সংরক্ষিত)

অনলাইন সংস্করণ পরীক্ষা!


0

পাইথন 2, 209 বাইট (208 চর)

s=' '
y=' ~ '
v='ROY G'.index(input()[0])
a='` '[v>0]
print'\n'.join([s*3+a+'~'+' ~'*5+a,s*4+a+y*3+a,s*5+a+y*2+a,s*7+a+y+a,s*6+'al   la ',s*5+'j       j\n  jaf'+s*9+'öku\n y'+s*15+'l\nE'+s*17+'l','-'*19][v:])
আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.