Напишіть програму або функцію, яка виконує однорядковий рядок. Ви можете припустити, що він містить лише друкований ASCII . Роздрукуйте або поверніть рядок арт-ракети ASCII, наприклад

  |
 /_\
 |E|
 |a|
 |r|
 |t|
 |h|
 |_|
/___\
 VvV

з вхідним рядком, написаним зверху вниз на фюзеляжі. У цьому випадку вхід був Earth. Висота ракети (включаючи полум'я) завжди є довжиною струни плюс п’ять.

Кожен рядок у висновку може мати до двох проміжних проміжків, і може бути один необов'язковий останній новий рядок. Виграє найкоротший код у байтах.

Більше прикладів:

[empty string]

  |
 /_\
 |_|
/___\
 VvV

a

  |
 /_\
 |a|
 |_|
/___\
 VvV

|0

  |
 /_\
 |||
 |0|
 |_|
/___\
 VvV

\/\

  |
 /_\
 |\|
 |/|
 |\|
 |_|
/___\
 VvV

 _ _ [note trailing space]

  |
 /_\
 | |
 |_|
 | |
 |_|
 | |
 |_|
/___\
 VvV

    [4 spaces]

  |
 /_\
 | |
 | |
 | |
 | |
 |_|
/___\
 VvV

SPACEY

  |
 /_\
 |S|
 |P|
 |A|
 |C|
 |E|
 |Y|
 |_|
/___\
 VvV

Таблиця лідерів

var QUESTION_ID=91182,OVERRIDE_USER=26997;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Excel VBA, 142 179 175 160 155 байт

Інструкція:

Встановіть робочий аркуш Excel, де клітинка А1 є введенням, а стовпець С - як вихід. Встановіть вирівнювання тексту в стовпці С по центру . Напишіть та запустіть такий код у Негайне вікно:

[C1]="|":[C2]="/_\":T=[A1]&"_":For i=1To Len(T):Cells(i+2,3)="|"&Mid(T,i,1)&"|":Next:Cells(i+2,3)="/__\":Cells(i+3,3)="VvV":[C:C].HorizontalAlignment=-4108

Невикористаний код:

Sub R()
    [C1] = "|"
    [C2] = "/_\"
    T = [A1]&"_"

    For i = 1 To Len(T)
        Cells(i + 2, 3) = "|" & Mid(T, i, 1) & "|"
    Next

    Cells(i + 2, 3) = "/__\"
    Cells(i + 3, 3) = "VvV"
    [C:C].HorizontalAlignment = -4108   'Set the text alignment in column C to center
End Sub

Вихід:

Примітка: шрифт і колір - це лише особистий вибір.

15 байт збережено за пропозицією edc65. Дякую.

5 байт збережено за пропозицією ТейлорШотта. Дякую.

Perl 6, 75 байт

"  |\n /_\\".say;" |$_|".say for slurp.chomp.comb;" |_|\n/___\\\n VvV".say;

JavaScript (ES6), 54

Прямо

x=>`  |
 /_\\
 |${[...x+'_'].join`|
 |`}|
/___\\
 VvV`

Тест

f=x=>`  |
 /_\\
 |${[...x+'_'].join`|
 |`}|
/___\\
 VvV`

function update() {
  O.textContent=f(I.value)
}

update()

<input id=I value='hello' oninput='update()'><pre id=O></pre>

Власне, 40 байт

"/___\
 VvV",'_o"|
 |"j'|o" |"+"  |
 /_\

Так, ці новинки повинні бути там.

Спробуйте в Інтернеті!

Пояснення:

Нові рядки представлені символом \nдля легшого форматування

"/___\\n VvV",'_o"|\n |"j'|o" |"+"  |\n /_\
"/___\\n VvV"                                create the bottom of the rocket
             ,'_o                            get input, append a "_" (for the last section before the jets)
                 "|\n |"j                    insert "|\n |" between every pair of characters
                         '|o                 append "|"
                            " |"+            prepend " |"
                                 "  |\n /_\  create the nose cone

C, 83 , 82 байти

F(char*c){for(puts("  |\n /_\\");*c;printf(" |%c|\n",*c++));puts(" |_|\n/___\\\n VvV");}

Основний тест:

int main() {
  F("");
  F("a");
  F("|0");
  F("\\/\\");
  F(" _ _ ");
  F("    ");
  F("SPACEY");
}

Пітон 2, 93 66 62 61 байт

FGITW. Можливо, може бути сильно гольф. Пропозиції вітаються.

Редагувати: 27 байт завдяки Mego. 4 байти завдяки TheBikingViking. 1 байт завдяки користувачу3030010.

Спробуйте в Інтернеті!

lambda x:r"""  |
 /_\
 |%s|
/___\
 VvV"""%"|\n |".join(x+"_")

PHP, 73 72 69 62 байт

  |
 /_\
 |<?=join('|
 |',str_split($argv[1]._))?>|
/___\
 VvV

Приймає рядок для друку на фюзеляжі як перший аргумент з командного рядка, коли викликається сценарій.

Покращення:

1. Збережено байт, замінивши \ n реальним новим рядком LF у першому аргументі join.
2. Збережено ще три байти, додавши до входу основу ракети з одним підкресленням
3. Завдяки Ісмаелю Мігелю : Збережено ще 7 байтів, скориставшись тим, що PHP був "препроцесором гіпертексту", тому ви можете виводити стільки тексту, скільки хочете, і запускати код десь посередині.

Спробуйте в Інтернеті!

Це було весело! :-)

Зразок дзвінків:

php rocket.php ""
php rocket.php EARTH
php rocket.php "This is a very long rocket"

мозковий ебать , 179 байт

>-[-[-<]>>+<]>-..[->+>++++<<]>>----.<<++++++++++.>.>>>+[-[--<]>>--]<.[-<+<++>>]<<+.---.<,[<<<.>.>.>.<.>,]<<<.[->>>+<<<]>.>.>>+++.<<.>.>>.<...---.<.<<.>>>------.[-<<<+<+>>>>]<<<.<.

Спробуйте в Інтернеті!

Рубін, 57 55 байт

-2 байта від @ValueInk
-5 байт, припускаючи, що у вхідному документі немає нового рядка, як це запропонував @manatwork. Введення даних, що не містять рядки, може бути надано, наприклад echo -n, як, наприклад echo -n hey | ruby rocket.rb.

puts'  |
 /_\
 |'+gets.chars*'|
 |'+'|
 |_|
/___\
 VvV'

Рубі, 62 60 байт

puts'  |
 /_\
 |'+gets.chop.chars*'|
 |'+'|
 |_|
/___\
 VvV'

Хаскелл, 58 байт

f s="  |\n /_\\\n |"++((:"|\n |")=<<s)++"_|\n/___\\\n VvV"

Сітківка , 44 37 байт

7 байт завдяки Мартіну Ендеру.

$
_
.
¶ |$0|
$
¶/___\¶ VvV
^
  |¶ /_\

Спробуйте в Інтернеті!

Желе , 37 36 байт

;”_⁾ |;ЀŒB;“/___\“ VvV”“  |“ /_\”;Y

Такий же бал, що і в існуючому записі, але використовує нову цікаву функцію - ŒBвекторизовану версію ŒḄ, відому як відмов. Відскік працює за списком до його кінця , а потім назад , x[:-1]+x[::-1]наприклад: bounce("codegolf") == "codegolflogedoc".

-1 байт завдяки Деннісу (використовуйте векторизовану версію відмов)

Як?

;”_⁾ |;ЀŒB;“/___\“ VvV”“  |“ /_\”;Y - argument: a string, S
                        “  |“ /_\”   - the top of the rocket ["  |", " /_\"] 
;”_                                  - concatenate to make S=S+"_"
   ⁾ |;                              - concatenate to make c=" |"+c
       Ѐ                            - map over right argument i.e. for c in S
         ŒB                          - bounce! With vectorisation c[:-1]+c[::-1]
                                       e.g. " |B" -> " |B| "
           ;                         - concatenate with
            “/___\“ VvV”             - the bottom of the rocket ["/___\", " VvV"]
                                  ;  - concatenate the top with everything else
                                   Y - join with line feeds

Перевірте його на TryItOnline

Пайк , 40 37 35 байт

(Оновлено для роботи з останньою версією)

\_+2" ||
"m:"/___\
 VvV"+R"  |
 /_\

Спробуйте тут!

V , 41, 39 байт

ys$_òlé
òÎá|I |
Hr/$r\YO  |GpX2á_o VvV

Спробуйте в Інтернеті!

Зауважте, що чомусь онлайн-перекладач дав несподівані результати, тому я пересунув версію налагодження до інтерпретатора, який працює набагато повільніше. Це має дати правильні результати вже зараз.

Оскільки ця програма містить недруковані символи, ось шістнадцятковий набір:

0000000: 7973 245f f26c e90a f2ce e17c 4920 7c0a  ys$_.l.....|I |.
0000010: 4872 2f24 725c 594f 2020 7c1b 4770 5832  Hr/$r\YO  |.GpX2
0000020: e15f 6f20 5676 56                        ._o VvV

R, 163 байти

v=c();l="\n";for(i in 1:nchar(a<-scan(,"")))v=c(v,paste0(" |",strsplit(a,"")[[1]][i],"|",l,collapse=""));cat("  |",l," /_\\",l,v," |_|",l,"/___\\",l," VvV",sep="")

Безголівки:

v=c()     #Empty vector
l="\n"    #Line break

for(i in 1:nchar(a<-scan(,"")))                  #For the number of character of the input
    v=c(v, paste0(" |",strsplit(a,"")[[1]][i],"|","\n",collapse=""))
    #This part cut the input into its letters, paste each letter between `|`'s, 
    #and a line break

cat("  |",l," /_\\",l,v," |_|",l,"/___\\",l," VvV",sep="") #Puts everything in the STDOUT,
                                                           #with spaces where needed

Мені не дуже подобається те, що я повинен був помістити пробіли в останньому рядку, але ей!

PowerShell v2 +, 59 55 51 байт

"  |
 /_\"
$args|% t*y|%{" |$_|"}
" |_|
/___\
 VvV"

Спробуйте в Інтернеті!

Зловживає за замовчуванням Write-Outputв кінці виконання, щоб приклеїти новий рядок між кожним елементом, оскільки це все просто буквальні рядки на конвеєрі. Єдиний "хитрий" біт - це цикл проходження кожного елемента вхідного сигналу $argsу вигляді char-масиву, щоб отримати тіло ракети.

Використовує буквальні нові рядки, як зазначено ConnorLSW, щоб зберегти деякі байти.
Ще 4 байти завдяки Veskah.

PowerShell, 70 байт

"  |`n /_\`n$(([char[]]$a|%{" |$_|"})-join("`n"))`n |_|`n/___\`n VvV 

Встановіть $ a на вхід.

Якщо він повинен приймати вхід, відмінний від змінної, він може бути записаний:

"Hello World"|%{"  |`n /_\`n$(([char[]]$_|%{" |$_|"})-join("`n"))`n |_|`n/___\`n VvV "}

Приклад:

  |
 /_\
 |H|
 |e|
 |l|
 |l|
 |o|
 | |
 |W|
 |o|
 |r|
 |l|
 |d|
 |_|
/___\
 VvV 

Математика, 50 байт

"  |
 /_\\
 |"<>(#<>"|
 |"&/@#)<>"_|
/___\\
 VvV"&

Анонімна функція. Приймає список символів як вхідний і повертає рядок як вихідний.

PHP, 108 100 88 байт

-8 байт завдяки бізнес-коту

-12 байт завдяки YetiCGN

echo'  | 
 /_\\
';foreach(str_split($argv[1])as$c){echo" |$c|
";}echo' |_|
/___\\
 VvV';

досить прямолінійний

Ідеон

C #, 106 97 80 74 байт

s=>$@"  |
 /_\
 |{string.Join("|\n |",s.ToCharArray())}|
 |_|
/___\
 VvV";

У мене немає C # 6, щоб спробувати вище, але я вважаю, що це спрацює

Збережено 7 байт завдяки Кевіну Крейсейну

Завдяки манатурності за те, що я спрямовував мене в правильному напрямку, щоб заощадити 17 байт

Збережено 6 байт завдяки молоку

C,  131  , 121 байт

#define P printf
main(){char s[99],*p=s;gets(s);P("  |\n /_\\\n");while(*p)P(" |%c|\n",*p++);P(" |_|\n/___\\\n VvV\n");}

Желе, 38 37 байт

;”_“|“|¶”jЀ“  |¶“/_\¶”;K;“/___\¶ VvV

Спробуйте в Інтернеті!

Та сама ідея, що і у моєї відповіді Pyth, але це, ймовірно, може бути гольф.

05AB1E , 50 47 43 37 байт

I'_J"  |
 /_\"svy" |ÿ|"}"/___\
 VvV"»

Спробуйте в Інтернеті!

Збережено 9 байт завдяки Аднану.

Котлін, 68 байт

{"""  |
 /_\${it.replace(Regex("."),"\n |\$0|")}
 |_|
/___\
 VvV"""}

Досить прямо. Використовується багаторядковий рядок і заміна регулярного вираження. Це лямбда з (String)->Stringтипом. Тест:

fun main(args: Array<String>) {
    val function : (String)->String = {"""  |
 /_\${it.replace(Regex("."),"\n |\$0|")}
 |_|
/___\
 VvV"""}
    println(function(" _ _ "))
}

Гема, 50 символів

\A=  |\n\ /_\\\n
?=\ |?|\n
\Z=\ |_|\n/___\\\n\ VvV

Проба зразка:

bash-4.3$ echo -n gema | gema '\A=  |\n\ /_\\\n;?=\ |?|\n;\Z=\ |_|\n/___\\\n\ VvV'
  |
 /_\
 |g|
 |e|
 |m|
 |a|
 |_|
/___\
 VvV

БАШ 84 70

Збережено 14 завдяки маневреності

(cat&&echo _)|sed 's~.~ |&|\n~g;1s~^~  |\n /_\\\n~;$s~$~/___\\\n VvV~'

Більше половини байтів призначені для додавання носа та двигуна.

GolfScript, 61 51 байт

Мій перший гольф-код, я сподіваюся, що це досить добре.

"  |
 /_\\
"\1/.,{" |"\(\"|
"\}\*" |_|
/___\\
 VvV"

Пояснення

"  |\n /_\\\n"   # Push the rocket's head
\                # Swap the head with the user's string
1/               # The string is converted into an array
.,               # Push array length
{" |"\           # Push the rocket's body and swap
(\               # Array's first element cut out
"|\n"\           # Push rocket's body and swap
}\*              # Repeat for array length times
" |_|\n/___\\\n VvV" # Push rocket's bottom

Спробуйте в Інтернеті!

Вим, 41 39 байт

Тут <End>буквально клавіша "Кінець".

i <End>_:s/./ |&|\r/g
/___\
 VvVggxo /_\

Недруковані матеріали так:

i <End>_^O:s/./ |&|\r/g
/___\
 VvV^[ggxo /_\^[

GNU sed , 54 49 48 байт

Це була моя перша відповідь на виклик на цьому сайті. Рішення просте, головним чином друковане, тому я витратив деякий час, переконуючись, що його більше не можна грати в гольф.

s:.:\n |&|:g
s::  |& /_\\&:
a\ |_|\n/___\\\n VvV

Спробуйте в Інтернеті!

Швидкий перемотка вперед через півроку я переписав сценарій, використав трюк для гарної міри і переграв його на 1 байт коротше. Зараз це прогрес!

Пояснення: простір шаблону на кожному кроці згадується для ясності, враховуючи приклад введення "GO"

s:.:\n |&|:g
   # turn each input char into a section of the rocket (\n |G|\n |O|)
s::  |& /_\\&:
   # 's::' is a trick; the search part is actually the one from the previous 's'
   #command, i.e. a char. Only the first char, '\n', the modifier 'g' is not
   #inherited. The replace part is the head of the rocket. (  |\n /_\\n |G|\n |O|)
a\ |_|\n/___\\\n VvV
   # append the tail of the rocket, plus implicit printing at the end

  |
 /_\
 |G|
 |O|
 |_|
/___\
 VvV

Луа, 83 , 92 байти

function f(x)return' |\n /_\\\n'..x:gsub('(.)',' |%1|\n')..' |_|\n/___\\\n VvV'end

print('  |\n /_\\\n'..(arg[1] and arg[1]:gsub('(.)',' |%1|\n') or '')..' |_|\n/___\\\n VvV')