Napisz program lub funkcję, która pobiera łańcuch jednowierszowy. Możesz założyć, że zawiera on tylko ASCII do wydruku . Wydrukuj lub zwróć ciąg rakiety artystycznej ASCII, takiej jak

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

z ciągiem wejściowym zapisanym od góry do dołu na kadłubie. W tym przypadku dane wejściowe były Earth. Wysokość rakiety (łącznie z płomieniami) to zawsze długość sznurka plus pięć.

Każda linia w danych wyjściowych może zawierać do dwóch końcowych spacji i może istnieć jedna opcjonalna końcowa nowa linia. Najkrótszy kod w bajtach wygrywa.

Więcej przykładów:

[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

Tabela liderów

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 bajtów

Instrukcja:

Ustaw arkusz roboczy programu Excel, w którym komórka A1 jest wprowadzana, a kolumna C jako dane wyjściowe. Ustaw wyrównanie tekstu w kolumnie C, aby wyśrodkować . Napisz i uruchom następujący kod w oknie natychmiastowym:

[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

Ungolfed kod:

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

Wynik:

Uwaga: czcionka i kolor to tylko osobisty wybór.

15 bajtów zapisanych dzięki sugestii edc65. Dzięki.

5 bajtów zapisanych dzięki sugestii TaylorScott. Dzięki.

Perl 6, 75 bajtów

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

JavaScript (ES6), 54

Bezpośredni

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

Test

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

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

update()

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

Właściwie 40 bajtów

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

Tak, te nowe linie powinny tam być.

Wypróbuj online!

Wyjaśnienie:

Nowe linie są reprezentowane przez \ndla łatwiejszego formatowania

"/___\\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 bajtów

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

Test główny:

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

Python 2, 93 66 62 61 bajtów

A FGITW. Prawdopodobnie może być mocno golfa. Sugestie mile widziane.

Edycja: 27 bajtów dzięki Mego. 4 bajty dzięki TheBikingViking. 1 bajt dzięki użytkownikowi3030010.

Wypróbuj online!

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

PHP, 73 72 69 62 bajtów

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

Pobiera ciąg do wydrukowania na kadłubie jako pierwszy argument z wiersza poleceń, gdy skrypt jest wywoływany.

Ulepszenia:

1. Zapisano bajt, zastępując \ n prawdziwą nową linią LF w pierwszym argumencie join.
2. Zaoszczędzono jeszcze trzy bajty, dodając podstawę rakiety z jednym podkreśleniem do wejścia
3. Dzięki Ismael Miguel : Oszczędź 7 dodatkowych bajtów, wykorzystując fakt, że PHP było kiedyś „preprocesorem hipertekstu”, dzięki czemu możesz wypisać tyle tekstu, ile chcesz i uruchomić kod gdzieś pośrodku.

Wypróbuj online!

To była zabawa! :-)

Przykładowe połączenia:

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

pieprzenie mózgu , 179 bajtów

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

Wypróbuj online!

Rubin, 57 55 bajtów

-2 bajty według @ValueInk
-5 bajtów, zakładając, że na wejściu nie ma nowej linii, jak sugeruje @manatwork. Wprowadzanie bez wiersza nowego może być dostarczone na przykład za pomocą echo -n, jak echo -n hey | ruby rocket.rb.

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

Rubin, 62 60 bajtów

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

Haskell, 58 bajtów

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

Retina , 44 37 bajtów

7 bajtów dzięki Martinowi Enderowi.

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

Wypróbuj online!

Galaretka , 37 36 bajtów

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

Taki sam wynik jak istniejący wpis, ale wykorzystuje zabawną nową funkcję - ŒBwektoryzowaną wersję ŒḄ, znaną jako bounce. Odbijanie przebiega przez listę do końca, a następnie z powrotem x[:-1]+x[::-1]np .:bounce("codegolf") == "codegolflogedoc" .

-1 bajt dzięki Dennisowi (użyj wektoryzowanej wersji bounce)

W jaki sposób?

;”_⁾ |;ЀŒ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

Przetestuj na TryItOnline

Pyke , 40 37 35 bajtów

(Zaktualizowano do pracy z najnowszą wersją)

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

Wypróbuj tutaj!

V , 41, 39 bajtów

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

Wypróbuj online!

Zauważ, że z jakiegoś powodu tłumacz online generował nieoczekiwane wyniki, więc wypuściłem wersję debugującą do tłumacza online, który działa znacznie wolniej. Powinien teraz dawać prawidłowe wyniki.

Ponieważ ten program zawiera znaki niedrukowalne, oto zrzut heksowy:

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 bajty

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="")

Nie golfowany:

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

Nie podoba mi się fakt, że musiałem wstawić spacje w ostatnim wierszu, ale hej!

PowerShell v2 +, 59 55 51 bajtów

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

Wypróbuj online!

Nadużywa wartości domyślnej Write-Outputna końcu wykonywania, aby wstawić nowy wiersz między każdym elementem, ponieważ wszystkie są po prostu dosłownymi ciągami w potoku. Jedynym „trudnym” bitem jest pętla przechodząca przez każdy element wejścia $argsjako tablica znaków, aby uzyskać korpus rakiety.

Wykorzystuje dosłowne znaki nowej linii, jak wskazał ConnorLSW, aby zapisać niektóre bajty.
-4 dodatkowe bajty dzięki Veskah.

PowerShell, 70 bajtów

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

Ustaw $ a na wejście.

Jeśli musi pobierać dane wejściowe inne niż zmienna, może zostać wpuszczone:

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

Przykład:

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

Mathematica, 50 bajtów

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

Funkcja anonimowa. Pobiera listę znaków jako dane wejściowe i zwraca ciąg znaków jako dane wyjściowe.

PHP, 108 100 88 bajtów

-8 bajtów dzięki business cat

-12 bajtów dzięki YetiCGN

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

całkiem proste

Ideone

C #, 106 97 80 74 bajty

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

Nie mam C # 6, aby wypróbować powyższe, ale wierzę, że to zadziała

Zaoszczędzono 7 bajtów dzięki Kevinowi Cruijssenowi

Dzięki manatwork za skierowanie mnie we właściwym kierunku, aby zaoszczędzić 17 bajtów

Zaoszczędzono 6 bajtów dzięki mleku

C,  131  , 121 bajtów

#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");}

Galaretka, 38 37 bajtów

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

Wypróbuj online!

Taki sam pomysł, jak w przypadku mojej odpowiedzi w języku Pyth, ale prawdopodobnie można to pograć w golfa.

05AB1E , 50 47 43 37 bajtów

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

Wypróbuj online!

Zaoszczędzono 9 bajtów dzięki Adnan.

Kotlin, 68 bajtów

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

Całkiem proste. Używa ciągu wieloliniowego i zastępuje wyrażenie regularne. To jest lambda z (String)->Stringtypem. Test:

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

Gema, 50 znaków

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

Przykładowy przebieg:

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

BASH 84 70

Oszczędność 14 dzięki manatwork

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

Ponad połowa bajtów służy do dodania nosa i silnika.

GolfScript, 61 51 bajtów

Mój pierwszy golf golfowy, mam nadzieję, że jest wystarczająco dobry.

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

Wyjaśnienie

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

Wypróbuj online!

Vim, 41 39 bajtów

Tutaj <End>jest dosłownie klawisz „End”.

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

Nie można drukować, więc:

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

GNU sed , 54 49 48 bajtów

To była moja pierwsza odpowiedź na wyzwanie na tej stronie. Rozwiązanie jest proste, głównie drukowanie, więc spędziłem trochę czasu, upewniając się, że nie można go już grać w golfa.

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

Wypróbuj online!

Pół roku później szybko przepisałem skrypt, dla pewności wykorzystałem sztuczkę i grałem w golfa o 1 bajt krócej. To jest postęp!

Objaśnienie: przestrzeń wzoru na każdym kroku jest wymieniona dla jasności, biorąc pod uwagę przykład wejściowy „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

Lua, 83 , 92 bajty

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')