El año 2010, un Vulcano islandés, llamado de manera concisa Eyjafjallajökull , entró en erupción, lo que resultó en la cancelación de mi vuelo planeado desde hace mucho tiempo.

En caso de que esto vuelva a suceder, me gustaría saber de antemano, ¡así que ayúdenme a construir un sistema de alerta visual simple!

Entrada

Tome el código de alerta de actividad volcánica de la Oficina Meteorológica de Islandia , como entrada (cadena):

VERDE - El volcán está en estado normal, no eruptivo.

AMARILLO : el volcán está experimentando signos de malestar elevado por encima de los niveles de fondo conocidos.

NARANJA - El volcán exhibe un aumento de los disturbios con una mayor probabilidad de erupción.

ROJO - Se pronostica que la erupción será inminente con una emisión significativa de cenizas a la atmósfera.

Salida

La alerta gráfica (arte ASCII), que ilustra el estado de Eyjafjallajökull.

VERDE (Eyjafjallajökull está descansando)

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

AMARILLO (¡aparece algo de humo!)

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

NARANJA (¡más humo!)

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

ROJO (¡incluso más humo y algo de ceniza también!)

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

Reglas

• Puede enviar a la pantalla (stdout) o devolver una cadena
• Este es el código de golf ! La respuesta más corta (en bytes), gana
• Siéntase libre de reemplazar ö con o
• Los espacios finales están permitidos, pero no son obligatorios
• Como máximo se permite una nueva línea final
• Como máximo se permiten 4 líneas nuevas (en lugar de humo)

Rubí, 161

Aquí está mi opinión sobre el famoso monumento de Islandia, la Torre Eyjafjallajökull.

Razonablemente corto, pero todavía no he encontrado una buena manera de jugar al golf.

->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]}

Sin golf en el programa de prueba

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]

Lote, 284 bytes.

@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%--------------------

Nota: Las líneas 1 y 7 tienen un espacio final, la línea 3 tiene seis y la línea 4 tiene tres.

PHP, 307 288 279 bytes

$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?"  ":"`´");

feo voluminoso

Descompostura

$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

JavaScript (ES6), 235 220 218 bytes

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?'`':'~':' ')

let f =

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?'`':'~':' ')

console.log(f('GREEN'))
console.log(f('YELLOW'))
console.log(f('ORANGE'))
console.log(f('RED'))

JavaScript (ES6), 286 262 199 194 183 bytes

Pase la entrada a la función f(), por ejemplo 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 bytes: Regex utilizado en lugar de función para generar espacios.

> <> (Fish) 351 339 302 bytes

\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"~  ~  ~      "

Bastante básico y feo en este momento, estoy trabajando en jugar golf más abajo, pero la entrada 'RED' hace que sea más difícil reutilizar las líneas.

Editar 1; Movió la cadena inicial del volcán en 1 línea para reducir los saltos de línea, movió la cadena 'ROJA' en reversa para llenar el espacio vacío. (12 bytes guardados)

Edición 2; Tomó la verificación 'O' e imprimió si los otros 3 no se ingresaron (no especifica ninguna entrada no 'verde, roja, naranja, amarilla'. También eliminó el movimiento y utilizó espacios en las cadenas para evitar comandos adicionales. (37 bytes guardados)

Versión en línea para probar!

Python 2, 209 bytes (208 caracteres)

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:])