“¡⁵÷ḞȯḤɼ’b4ị“- x|”s5ŒBŒḄY
TryItOnline!
Saya berharap untuk menggunakan pengulangan pengadilan 1,3,1 kuartal, tetapi tidak bisa memerasnya menjadi kurang (versi mentah menjadi 28:) “ßṂuB’b4s3x“¢¤¢‘ị“- x|”ŒBŒḄY
.
Bagaimana?
“¡⁵÷ḞȯḤɼ’b4ị“- x|”s5ŒBŒḄY - Main link: no arguments
“¡⁵÷ḞȯḤɼ’ - base 250 number: 375116358919167
b4 - convert to base 4:
[1,1,1,1,1,0,2,2,2,2,1,1,1,1,1,0,2,2,2,0,3,3,3,3,3]
ị“- x|” - index into character list "- x|" (1-based):
"-----| -----| |xxxxx"
s5 - split into chunks of length 5:
["-----","| ","-----","| |","xxxxx"]
ŒB - bounce (vectorises):
["---------","| |","---------","| | |","xxxxxxxxx"]
ŒḄ - bounce (non-vectorising version):
["---------","| |","---------","| | |","xxxxxxxxx","| | |","---------","| |","---------"]
Y - join with line feeds:
- implicit print