Semua orang mungkin akrab dengan lagu berikut , yang merupakan babak musikal :

Latar Belakang

Lebih sedikit orang mungkin ingat mencoba menyanyikan versi 4-orang ini dengan beberapa teman dan gagal. Mengimbangi lirik lagu dengan nada harmonis yang berbeda dikenal sebagai menyanyikan "putaran" dan itulah yang akan kita simulasikan hari ini menggunakan output statis. Berikut adalah contoh seseorang yang benar-benar melakukan karya tersebut (tautan ke audio / video, akan bersuara) .

Tantangan

Tantangan ini adalah untuk menampilkan teks sebagai berikut persis seperti berikut:

Row, row, row your boat,           |-----------------------------------|-----------------------------------|-----------------------------------
Gently down the stream.            |Row, row, row your boat,           |-----------------------------------|-----------------------------------
Merrily, merrily, merrily, merrily,|Gently down the stream.            |Row, row, row your boat,           |-----------------------------------
Life is but a dream.               |Merrily, merrily, merrily, merrily,|Gently down the stream.            |Row, row, row your boat,           
-----------------------------------|Life is but a dream.               |Merrily, merrily, merrily, merrily,|Gently down the stream.            
-----------------------------------|-----------------------------------|Life is but a dream.               |Merrily, merrily, merrily, merrily,
-----------------------------------|-----------------------------------|-----------------------------------|Life is but a dream.               

Aturan

• Trailing whitespace dapat diterima, tetapi tidak wajib, ini termasuk baris baru.
• Tanda hubung dan bilah adalah bagian dari output yang diperlukan, ya.
• Diperlukan koma, titik, huruf besar, dan semua elemen sintaksis terkait tata bahasa.

Ini adalah kode-golf , kode byte-hitung terendah tanpa menggunakan celah standar adalah pemenangnya.

05AB1E , 80 77 byte

“¢ã,¢ã,¢ã€žžÄ,““èî„‹€€šæ.“"merrily, "4ר“‚쀈€³€…žâ.“'-35×Ð)€ª.B3FDÁ})øvy'|ý,

Cobalah online!

Bekerja dalam proses.

V , 139 , 128 byte

iLife is but a dream ±µ |4amerrily, x7b~A|Gently down the stream.±² |3arow, X5b~Ayour boat,±± |3I³µ-|3AòÄó.û-}|ò5DÎ4f|C|

Satu garis! (sortof: P)

Cobalah online!

Hexdump:

00000000: 694c 6966 6520 6973 2062 7574 2061 2064  iLife is but a d
00000010: 7265 616d 20b1 b520 7c1b 3461 6d65 7272  ream .. |.4amerr
00000020: 696c 792c 201b 7837 627e 417c 4765 6e74  ily, .x7b~A|Gent
00000030: 6c79 2064 6f77 6e20 7468 6520 7374 7265  ly down the stre
00000040: 616d 2eb1 b220 7c1b 3361 726f 772c 201b  am... |.3arow, .
00000050: 5835 627e 4179 6f75 7220 626f 6174 2cb1  X5b~Ayour boat,.
00000060: b120 7c1b 3349 b3b5 2d7c 1b33 4101 1bf2  . |.3I..-|.3A...
00000070: c4f3 2efb 2d7d 7cf2 3544 ce34 667c 437c  ....-}|.5D.4f|C|

Apakah saya mendapatkan poin bonus untuk pendaratan tepat 2^7?

Butuh beberapa saat untuk mencari tahu. Saya berharap saya bisa bermain golf seperti jawaban seni ASCII keyboard saya, tapi saya tidak yakin. Kita lihat saja nanti. Mereka adalah tantangan yang sangat mirip (dan keduanya sangat menyenangkan: D)

Awalnya saya mencoba ini (180):

3irow, ch your boat,±± ||"rCLife is but a dream.±µ ||"lD4imerrily, r||"mCGently down the stream.±² ||"gC³µ-|B"dCR³D
GRDD
MGRD
LMGR
DLMG
DDLM
³DLÍR/r
ÍG/g
ÍM/m
ÍL/l
ÍD/d

Cobalah online!

Yang menyisipkan ini:

RDDD
GRDD
MGRD
LMGR
DLMG
DDLM
DDDL

dan kemudian melakukan substitusi untuk memperluasnya. Tetapi membangunnya sebagai seni- gaya jauh lebih pendek (dan TBH lebih menyenangkan)

Batch, 292 288 275 byte

@set d=-------
@set "d=%d%%d%%d%%d%%d%^|
@set "m=M_ m_ m_ m_^|
@set "s=           ^|
@set "s=Life is but a dream.    %s%%m:_=errily,%Gently down the stream. %s%Row, row, row your boat,%s%%d%%d%%d%"
@for /l %%i in (1,1,6)do @call:c
:c
@echo %s:~111,146%
@set "s=%d%%s%

Sunting: Disimpan 13 byte dengan menulis ulang kode untuk menggunakan versi trik substring yang saya gunakan dalam jawaban Retina saya. Mudah saya dapat mengulang enam kali dan kemudian jatuh untuk iterasi ketujuh dari loop body, yang berarti kutipan yang diperlukan untuk output |tidak terlalu berat, namun saya harus berhati-hati untuk memperhitungkan nilai ^ketika memilih substring .

Python 3, 252 235 208 206 205 byte

Baiklah baiklah. Inilah jawaban yang tidak terlalu membosankan:

w=' '*11
t=["Row, row, row your boat,"+w,"Gently down the stream. "+w,"Merrily,"+" merrily,"*3,"Life is but a dream.    "+w,*['-'*35]*3]
for a in zip(*[t[z:]+t[:z]for z in range(7,3,-1)]):print(*a,sep='|')

Jawaban lama, 252 byte:

Jawaban membosankan, dan jawaban Python lainnya lebih pendek, tapi saya pikir saya akan mencoba jika pendekatan ini lebih pendek. Python 3 meskipun penghematan dalam byte / string 2-3 perbedaan karena keduanya gzipdan base64lebih shittier di Python 2.

from base64 import*
from gzip import*
print(decompress(b85decode('ABzY8Fgf~I0{;ujFV|5hf)Waq`K3h)N%@H-ItmC-qe~c2OAVKMYF<fBr9w)6d7eT^Myf(_Nl|KIuATz2dxGfaW-i~<qN2>4N*#q<oQxVex|z!-Gc8pivsfXiv_v6MAqB%CkU6w=GZ!&|OJj#}Q7chW$(>wu%p_Rd3;?AKH=M}>000')).decode())

PowerShell , 224 207 202 byte

$a=' '*11;0..6|%{((0..4+4+4)[($_,($_+=6),--$_,--$_|%{$_%7})]|%{("Row, row, row your boat,$a","Gently down the stream.$a ","Merrily,$(' merrily,'*3)","Life is but a dream.$a    ",('-'*35))[$_]})-join'|'}

Cobalah online! (output dibungkus jika layar Anda tidak cukup lebar)

Astaga, pembuatan array ini jelek, tetapi menghemat 17 byte, jadi ...

0..6|%{((0..4+4+4)[($_,($_+=6),--$_,--$_|%{$_%7})]

Kami beralih dari 0ke 6. Setiap iterasi, kami mengindeks ke dalam array (0,1,2,3,4,4,4). Pengindeksan didasarkan pada digit saat ini +6, digit saat ini , itu -1, dan kemudian itu -1 . Masing-masing mereka kemudian makan melalui loop di mana kita modulo dengan %7. Sebagai contoh, jika kita berada di loop 0luar 0..6, maka ini akan menjadi 0,6,5,4, maka masing-masing %7, jadi 0,6,5,4. Itu diindeks ke dalam (0,1,2,3,4,4,4)array, jadi hasilnya 0,4,4,4. Untuk input 1kita dapatkan 1,7,6,5kemudian 1,0,6,5yang menghasilkan 1,0,4,4. Dan seterusnya. (Hal-hal akan jauh lebih mudah jika kita memiliki .clampfungsi)

Itu adalah meludah satu per satu menjadi satu lingkaran |%{}. Setiap iterasi, kami indeks ke tempat yang tepat di larik-lirik-lagu, dan meninggalkan string itu di pipeline. String-string tersebut kemudian -joindiedit bersama |untuk memformat garis output. String-string tersebut ditinggalkan di jalur pipa dan hasilnya tersirat.

Menyimpan beberapa byte berkat Value Ink.

JavaScript (ES8), 285 256 240 231 229 217 214 213 211 210 byte

_=>"0444104421043210432144324443".replace(/./g,(x,y)=>a[x].padEnd(35)+`
|||`[++y&3],a=["Row, row, row your boat,","Gently down the stream.","Merrily,"+(m=" merrily,")+m+m,"Life is but a dream.","-".repeat(35)])

Menyimpan beberapa byte dengan meminjam trik dari jawaban Arnauld

Cobalah

f=

_=>"0444104421043210432144324443".replace(/./g,(x,y)=>a[x].padEnd(35)+`
|||`[++y&3],a=["Row, row, row your boat,","Gently down the stream.","Merrily,"+(m=" merrily,")+m+m,"Life is but a dream.","-".repeat(35)])

o.innerText=f()

<pre id=o>

PHP, 191 Bytes

for(;$n<7;$n++)for($m=0;$m<4;)echo $m?"|":"\n",str_pad($i=["Row, row, row your boat,","Gently down the stream.",M.($t="errily,")." m$t m$t m$t","Life is but a dream."][$n-$m++],35," -"[!$i]);

Cobalah online!

Diperluas

for(;$n<7;$n++)
  for($m=0;$m<4;)
    echo $m?"|":"\n"
     ,str_pad($i=["Row, row, row your boat,","Gently down the stream."
       ,M.($t="errily,")." m$t m$t m$t","Life is but a dream."][$n-$m++]
       ,35," -"[!$i]);

Python 2 , 199 byte

w=' '
s=['-'*35]
t=['Row, row, row your boat,'+w*11,'Gently down the stream.'+w*12,'Merrily,'+' merrily,'*3,'Life is but a dream.'+w*15]
print'\n'.join(map('|'.join,zip(t+s*3,s+t+s+s,s+s+t+s,s*3+t)))

Cobalah online!

Terima kasih kepada @mathjunkie karena telah menghemat 14 byte

CJam , 128 122 byte

"Row, row, row your boat,""gently down the stream."'M" merrily,"4*2>+"Life is but a dream."'-35*__]{35Se]}%a4*4,.m>z'|f*N*

Cobalah online!

Penjelasan

"Row, row, row your boat,"  e# Push this string.
"gently down the stream."   e# Push this string.
'M                          e# Push the character 'M'.
" merrily,"4*               e# Push the string " merrily, merrily, merrily, merrily,".
2>+                         e# Remove the first two letters of it, and append it to 'M',
                            e#   fixing the capitalization.
"Life is but a dream."      e# Push this string.
'-35*__                     e# Push a string containing 35 hyphens and make two copies of it.
]                           e# Collect all these strings in an array.
{35Se]}%                    e# Pad each of them to length 35 by adding spaces to the right.
a4*                         e# Repeat the array 4 times.
4,                          e# The range [0 1 2 3].
.m>                         e# Rotate each subarray of strings rightward by the corresponding
                            e#   number in the range.
z                           e# Transpose the array.
'|f*                        e# Join the strings on each row with '|' characters.
N*                          e# Join the rows together with newlines.

SOGL , 83 byte

┌׀0ρMVxDrž|⁷ΨB≈π93|↑D~Νķ‰¤t╤▼ΣΗ⁶⅔¾№⁷Ζ÷│²╥Ν9°‘-”)0ΔH«‘4*jŗ"ΣΨ¬¹‘4*;+7{’⁄{»}⁽:’∞n1wpX

Bagian 1 ┌׀0ρMVxDrž|⁷ΨB≈π93|↑D~Νķ‰¤t╤▼ΣΗ⁶⅔¾№⁷Ζ÷│²╥Ν9°‘adalah string terkompresi yang menghasilkan

`life is but a dream.               |-|gently down the stream.            |row, row, row your boat,           |`

Ini adalah garis yang dibalik (karena ini mencetaknya baris demi baris), dengan bagian "riang" dipotong untuk diganti dalam program.
Sisa program:

...‘                                        Push the compressed string
      )0ΔH«‘                                push "merrily, "
            4*                              repeat it 4 times
              j                             take the last letter off
    -”         ŗ                            replace "-" with the merrily line
                "ΣΨ¬¹‘                      push 35 dashes with an appending "|"
                      4*                    repeat it 4 times
                        ;+                  add inverted ("---|---..."+"Life is but a dream  ...")
                                            The resulting string of above is "-----------------------------------|-----------------------------------|-----------------------------------|-----------------------------------|life is but a dream.               |merrily, merrily, merrily, merrily,|gently down the stream.            |row, row, row your boat,           |"
                          7{                repeat 7 times
                            ’⁄{»}            rotate right 35 times
                                 ⁽           uppercase the 1st letter
                                  :          duplicate
                                   ’∞n       split into parts of length 135
                                      1w     get the 1st one
                                        p    output that
                                         X   delete the splat array

/// , 200 byte

/_/     //&/errily,//*/ m&//+/-------//@/Row, row, row your boat, __//#/Gently down the stream.  __//$/M&***//%/Life is but a dream.___//~/+++++/@|~|~|~
#|@|~|~
$|#|@|~
%|$|#|@
~|%|$|#
~|~|%|$
~|~|~|%

Cobalah online!

Sederhana, menggunakan kejadian umum sebagai pengganti.

PHP, 179 byte:

for($m="errily,";$i<28;)echo str_pad($s=["Row, row, row your boat,","Gently down the stream.","M$m m$m m$m m$m","Life is but a dream."][($i>>2)-$i%4],35," -"[!$s]),"
|||"[++$i%4];

ungolfed

for($i=0;$i<28;$i++)
{
    $x=$i%4;
    $y=$i>>2;

    $s=["Row, row, row your boat,",
        "Gently down the stream.",
        M.($m="errily,")." m$m m$m m$m",
        "Life is but a dream."
    ][$y-$x];

    $pad_string = $s ? " ":"-";
    $postfix = $x<3 ? "|" : "\n";
    echo str_pad($s,35,$pad_string),$postfix;
}

JavaScript (ECMAScript 2017), 191 187 182 byte

Disimpan 3 byte berkat Shaggy

f=(i=27,s=['Life is but a dream.','Merrily,'+(m=' merrily,')+m+m,'Gently down the stream.','Row, row, row your boat,'][(i>>2)-i%4]||'')=>i?s.padEnd(35,' -'[+!s])+`
|||`[i&3]+f(i-1):s

o.innerHTML = f();

<pre id=o style="font-size:10px"></pre>

Microsoft Sql Server, 421 byte

with v as(select left(s+space(35),35)s,n from(values('Row, row, row your boat,',1),('Gently down the stream.',2),('Merrily, merrily, merrily, merrily,',3),('Life is but a dream.',4))t(s,n))select isnull(v.s,s.s)+'|'+isnull(b.s,s.s)+'|'+isnull(c.s,s.s)+'|'+isnull(d.s,s.s)from v full join v b on v.n=b.n+1 full join v c on b.n=c.n+1 full join v d on c.n=d.n+1 cross apply(select replicate('-',35)s)s order by isnull(v.n,9)

Periksa secara Online

C (GCC), 231 230 byte

-1 byte berkat ceilingcat!

#define m"errily, "
char s[7][35]={"Life is but a dream.","M"m"m"m"m"m"m"m,"Gently down the stream.","Row, row, row your boat,"};f(l,c){memset(s[4],45,'k');for(l=7;l--;)for(c=0;c<4;)printf("%-35.35s%c",s[(4+l+c++)%7],"|||\n"[c]);}

Cukup mudah. Pertama itu membangun 7 baris string array, bagian melalui makro untuk memfaktorkan keluar bagian "riang", maka garis-garis garis diisi denganmemset . Kemudian garis-garis dicetak dengan offset dan separator yang memadai.

Cobalah online!

MATLAB, 280 byte

a='errily,';
z={'Row, row, row your boat,';'Gently down the stream.';['M',a,' m',a,' m',a,' m',a];'Life is but a dream.'};
z{5}(1:35)='-';
y=5*ones(7,4);
for j=1:4;z{j}(end+1:35)=' ';y(j:j+3,j)=(1:4)';end
x=z(y);
for j=1:7;fprintf('%s|%s|%s|%s\n',x{j,1},x{j,2},x{j,3},x{j,4});end

Pengindeksan array sel cukup mahal, yang sepertinya merupakan tempat termudah untuk membuang beberapa byte (jika mungkin).

Retina , 153 150 byte

<-|>Life is but a dream.15|M!< m!>|Gently down the stream.12|Row, row, row your boat,11<|->
<(.*?)>
$1$1$1
!
errily,
-
35$*-
\d+
$* 
r!&`.{71}\|.{71}

Cobalah online!

Saya mencoba encoding sewenang-wenang sewenang-wenang tetapi $1$*$2tidak melakukan apa yang saya inginkan dan mengulangi string terbukti terlalu rumit. Sunting: Disimpan 2 byte dengan pengodean errily,dan 1 byte dengan menghapus yang tidak perlu ^.

Python 2, 225 Bytes

w=[["-"*35]*7for _ in[0]*4]
for i in [0]*4:w[i][i:i+4]=[a.ljust(35)for a in["Row, row, row your boat,","Gently down the stream.","Merrily,"+" merrily,"*3,"Life is but a dream."]]
print "\n".join(["|".join(i)for i in zip(*w)])

Cobalah online!

Perl 5 , 215 byte

$m='merrily,';$s=' 'x11;$l='-'x35;
@t=@s=("Row, row, row your boat,$s","Gently down the stream. $s",
       "\u$m $m $m $m","Life is but a dream.    $s",$l,$l,$l);
map{$i--;map$t[$_].="|".$s[$i++%7],0..6}1..3;print"$_\n"for@t

Cobalah online!

Swift , 416 406 405 380 372 307 byte

var f=String.init(repeating:count:);_={[[0,4,4,4],[1,0,4,4],[2,1,0,4],[3,2,1,0],[4,3,2,1],[4,4,3,2],[4,4,4,3]].forEach{print($0.map{["Row, row, row your boat,"+f(" ",11),"Gently down the stream."+f(" ",12),"Merrily,"+f(" merrily,",3),"Life is but a dream."+f(" ",15),f("-",35)][$0]}.joined(separator:"|"))}}

Kamu bisa mencobanya sini .

Terima kasih untuk @Mr. Xcoder untuk menyelamatkan saya 65 byte!

T-SQL, 296 277 276 byte

PRINT REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE(REPLACE('1|0|0|0
2|1|0|0
3|2|1|0
4|3|2|1
0|4|3|2
0|0|4|3
0|0|0|4',0,REPLICATE('-',35))
        ,1,'Row, row, row your boat,6')
        ,2,'Gently down the stream. 6')
        ,3,'M5 m5 m5 m5')
        ,4,'Life is but a dream.    6')
        ,5,'errily,')
        ,6,SPACE(11))

Jeda baris di awal adalah bagian dari string asli, jeda baris di dekat akhir hanya untuk tujuan tampilan, dan tidak dihitung terhadap total byte.

Terinspirasi sebagian besar oleh jawaban Conrade SparklePony . Teknik yang berbeda dari jawaban SQL Andrei Odegov .

Multi-penggantian yang cukup mudah, tetapi beberapa hal yang membantu menghemat byte:

• SQL memungkinkan jeda baris dalam string asli
• Menggunakan angka alih-alih karakter memungkinkan saya untuk menghilangkan sejumlah tanda kutip tunggal
• Penggantian tersarang (5 dan 6), selamatkan saya lebih banyak byte (terima kasih, @ t-clausen.dk)

Kalau saja saya bisa REPLACEsemua REPLACEdengan sesuatu yang lebih pendek. Hmm ....

Japt -R , 99 95 94 92 90 89 87 byte

R³i`Life  ¿t a Ým.
M{34î`Îk, m`}
Gt§ ܵ e Ðpam.
Row, w, w yr ¾,`ú)·ú-
£éY Ťq|

Cobalah

R³i`L...{34î`...`}...,`ú)·ú-
R                                :Newline
 ³                               :Repeat 3 times
  i                              :Prepend
   `                             :  Decompress
    L...                         :    "Life is but a dream.\nM"
        {                        :    Interpolate
         34î                     :      Repeat & slice to length 34
            `...`                :        The compressed string "errily, m"
                 }               :    End interpolation
                  ...,           :    "\nGently down the stream.\nRow, row, row your boat,"
                      `          :  End decompression
                       ú         :  Right pad each line with spaces to the length of the longest
                        )        :End prepend
                         ·       :Split on newlines
                          ú-     :Right pad each element with "-" to the length of the longest
£éY Ťq|                         :Assign the above to U
£                                :Map each element at 0-based index Y
 éY                              :  Rotate U right Y times
    Å                            :  Slice off the first element
     ¤                           :  Slice off the first two elements
      q|                         :  Join with "|"
                                 :Implicit output, joined with newlines

Ruby, 162 byte

7.times{|i|puts (~i..~i+3).map{|j|[*[?-*35]*3,"Life is but a dream.",?M+['errily,']*4*" m","Gently down the stream.","Row, row, row your boat,"][j].ljust(35)}*?|}

Java, 295 byte / 272 259 byte

dengan baris baru setiap 4 kolom (295b)

void r(){String m=" merrily,",t="-------",s="     ",e=t+t+t+t+t;String[]v={"Gently down the stream.  "+s+s, "Merrily,"+m+m+m, "Life is but a dream."+s+s+s, e, e, e, "Row, row, row your boat, "+s+s};for(int i=0;i<7;i++){for(int j=6+i;j>2+i;j--)System.out.print(v[j%7]+'|');System.out.println();}}

Cobalah secara Online

tidak ada versi baris baru (259b):

void r(){String m=" merrily,",t="-------",s="     ",e=t+t+t+t+t;String[]v={"Gently down the stream.  "+s+s, "Merrily,"+m+m+m, "Life is but a dream."+s+s+s, e, e, e, "Row, row, row your boat, "+s+s};for(int i=0;i<28;i++)System.out.print(v[(6-i%4+i/4)%7]+'|');}

• 2 terkondensasi untuk loop menjadi 1

Cobalah secara Online

Japt , 158 157 byte

='|L=`Row, žw, žw yŒr ¾…,`+Sp11 +UV=`Gt§ ܵ e Ðpam.`+S³²²+UW=`M€Îk,`+` ´rÎk,`³+UJ=W+VX=`Life ‰ ¿t a Ý„m.`+Sp15 +UZ='-p35 +U[LZ³RVLZ²RJLZRXJLRZXJRZ²XWRZ³X]q

Cobalah online!

Stax , 63 byte

∞╖]ÇàI╨‼Çö¼fi╩╨╛Aóß╟uƒ←37qÄô.Z╛Θ6►Mûj╚#Å[░]Oá0"y╧o╙)5;V╞♥╬F¼♫t~

Jalankan dan debug itu

Perl 5 , 163 byte

say join'|',(('-'x26)x3,"Life is but a dream".$"x7,ucfirst(join$",("merrily,")x3),"Gently down the stream    ",ucfirst "row, "x3 ."your boat  ")[-$_..3-$_]for 1..7

Cobalah online!

Pesona Rise , 292 byte

B͍"-"'#*"|"3s
"Row, row, row your boat,"b" "S*q"|"3sB͍>01B10B3*1-akr@>12B01B10B2*1-akr@>13B12B01B10B1-akr@>14B13B12B01B1-akr@>10B3*14B1-r0[10B2*14B13B1-akr0[10B14B13B12B1-akr]]@
B͍"Gently down the stream."c" "S*q"|"3s
B͍"Merrily,"3" merrily,"S*q"|"3s
B͍"Life is but a dream."f" "S*q"|"3s

Cobalah online!

Saya biasanya tidak melakukan tantangan kolmogorov-kompleksitas , tetapi tata letak adalah salah satu yang bisa saya kerjakan tanpa terlalu banyak kesulitan. Runic tidak memiliki cara yang baik untuk mengompresi string yang arbitrer, jadi yang harus kita kerjakan hanyalah bagian yang berulang.

Penjelasan:

Tanpa kompresi sedikit:

B͍"-"'#*"|"3s
B͍"Row, row, row your boat,"b" "S*q"|"3s
B͍"Gently down the stream."c" "S*q"|"3s
B͍"Merrily,"3" merrily,"S*q"|"3s
B͍"Life is but a dream."f" "S*q"|"3s
>11B10B3*1-akr@
>12B11B10B2*1-akr@
>13B12B11B10B1-akr@
>14B13B12B11B1-akr@
>10B3*14B1-r0[10B2*14B13B1-akr0[10B14B13B12B1-akr]]@

5 baris pertama berfungsi sebagai fungsi untuk membangun setiap bagian dari lagu (di mana baris pertama menghasilkan 35 -untuk spacer menggunakan nilai desimal #untuk menyimpan 2 byte lebih 3X5+). Instruksi pengembalian ada di awal baris untuk memastikan bahwa semua IP yang masuk fungsi juga akan pergi fungsi setelah jumlah siklus yang sama untuk menghindari penggabungan IP (menghasilkan garis output yang hilang), karena program adalah sel empat persegi dan kosong tersirat.

Empat baris berikutnya bertanggung jawab untuk mencetak empat baris pertama dari output

Baris kelima kemudian mencetak 3 baris output terakhir. Karena ketiga baris perlu mulai dengan setidaknya satu stanza-spacer, tidak layak untuk menggunakan 3 IP terpisah (karena mereka akan membutuhkan penundaan untuk menghindari penggabungan). >, y, @, Dan biaya newline lebih byte (4) dari 0[...](3 bytes) di mana ...merupakan petunjuk sewenang-wenang (yaitu. Baris lain dari output).

Sebaliknya mengganti >dan @menggunakan IP tunggal membutuhkan lebih banyak byte.

Akhirnya, menggabungkan kelima garis titik masuk ke baris ke-2 menghemat baris baru sebesar 5 byte. Kita hanya harus memastikan bahwa B͍instruksi ranch-return bergerak ke akhir barisnya terlebih dahulu, menjaga fungsi fungsinya.