PrettyFont dediğim yeni bir yazı tipi tasarladım. Mükemmelleştirmek için çok zaman harcadım, ama çalışan bir adam olduğum için bitirmek için zamanım yok. Bu yüzden şu anda sadece 4 karakter içeriyor. Bir gün zengin olduğumda, onu bitirmek yaşam boyu hedefim olacak, ama şimdilik ...

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

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

Her karakter 4 piksel genişliğinde ve 5 piksel yüksekliğindedir. Şimdi! Yazdırmak için tasarım göndermeye başlayabilmem için bana PrettyFont'ta bir sayı çıkaran bir program yazmanızı istiyorum.

Kurallar:

Giriş, taban 4'teki bir dize numarasıdır (yalnızca 0-3 karakterleri), örneğin "01321". Program dizede en az 10 karakter işleyebilmelidir. BONUS noktaları, bir dize yerine gerçek bir temel 10 tamsayısını alan programa verilir. AÇIKLAMA DÜZENLEME : tamsayı bonusu, birinin 54321 gibi herhangi bir 10 taban numarasını girebileceği anlamına gelir ve program onu ​​4 tabanına dönüştürür ve çıktı verir (bu durumda 31100301).

Çıktı PrettyFont ile basılan numara olacaktır. Örnek giriş ve çıkış:

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

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

 ## 
  # 
  # 
  # 
 ###

Programın tek bir satırda çıktı alabileceği devasa bonus:

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

'#' Karakteri bir gereklilik değildir ve herhangi bir karakterle değiştirilebilir.

Dikey çıktıda, her PrettyFont karakteri arasında boş bir satır gerekir. Yatay çıktı yapan biri varsa, her PrettyFont karakteri arasında bir boşluk karakteri '' veya bir sekme karakteri gerekir.

Bu kod golf, en kısa kod kazanır! (Kısaca ihtiyacım var çünkü ofis bilgisayarımda depolama alanı sınırlı.)

k ( 118 117 72 71 69 66 karakter)

Henüz golf oynamak için çok çaba göstermedim, ancak çok fazla karakterde istenen yatay çıktıya ulaşmadı:

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

Stdin'den girdi alır, çıktıyı stdout'a yazdırır.

edit: "bitmap" çıktısında bir sıkıştırma biçimi uygulayarak, ben bunu 72'ye düşürdüm. Bitmap şimdi 64bit ints ikiliye dönüştürülerek ve 0s ve 1s "#" veya "" eşleme inşa edilmiştir. Bunu diğer çözümlerden birkaçı gibi hex'ten yapabilirim, ancak bunun daha uzun süreceğini düşünüyorum . Altıgen daha iyi çıkıyor.

012301 için örnek çıktı:

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

// düzenle: -6 karakter

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

Üzgünüm, dikey benim için ilginç değildi.

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

J, 84 82 81 80 75 69 karakterler

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

Klavyeden giriş alır:

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

Sihirli numaralar FTW (veya bu durumda ikinci sırada) :-)

C - 164155 karakter yatay

IDEone'da: http://ideone.com/gljc3

Kod (164 bayt):

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

DÜZENLEME - 151 bayt

Yorumlardan önerileri ve ardından bazılarını ekledim. Gerçi tam olarak güvenli değil (içinde bulunduğum 0 uzunluklu dizi gets()...).

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

Not i=puts("")ben tedavi ediyorum çünkü tanımsız davranıştır voidolarak int! Sürekli 0MinGW 1sürümüme döner, ancak IDEOne tarafından kullanılan derleyiciye döner .

Ondalık kabul eder, temel 4 çıkışını (167 bayt)

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 + bir bonus ('#' ile 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}

Misal:

% 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}

Yakut

Dikey: 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}

Örnek çalışma:

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}'
####
   #
 ###
   #
####

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

 ## 
  # 
  # 
  # 
 ###

Yatay: 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*$/

Örnek çalışma:

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

Şimdi taban 10'daki girişle çalışır (Tam sayı bonusu). Daha önceki sürümler düzenlemelerde bulunabilir.

ArrayPlot Kullanımı :

İle ArrayPlot1 ve 0'ları doğrudan siyah beyaz karelere dönüştürebiliriz, böylece birkaç karakter kaydedebiliriz. Örneğin, taban 4'te 32022211 olan n = 58021 ile :

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

açıklama

Giriş program parametresidir n,.

Sıfır {{1,1,1,1},{1,0,0,1},{1,0,0,1},{1,0,0,1},{1,1,1,1} , altıgen muadili ile veya onlarla gösterilebilir f999f.

, İfadesi, f999f62227f924ff171f{0,1,2,3} numaralarının tümünü görüntülemek için bilgileri tutar. (Not: f999fbelirttiğimiz gibi, kılık değiştirmiş olarak sıfırdır.) Mathematica bunu bir sayı olarak tanımadığı için, 89998622278924881718(dört tamsayı dizgisinde) yerine tamsayı basamaklarını kırdım ve daha sonra kullandım Her yerde 15 bir 8 ortaya çıktı. (Bu, dizeler yerine rakam kullanmamı sağladı.)

Mathematica , 112 107 103

David'in yöntemini benim ele alalım.

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

105 BONUS ile:

(için 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]}¨⍞

Çıktı:

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

Python 2.7

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

Yatay 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])

Her ikisi de girdiyi stdin'de tırnaklı bir dize olarak alır

örnek:
$. / güzel
"0123"