Saya telah merancang font baru yang saya sebut PrettyFont. Saya telah meluangkan banyak waktu untuk menyempurnakannya, tetapi karena saya seorang pekerja, saya tidak punya waktu untuk menyelesaikannya. Karena itu hanya berisi 4 karakter sekarang. Suatu hari ketika saya menjadi kaya itu akan menjadi tujuan seumur hidup saya untuk menyelesaikannya, tetapi untuk saat ini ...

Ini PrettyFont: (0, 1, 2, 3)

####  ##  #### ####
#  #   #  #  #    #
#  #   #    #   ###
#  #   #   #      #
####  ### #### ####

Setiap karakter memiliki lebar 4 piksel dan tinggi 5 piksel. Sekarang! Saya ingin Anda menulis saya sebuah program yang menampilkan nomor di PrettyFont sehingga saya dapat mulai mengirim desain untuk dicetak.

Aturan:

Input adalah nomor string dalam basis 4 (hanya karakter 0-3), misalnya "01321". Program harus dapat menangani setidaknya 10 karakter dalam string. Poin BONUS diberikan kepada program yang mengambil basis 10 integer yang sebenarnya, bukan string. Klarifikasi EDIT : bonus integer berarti bahwa seseorang dapat memasukkan nomor basis 10, seperti 54321, dan program akan mengubahnya menjadi basis 4 dan menghasilkannya (dalam hal ini 31100301).

Outputnya akan menjadi angka yang dicetak dengan PrettyFont. Contoh input dan output:

> "321"
####
   #
 ###
   #
####

####
#  #
  # 
 #  
####

 ## 
  # 
  # 
  # 
 ###

Bonus besar untuk program yang dapat menampilkannya dalam mode baris tunggal seperti ini:

> "321"
#### ####  ## 
   # #  #   # 
 ###   #    # 
   #  #     # 
#### ####  ### 

Karakter '#' bukan keharusan, dan dapat digantikan oleh karakter apa pun.

Dalam output vertikal, baris kosong diperlukan antara setiap karakter PrettyFont. Jika ada yang membuat output horizontal, satu karakter spasi putih '' atau karakter tab diperlukan di antara setiap karakter PrettyFont.

Ini golf kode, kode terpendek menang! (Saya membutuhkannya pendek karena komputer kantor saya memiliki penyimpanan terbatas.)

k ( 118 117 72 71 69 66 karakter)

Saya belum melakukan banyak upaya untuk bermain golf ini tetapi itu mencapai output horizontal yang diinginkan dalam karakter yang tidak terlalu banyak:

-1'" "/:'+(5 4#/:4 20#"# "@,/0b\:'0x066609ddd806db00e8e0)"I"$'0:0;

Mengambil input dari stdin, mencetak output ke stdout.

sunting: Dengan menerapkan bentuk kompresi pada output "bitmap", saya telah menguranginya menjadi 72. Bitmap sekarang dibangun dengan mengubah int 64bit ke biner dan memetakan 0s dan 1s menjadi "#" atau "". Saya bisa melakukannya dari hex seperti beberapa solusi lain tetapi saya pikir ini akan berakhir lebih lama . Ternyata hex lebih baik.

Output sampel untuk 012301:

####  ##  #### #### ####  ##
#  #   #  #  #    # #  #   #
#  #   #    #   ### #  #   #
#  #   #   #      # #  #   #
####  ### #### #### ####  ###

// edit: -6 char

Python3 (124)

s=input();[print(*["".join(" #"[0xf171ff429f72226f999f>>(20*int(x)+4*y+i)&1]for i in(3,2,1,0))for x in s])for y in range(5)]

Maaf, vertikal tidak menarik bagi saya.

???/golf.py
1230012301203012030102301230
 ##  #### #### #### ####  ##  #### #### ####  ##  #### #### #### ####  ##  #### #### #### ####  ##  #### #### #### ####  ##  #### #### ####
  #  #  #    # #  # #  #   #  #  #    # #  #   #  #  # #  #    # #  #   #  #  # #  #    # #  #   #  #  # #  #    # #  #   #  #  #    # #  #
  #    #   ### #  # #  #   #    #   ### #  #   #    #  #  #  ### #  #   #    #  #  #  ### #  #   #  #  #   #   ### #  #   #    #   ### #  #
  #   #      # #  # #  #   #   #      # #  #   #   #   #  #    # #  #   #   #   #  #    # #  #   #  #  #  #      # #  #   #   #      # #  #
 ### #### #### #### ####  ### #### #### ####  ### #### #### #### ####  ### #### #### #### ####  ### #### #### #### ####  ### #### #### ####

J, 84 82 81 80 75 69 karakter

' #'{~(,4,.(4*".,' ',.1!:1[1)+/i.4){"1#:63231 37521 37415 37441 63487

Mengambil input dari keyboard:

   ' #'{~(,4,.(4*".,' ',.1!:1[1)+/i.4){"1#:63231 37521 37415 37441 63487 63487
0123210
 ####  ##  #### #### ####  ##  ####
 #  #   #  #  #    # #  #   #  #  #
 #  #   #    #   ###   #    #  #  #
 #  #   #   #      #  #     #  #  #
 ####  ### #### #### ####  ### ####

Angka ajaib FTW (atau untuk tempat kedua dalam kasus ini) :-)

C - 164 151 karakter horisontal

Di IDEone: http://ideone.com/gljc3

Kode (164 byte):

i,j;main(){char n[99];gets(n);for(;j<5;++j){for(i=0;n[i];++i)printf("%.4s ","#####  # ##   #  ### #     #"+4*("01110233340135006460"[(n[i]-48)*5+j]-48));puts("");}}

EDIT - 151 byte

Saya menambahkan saran dari komentar dan kemudian beberapa. Itu tidak sepenuhnya aman (0-length array yang saya gets()masuki ...) sekalipun.

char i,j=5,n[];main(){for(gets(n);j--;)for(i=puts("");n[i];printf("%.4s ","#####  # ##   #  ### #     #"+4*(0x1A600BA136E0248>>15*n[i++]-720+3*j&7)));}

Catatan, i=puts("")adalah perilaku yang tidak terdefinisi karena saya memperlakukan voidsebagai int! Secara konsisten kembali 0pada versi saya MinGW, tetapi kembali 1pada penggunaan IDEOne kompiler.

Menerima desimal, basis output 4 (167 byte)

char i,j=5,n[];main(p){for(itoa(atoi(gets(n)),n,4);j--;)for(i=puts("");n[i];printf("%.4s ","#####  # ##   #  ### #     #"+4*(0x1A600BA136E0248>>15*n[i++]-720+3*j&7)));}

Ruby, 0123 karakter + bonus ([0123] vs '#')

f=15
0.upto(4){|n|$*[0].chars{|x|$><<"%4s "%eval(:f6ff929192279241f7ff[x.to_i+4*n]).to_i.to_s(2).tr(?0,' ').tr(?1,x)}
puts}

Contoh:

% ruby ./font.rb 01231231
0000  11  2222 3333  11  2222 3333  11  
0  0   1  2  2    3   1  2  2    3   1  
0  0   1    2   333   1    2   333   1  
0  0   1   2      3   1   2      3   1  
0000  111 2222 3333  111 2222 3333  111
% ruby ./font.rb 01231231102020103201301203212302230
0000  11  2222 3333  11  2222 3333  11   11  0000 2222 0000 2222 0000  11  0000 3333 2222 0000  11  3333 0000  11  2222 0000 3333 2222  11  2222 3333 0000 2222 2222 3333 0000 
0  0   1  2  2    3   1  2  2    3   1    1  0  0 2  2 0  0 2  2 0  0   1  0  0    3 2  2 0  0   1     3 0  0   1  2  2 0  0    3 2  2   1  2  2    3 0  0 2  2 2  2    3 0  0 
0  0   1    2   333   1    2   333   1    1  0  0   2  0  0   2  0  0   1  0  0  333   2  0  0   1   333 0  0   1    2  0  0  333   2    1    2   333 0  0   2    2   333 0  0 
0  0   1   2      3   1   2      3   1    1  0  0  2   0  0  2   0  0   1  0  0    3  2   0  0   1     3 0  0   1   2   0  0    3  2     1   2      3 0  0  2    2      3 0  0 
0000  111 2222 3333  111 2222 3333  111  111 0000 2222 0000 2222 0000  111 0000 3333 2222 0000  111 3333 0000  111 2222 0000 3333 2222  111 2222 3333 0000 2222 2222 3333 0000 

EDIT: Ruby, 87 karakter

0.upto(4){|n|$*[0].bytes{|x|$><<"%04b0"%:f6ff929192279241f7ff[x-48+4*n].to_i(16)}
puts}

Rubi

Vertikal: 116 karakter

f="f999f62227f924ff171f".chars.map{|c|c.hex.to_s(2).rjust(4).tr"01"," #"}
$<.chars{|c|i=c.to_i*5;$><<f[i,5]*$/+$/*2}

Contoh dijalankan:

bash-4.2$ echo -n 321 | ruby -e 'f="f999f62227f924ff171f".chars.map{|c|c.hex.to_s(2).rjust(4).tr"01"," #"};$<.chars{|c|i=c.to_i*5;$><<f[i,5]*$/+$/*2}'
####
   #
 ###
   #
####

####
#  #
  # 
 #  
####

 ## 
  # 
  # 
  # 
 ###

Horisontal: 150 148 karakter

f="f999f62227f924ff171f".chars.map{|c|c.hex.to_s(2).rjust(4).tr"01"," #"}
o=(0..4).map{""}
$<.chars{|c|5.times{|j|o[j]<<f[c.to_i*5+j]+" "}}
$><<o*$/

Contoh dijalankan:

bash-4.2$ echo -n 321 | ruby -e 'f="f999f62227f924ff171f".chars.map{|c|c.hex.to_s(2).rjust(4).tr "01"," #"};o=(0..4).map{""};$<.chars{|c|5.times{|j|o[j]<<f[c.to_i*5+j]+" "}};$><<o*$/'
#### ####  ##  
   # #  #   #  
 ###   #    #  
   #  #     #  
#### ####  ### 

Mathematica 174 145 139 118 119 123 karakter

Sekarang berfungsi dengan input pada basis 10 (bonus Integer). Versi sebelumnya dapat ditemukan dalam suntingan.

Menggunakan ArrayPlot :

Dengan ArrayPlotkita dapat secara langsung mengkonversi 1 dan 0 ke kotak hitam dan putih, menghemat beberapa karakter dalam proses. Misalnya, dengan n = 58021, yaitu 32022211 pada basis 4:

i = IntegerDigits; i[n, 4] /. Thread@Rule[0~Range~3, ArrayPlot /@ ((PadLeft[#, 4] & /@ i[#, 2]) & /@ (i@{89998, 62227, 89248, 81718} /. {8 -> 15}))]

Penjelasan

Input adalah parameter program n,.

Nol dapat diwakili oleh {{1,1,1,1},{1,0,0,1},{1,0,0,1},{1,0,0,1},{1,1,1,1} atau oleh mitra hex f999f.

Ekspresi,, f999f62227f924ff171fmenyimpan informasi untuk menampilkan semua angka {0,1,2,3}. (Catatan: dimulai dengan f999f, yang seperti yang kita catat, adalah nol dalam penyamaran.) Karena Mathematica tidak mengenali ini sebagai angka, saya menggunakan 89998622278924881718(dalam empat string bilangan bulat) sebagai gantinya, memecah angka menjadi angka integernya, dan kemudian menggunakan 15 di setiap tempat 8 muncul. (Itu memungkinkan saya menggunakan angka alih-alih string.)

Mathematica , 112 107 103

Pandangan saya tentang metode David.

i=IntegerDigits;Grid/@i@n/.Thread[0~Range~3->("#"i[i@#/.8->15,2,4]&/@{89998,62227,89248,81718}/.0->"")]

105 dengan BONUS:

(untuk n = 54321)

i=IntegerDigits;Grid/@n~i~4/.Thread[0~Range~3->("#"i[i@#/.8->15,2,4]&/@{89998,62227,89248,81718}/.0->"")]

APL ( 58 57)

{' #'[1+5 4⍴1022367 401959 1020495 988959[1+⍎⍵]⊤⍨20⍴2]}¨⍞

Keluaran:

0123
 #### ## #### #### 
 # # # # # # 
 # # # # ### 
 # # # # # 
 #### ### #### #### 

Python 2.7

Vertikal 160

for i in input():print['****\n*  *\n*  *\n*  *\n****',' ** \n  * \n  * \n  * \n***','****\n*  *\n  * \n *  \n****','****\n   *\n ***\n   *\n****'][int(i)]+'\n'

Horisontal 234 216

x=[['****\n*  *\n*  *\n*  *\n****',' ** \n  * \n  * \n  * \n ***','****\n*  *\n  * \n *  \n****','****\n   *\n ***\n   *\n****'][int(i)]for i in input()]
for i in range(5):print' '.join([y.split('\n')[i]for y in x])

Keduanya mengambil input sebagai string yang dikutip pada stdin

contoh:
$. / cantik
"0123"