Code Johnny Code, Code!

Question

Rock-and-roll founding father Chuck Berry sadly passed away today.

Consider the chorus of his famous song "Johnny B. Goode":

Go, go
Go Johnny go, go
Go Johnny go, go
Go Johnny go, go
Go Johnny go, go
Johnny B. Goode

^{(There are other ways it has been punctuated but the above will serve for the purposes of the challenge.)}

Challenge

Given a nonempty, lowercase string of letters a-z, output the chorus of "Johnny B. Goode" with all the instances of Go or go replaced with the input string, capitalized in the same way.

A trailing newline may optionally follow. Nothing else in the chorus should change.

For example, if the input is code the output must be exactly
Code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Johnny B. Codeode
optionally followed by a newline.

Note that the capitalization of all words matches the original chorus, and (despite lack of rhythm) the Go in Goode is replaced as well as the individual words Go and go.

The shortest code in bytes wins.

Test Cases

"input"
output

"go"
Go, go
Go Johnny go, go
Go Johnny go, go
Go Johnny go, go
Go Johnny go, go
Johnny B. Goode

"code"
Code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Johnny B. Codeode

"a"
A, a
A Johnny a, a
A Johnny a, a
A Johnny a, a
A Johnny a, a
Johnny B. Aode

"johnny"
Johnny, johnny
Johnny Johnny johnny, johnny
Johnny Johnny johnny, johnny
Johnny Johnny johnny, johnny
Johnny Johnny johnny, johnny
Johnny B. Johnnyode

"fantastic"
Fantastic, fantastic
Fantastic Johnny fantastic, fantastic
Fantastic Johnny fantastic, fantastic
Fantastic Johnny fantastic, fantastic
Fantastic Johnny fantastic, fantastic
Johnny B. Fantasticode

Let's just observe a minute or two of silence, and wish Rest In Peace to Chuck. — Erik the Outgolfer, Mar 19, 2017 at 19:51
The code text sounds best when spoken by Google Translator in Spanish: translate.google.com/#es/en/… — palsch, Mar 22, 2017 at 18:33

Oliver · Accepted Answer · 2017-03-22 20:31:00Z

1

Japt, 62 53 bytes

[1S]+U+R+`1 20, 0
`²²+`2B. 1o¸` d0U1Ug u +UÅ2"Johnny

Try it online!

62-byte solution using a substantially different technique:

Saved 3 bytes thanks to ETHproductions

W=Ug u +UÅ)+", {U}
"+`{W} Johnny {U}, {U}
`²²+`Johnny B. {W}o¸

Try it online!

edited Mar 22, 2017 at 20:31

answered Mar 20, 2017 at 14:54

Oliver

7,8422 gold badges17 silver badges37 bronze badges

Add a comment |

Stephen · Accepted Answer · 2017-03-23 15:06:30Z

Swift, 151 144 bytes

import Foundation
func b(a:String){let u=a.capitalized;print(u+", "+a);for _ in 0..<4{print(u+" Johnny "+a+", "+a)};print("Johnny B. "+u+"ode")}

Previous Version:

import Foundation
func b(s:String){let u=s.capitalized;print("\(u), \(s)");for _ in 0..<4{print("\(u) Johnny \(s), \(s)")};print("Johnny B. \(u)ode");}

Ungolfed:

import Foundation
func beGoode(inputString: String) {
        let capitalizedString = inputString.capitalized
        print("\(capitalizedString), \(inputString)")
        for _ in 0..<4 {
            print("\(capitalizedString) Johnny \(inputString), \(inputString)")
        }
        print("Johnny B. \(capitalizedString)ode")
    }

Example:

b(s: "code")

Code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Code Johnny code, code
Johnny B. Codeode

Edit: Golfed down 6 bytes by using string concatenation instead of interpolation. Down 1 byte more by removing final semi-colon.

\$\begingroup\$ Welcome to the site! \$\endgroup\$
– DJMcMayhem
Mar 23, 2017 at 14:48 — DJMcMayhem, Mar 23, 2017 at 14:48
\$\begingroup\$ Thanks! I thought I'd finally try my hand at a solution. \$\endgroup\$
– Stephen
Mar 23, 2017 at 14:56 — Stephen, Mar 23, 2017 at 14:56

weston · Accepted Answer · 2017-05-18 02:30:32Z

1

Kotlin, 112, 99 Bytes

fun g(s:String)=s.capitalize().let{"$it, $s\n${"$it Johnny $s, $s\n".repeat(4)}Johnny B. ${it}ode"}

Ungolfed:

fun g(s: String) = s
        .capitalize()
        .let {
            "$it, $s\n${"$it Johnny $s, $s\n".repeat(4)}Johnny B. ${it}ode"
        }

edited May 18, 2017 at 2:30

answered Mar 19, 2017 at 20:49

weston

3711 silver badge9 bronze badges

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

1

PHP, 84 83 bytes

Good Bye, Chuck!

<?=strtr(str_pad("1, 0",41,"
1 2 0, 0")."2 B. 1ode",[$argn,ucfirst($argn),Johnny]);

or

<?=strtr(str_pad("1,0",32,"
1 20,0")."2 B. 1ode",[" $argn",ucfirst($argn),Johnny]);

Run with echo '<input>' | php -nF <filename> or try them online.

edited Jun 17, 2020 at 9:04

CommunityBot

1

answered Mar 28, 2018 at 17:50

Titus

14.6k1 gold badge23 silver badges41 bronze badges

Add a comment |

agc · Accepted Answer · 2018-09-08 01:12:25Z

1

Bash, 72 bytes

(modified version of R. Kapp's answer):

M=hnny;echo -e ${1^}, $1 ${M//?/\\n${1^} Jo$M $1, $1}\\nJo$M B. ${1^}ode

Try it online!

edited Sep 8, 2018 at 1:12

answered Mar 20, 2017 at 15:03

agc

1517 bronze badges

Add a comment |

Daniel Plainview · Accepted Answer · 2017-03-20 18:51:39Z

0

Q, 97 bytes

{u:(upper x[0]),1_x;u,", ",x,"\n",((,/)4#enlist u," Johnny ",x,", ",x,"\n"),"Johnny B. ",u,"ode"}

Assuming input "go".

Defines uppercase input as variable u.
Merges u with input x to generate first line, "Go, go".
Copies body, "Go Johnny go, go", four times.
Merges with final line, "Johnny B. Goode".

answered Mar 20, 2017 at 18:51

Daniel Plainview

212 bronze badges

Add a comment |

Renzo · Accepted Answer · 2017-07-06 21:22:44Z

0

Common Lisp, 107 bytes

(apply'format t"~:(~A~), ~a~%~4@{~:(~A~) Johnny ~a, ~a ~%~}Johnny G. ~:(~A~)ode"(fill(make-list 15)(read)))

Try it online!

answered Jul 6, 2017 at 21:22

Renzo

2,56812 silver badges22 bronze badges

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

0

Japt, 52 bytes

[V=UhUg u)',SUR[VSW="Johnny "U',SUR]¬²²W`B. {V}o¸`]¬

Try it

edited Jun 17, 2020 at 9:04

CommunityBot

1

answered Feb 16, 2018 at 13:31

Shaggy

41.6k4 gold badges34 silver badges92 bronze badges

Add a comment |

gastropner · Accepted Answer · 2018-02-17 10:18:33Z

0

C (gcc), 110 bytes

n;f(char*s){for(n=6;n--;)printf(n?n^5?"%c%s Johnny %s, %s\n":"%c%s, %s\n":"Johnny B. %c%sode",*s-32,s+1,s,s);}

Try it online!

answered Feb 17, 2018 at 10:18

gastropner

4,3431 gold badge14 silver badges20 bronze badges

Add a comment |

Wernisch · Accepted Answer · 2018-03-28 11:11:45Z

0

Excel, 103 bytes

-8 bytes saved by using # and ~ instead of Go and go

=SUBSTITUTE(SUBSTITUTE("#, ~
"&REPT("# Johnny ~, ~
",4)&"Johnny B. #ode","#",PROPER(A1)),"~",LOWER(A1))

answered Mar 28, 2018 at 11:11

Wernisch

3,0249 silver badges22 bronze badges

Add a comment |

dzaima · Accepted Answer · 2018-03-30 16:47:35Z

0

SOGL V0.12, 38 bytes

,1Ƨ, Ο,@+"9:█ŗ‘⁽:A+⁴+:³a,⁽"B. ŗode”+⁰⁽

Try it Here!

answered Mar 30, 2018 at 16:47

dzaima

20.2k2 gold badges40 silver badges75 bronze badges

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

0

Pyth, 69 67 bytes

.F++"{0}, {1}\n"*"{0} {2} {1}, {1}\n"4"{2} B. {0}ode"[rz4rz0"Johnny

Try it here!

Python 3 translation:

z=input()
print(("{0}, {1}\n"+"{0} {2} {1}, {1}\n"*4+"{2} B. {0}ode").format(z.capitalize(),z.lower(),"Johnny"))

edited Jun 17, 2020 at 9:04

CommunityBot

1

answered Mar 28, 2018 at 15:54

hakr14

4,9641 gold badge10 silver badges18 bronze badges

Add a comment |

recursive · Accepted Answer · 2018-04-04 17:56:43Z

Stax, 34 bytes

₧:hç╟╫9↓Σl(Ü°╤`╨+B╥¢└ÇI╩4╢YP-├Γ■fl

Run and debug it

Unpacked, ungolfed, and commnted, it looks like this.

:.X         title case input and store in x register        e.g. "Code"
., +        concat ", "                                     e.g. "Code, "
y+Q         concat input and print without popping          e.g. "Code, code"
x`?*u)U"`+  concat " Johnny " to x                          e.g. "Code, code" "Code Johnny "
sv+         swap top of stack, lowercase, concat            e.g. "Code Johnny code, code"
QQQQ        print 4 times without popping                   e.g. "Code Johnny code, code"
j1@p        split, print the second word without newline    e.g. "Johnny"
" B. `xode  output string template with x register embedded e.g. " B. Codeode"

Run this one

Quantum64 · Accepted Answer · 2018-04-05 08:11:24Z

Jstx, 52 bytes

₧&Eu◄, :;4♦/u♂ Johnny♀:◄, :;► :;41u☼◘~ΘåÆëë╟┌°;♫☺åΘ:

Try it online!

Explanation

₧&          # Push literal 100
E           # Push the second stack value the absolute value of the first stack value times.
u           # Push the first stack value transformed to Title Case.
◄,          # Push literal , 
:           # Push the sum of the second and first stack values.
;           # Push the difference of the second and first stack values.
4           # Print the first stack value, then a newline.
♦           # Push literal 4
/           # Enter an iteration block over the first stack value.
u           # Push the first stack value transformed to Title Case.
♂ Johnny♀   # Push literal  Johnny
:           # Push the sum of the second and first stack values.
◄,          # Push literal , 
:           # Push the sum of the second and first stack values.
;           # Push the difference of the second and first stack values.
►           # Push literal  
:           # Push the sum of the second and first stack values.
;           # Push the difference of the second and first stack values.
4           # Print the first stack value, then a newline.
1           # End an iteration block.
u           # Push the first stack value transformed to Title Case.
☼◘~ΘåÆëë╟┌° # Push literal Johnny B. 
;           # Push the difference of the second and first stack values.
♫☺åΘ        # Push literal ode
:           # Push the sum of the second and first stack values.

Community · Accepted Answer · 2020-06-17 09:04:33Z

0

Python 2, 156 bytes

#coding:UTF-8
import sys;a="þ, ÿ"+("\nþ Johnny ÿ, ÿ"*4)+"\nJohnny B. þode";print a.replace("þ",sys.argv[1].title()).replace("ÿ",sys.argv[1].lower())

De-golfed:

#coding:UTF-8
import sys
a = "þ, ÿ" + ("\nþ Johnny ÿ, ÿ" * 4) + "\nJohnny B. þode"
b = a.replace("þ", sys.argv[1].title())
c = b.replace("ÿ", sys.argv[1].lower())
print c

Works as long as input doesn't contain the character ÿ, but passes all test cases.

Bytes counted by this byte counter.

edited Jun 17, 2020 at 9:04

CommunityBot

1

answered Apr 5, 2018 at 9:59

NMorris

11 bronze badge

1

\$\begingroup\$ Welcome to the site! \$\endgroup\$
– caird coinheringaahin g ♦
Apr 5, 2018 at 10:08

Add a comment |

Stack Exchange Network

Code Johnny Code, Code!

Challenge

Test Cases

45 Answers 45

Japt, 62 53 bytes

Swift, 151 144 bytes

Kotlin, 112, 99 Bytes

PHP, 84 83 bytes

Bash, 72 bytes

Q, 97 bytes

Common Lisp, 107 bytes

Japt, 52 bytes

C (gcc), 110 bytes

Excel, 103 bytes

SOGL V0.12, 38 bytes

Pyth, 69 67 bytes

Stax, 34 bytes

Jstx, 52 bytes

Python 2, 156 bytes

Your Answer

Not the answer you're looking for? Browse other questions tagged
code-golf
string
or ask your own question.

Linked

Hot Network Questions

Code Johnny Code, Code!

Challenge

Test Cases

45 Answers 45

Japt, 62 53 bytes

Swift, 151 144 bytes

Kotlin, 112, 99 Bytes

PHP, 84 83 bytes

Bash, 72 bytes

Q, 97 bytes

Common Lisp, 107 bytes

Japt, 52 bytes

C (gcc), 110 bytes

Excel, 103 bytes

SOGL V0.12, 38 bytes

Pyth, 69 67 bytes

Stax, 34 bytes

Jstx, 52 bytes

Python 2, 156 bytes

Your Answer

Sign up or log in

Post as a guest

Not the answer you're looking for? Browse other questions tagged code-golfstring or ask your own question.

Linked

Related

Hot Network Questions

Not the answer you're looking for? Browse other questions tagged
code-golf
string
or ask your own question.