วาด“ Cool S”


38

บทนำ

เราทุกคนรู้จัก S ที่ยอดเยี่ยม (หรือเรียกอีกอย่างว่า Superman S, Stüssy S, Super S, Skater S, Pointy S, Graffiti S และอื่น ๆ ): เด็กนับพันล้านคนทั่วโลกดึง S นี้มาและรู้สึกภาคภูมิใจในตัวเองทันที ในกรณีที่คุณลืมหรือมีวัยเด็กที่ไม่ได้สมบูรณ์นี่คือภาพของ cool ที่พูดแล้ว:

กำหนดสเกลแฟคเตอร์nเป็นอินพุต (โดยที่ ), ส่งเอาต์พุต Cool S ในศิลปะ ASCII1n20

วิธีการวาด

จากหน้า Wikipediaบน Cool S:

เอาท์พุต

The Cool S เมื่อn= 1 คือ:

   ^
  / \
 /   \
/     \
|  |  |
|  |  |
\  \  /
 \  \/
 /\  \
/  \  \
|  |  |
|  |  |
\     /
 \   /
  \ /
   v

และสำหรับค่าที่แตกต่างกันของnคุณเพียงแค่ทำให้การส่งออกnครั้งใหญ่ ตัวอย่างเช่นn= 2:

     ^  
    / \
   /   \
  /     \
 /       \
/         \
|    |    |
|    |    |
|    |    |
|    |    |
\    \    /
 \    \  /
  \    \/
  /\    \
 /  \    \
/    \    \
|    |    |
|    |    |
|    |    |
|    |    |
\         /
 \       /
  \     /
   \   /
    \ /
     v

โปรดทราบว่าส่วนแนวตั้งจะยาวกว่าสองเท่าและระยะห่างระหว่างเส้นแนวตั้งนั้นกว้างกว่าสองเท่า

และเมื่อn= 3:

       ^
      / \
     /   \
    /     \
   /       \
  /         \
 /           \
/             \
|      |      |
|      |      |
|      |      |
|      |      |
|      |      |
|      |      |
\      \      /
 \      \    /
  \      \  /
   \      \/
   /\      \
  /  \      \
 /    \      \
/      \      \
|      |      |
|      |      |
|      |      |
|      |      |
|      |      |
|      |      |
\             /
 \           /
  \         /
   \       /
    \     /
     \   /
      \ /
       v

หมายเหตุ:แม้ว่าไม่จำเป็นรหัสของคุณอาจรองรับn= 0:

 ^
/ \
\\/
/\\
\ /
 v

การชนะ

โปรแกรมที่สั้นที่สุดในหน่วยไบต์ชนะ



เด็ก ASCII ของ 90 สร้างในตัวฉันต้องการแนะนำให้ใช้ / \ แทน ^ สำหรับคำแนะนำ ดูสะอาดขึ้นด้วยวิธีนี้และมันยังคงความลาดเอียงแบบเดิมเอาไว้ :)
Flater

@ Flater ปัญหาเดียวก็คือ / \ ใช้อักขระสองตัวดังนั้นเส้นแนวตั้งกลางจะต้องถูกชดเชยซึ่งทำให้ดูไม่เรียบร้อยมาก
Beta Decay

@BetaDecay: มันดูดีใน N = 2 และ N = 3 (เพราะมันยังคงรักษาความสมมาตรของจุด) แต่ฉันเห็นด้วยกับ N = 1 นอกจากนี้ยังมีตัวเลือกในการกลับหัว V:Λ
Flater

2
@JacobGarby: อาร์กิวเมนต์ของฉันคือโวหารไม่ golfy :)
Flater

คำตอบ:


14

ถ่าน , 58 53 47 43 41 ไบต์

Nθ≔⊕⊗θδ↗θ/⊗θ↘δ^‖B↓‖M← vMδ⁰⊗θ↗⊕θM⁰δ↗θ/⊗θ⟲T

ลองออนไลน์!

ฉันแค่อยากลองวิธีอื่นมันเป็นการดึงจากภายนอกผ่านการสะท้อน (ขอบคุณนีลสำหรับการขยายความคิด) จากนั้นก็ดึงส่วนด้านใน เนื่องจาก Charcoal มี:Leftทิศทางเริ่มต้นในการลากเส้นฉันใช้ประโยชน์จากทิศทางนั้นให้มากที่สุดเท่าที่จะทำได้เพื่อประหยัดไบต์โดยการวาด S ในแนวนอนเช่นนี้

     /----\    /----\     
    /      \  /      \    
   /        \/        \   
  /         /          \  
 /         /            \ 
v     ----/    /----     ^
 \            /         / 
  \          /         /  
   \        /\        /   
    \      /  \      /    
     \----/    \----/     

แล้วฉันต้องหมุนผืนผ้าใบ 90 องศาทวนเข็มนาฬิกา


คุณอาจจะเข้าสู่บางสิ่งที่นั่น ... 22 ไบต์ทำให้คุณได้รับด้านนอก ...
Neil

@ แม้ว่าจะไม่เป็นเช่นนั้นความคิดของคุณต้องการการแก้ไขเล็กน้อย แต่แน่นอนว่านี่เป็นการปรับปรุงที่ยอดเยี่ยม!
Charlie

ใช่ฉันทำผิดพลาดคล้ายกับโพสต์ต้นฉบับของฉันเพราะฉันไม่ได้ตรวจสอบผลของการปรับขนาดอย่างถูกต้อง
Neil

มีใครพูดRotateไหม ที่ทำให้ผมคิด ...
นีล

@ ไม่มีเลยคุณได้รับการปรับปรุงที่นั่น! :-)
Charlie

13

Python 3 , 255 249 248 209 ไบต์

-6 ไบต์ขอบคุณ Kevin Cruijssen

-1 ไบต์ต้องขอบคุณ Kevin Cruijssen

-39 ไบต์ขอบคุณ Rod และ Jo King

n=int(input())
m=2*n
a,b,q,c,l='\ \n/|'
f=m*b
s=q+q.join([f[d:]+c+b*2*d+b+a+f[d:]for d in range(m+1)]+[l+f+l+f+l]*m+[d*b+a+f+a+f[d*2:]+c+d*b for d in range(n)]+[n*b+a+f+a+c+n*b])
print(f,'^'+s+q+s[::-1]+f,'v')

ลองออนไลน์!

ตอนนี้จัดการกับ n = 0


ทั้งo+~dสามารถm-dและrange(o)สามารถrange(m+1)และจากนั้นคุณสามารถลบo=m+1\nเพื่อบันทึก 6 ไบต์ คำตอบที่ดี +1 จากฉัน
Kevin Cruijssen

1
โอ้และอีกหนึ่งไบต์โดยเปลี่ยนp(s)\np(s[::-1])เป็นp(s+q+s[::-1]): 248 ไบต์
Kevin Cruijssen

คุณสามารถบันทึก 6 ไบต์หากคุณใช้เพียงครั้งเดียวprintและมากกว่า 4 โดยการลบออก[]จากการjoin([...])รวม238 ไบต์
Rod

คุณยังสามารถเก็บไว้q.joinในตัวแปรเพื่อบันทึกไบต์
Rod

217 เข้าร่วมทุกคนq.joinและอีกสองอย่าง
โจคิง

13

ถ่าน , 47 42 41 ไบต์

Fv^«↓⊗θ↘⊗⊕θ←↓⊗θ↙⊕⊗θ↖ι↖⊕⊗θ→↑⊗θ↗⊕θMθ⁺⊗θ⊕θ⟲⁴

ลองออนไลน์! การเชื่อมโยงคือการใช้รหัสเวอร์ชันอย่างละเอียด คำอธิบาย: วาดบรรทัดต่อไปนี้ตามลำดับ:

   ^
  / \
 /   \
/     \
|  1  |
|  1  |
\  2  /
 \  2/
 8\  2
8  \  2
7  |  3
7  9  3
6     4
 6   4
  6 4
   5

ในกรณีที่เป็นตัวละครในปัจจุบันของสตริง5 ในตอนท้ายของวงแรกเคอร์เซอร์อยู่ในตำแหน่งที่จุดแล้วv^ 9ผืนผ้าใบทั้งหมดจะถูกหมุนเพื่อให้อีกครึ่งหนึ่งของ Cool S สามารถวาดได้ (ผืนผ้าใบหมุนได้สองครั้งจริง ๆ แต่นี่เป็นเพียงรายละเอียดการนำไปปฏิบัติ)

Charcoal ไม่ได้รับการสนับสนุนRotateCopy(:Up, 4)แต่ถ้าเป็นเช่นนั้นจะสามารถใช้งานได้ 33 ไบต์:

↖^↖⊕⊗θ→↑⊗θ↗⊕θ‖BM↓↙⊗θ→↓⊗θ⟲C↑⁴J⁰¦⁰v

@BetaDecay ขออภัยเกี่ยวกับสิ่งนั้น ฉันยังนับจำนวนไบต์ผิดด้วย ...
Neil

ดีมาก, มันจะได้รับ n = 0 ด้วย
Beta Decay

6

Canvas , 36 32 29 ไบต์

«|*‼l├/L1^╋;╶╵\∔∔│α╶«├:╵╋:↔↕∔

ลองที่นี่!

การจัดการกองซ้อนจำนวนมาก คำอธิบาย (ล้าสมัย):

«|*                                an array of input*2 "|"s
   ‼                               cast to a 2D object (needed because bug)
    :                              duplicate that (saved for the center line)
     l├                            height+2
       /                           create a diagonal that long
        L1^╋                       and in it, at (width; 1) insert "^"
            ;∔                     append the vertical bars
                               ^
                              /
          so far done:       / 
                            /  
                            |  
                            |  
              ⁸╵                   input+1
                \                  antidiagonal with that size
                 ∔                 appended to the above
                  │                mirror horizontally
                              ^
                             / \
                            /   \
                           /     \
                current:   |     |
                           |     |
                           \     /
                            \   /                                                       |
                   α               get the 2nd to last popped thing - the antidiagonal  |
                    └∔             append it to the vertical line copied way before:    \
                      ⁸«├          input/2 + 2                                            \
                         :╵        duplicate + 1
                           ╋       at (input/2 + 2; input/2 + 3) in the big part insert  ^
                            :↔↕∔   mirror a copy vertically & horizontally and append that to the original

3

Python 2 , 227 208 207 202 196 181 ไบต์

I=n=2*input()
R,L,S,P='/\ |'
k=n*[2*(P+S*n)+P]
exec"k=[R+S+2*S*I+L]+k+-~I%2*[L+S*n+L+S*I+R];I-=1;"*-~n
print'\n'.join(t.center(2*n+3)for t in['^']+k+[a[::-1]for a in k[::-1]]+['v'])

ลองออนไลน์!

Jo to Kingต่อ 1 ไบต์; แล้วรวมอีก 5 ไบต์ (ผ่านn => 2*n)

ใช้งานได้n=0ดีเช่นกัน


3

C (gcc) , 379 353 344 334 ไบต์

ฉันใช้สองสาม#defineวินาทีเพื่อกำจัด subexpression และกลมต่าง ๆ เพื่อสื่อสารระหว่างฟังก์ชั่นภายใน วงหลักไป {0,1,2,3,3,2,1,0} เพื่อสร้าง S

ขอบคุณ Jonathan Frech สำหรับคำแนะนำ

#define z(a,b...)printf("%*c%*c%*c\n"+a,b);}
#define y(a){for(i=~-a*t;v*i<v*a*!t+t;i+=v)
i,n,p,r,t,u,v;a(){z(6,r+2,94+t*24)b()y(-~r)z(3,-i-~r,47+u,i*2+2,92-u)c()y(r)z(0,~r,124,~r,124,~r,124)d()y(-~n)z(0,i+1,92-u,2*(n-t*i)+1,92,2*(n-!t*i)+1,47+u)(*x[])()={a,b,c,d};f(s){r=2*s;for(p=0;p<8;x[7*t-p++*(2*t-1)](n=s))t=p>3,v=2*!t-1,u=t*45;}

ลองออนไลน์!


w -r-1w~rอาจจะแข็งแรงเล่นกอล์ฟไป
Jonathan Frech

แม้ว่าแล้ว inlining เป็นหนึ่งไบต์สั้น
Jonathan Frech

344 ไบต์
Jonathan Frech


3

C (gcc) , 260 254 ไบต์

-6 ไบต์ขอบคุณที่ceilingcat

f(n){int s=2*n++,t=s+1,I[]={1,t,s,n,n,s,t,1},A[]={s,1,1,1,2*t,1,t,t,1,t,1,n,t,t,1,t,t,1,1,1,t,s,1,1},x;for(s=8;s--;)for(n=0;n<I[s];n++,puts(""))for(t=3;t--;)x=s*3+t,printf("%*c",n*("AAAA?BAAAAC@?ABAAACA@AAA"[x]-65)+A[x],"w!!!0]}}}]]00]]}}}]!0_!!"[x]-1);}

ลองออนไลน์!

rundown

เราสามารถแบ่งรูปร่างออกเป็นส่วนต่างๆ:

 ^           Top cap
/ \          Top slope
|||          Sides
\\/          Twist, part 1
/\\          Twist, part 2
|||          Sides
\ /          Bottom slope
 v           Bottom cap

แต่ละส่วนสามารถอธิบายได้ด้วยจำนวนบรรทัดสามตัวอักษรและสามความสัมพันธ์กับค่าบางอย่างที่กำหนดความกว้างของฟิลด์ที่แต่ละบรรทัด

การทำซ้ำครั้งแรกมาเป็น:

#define g(x,s,A,B,C)for(i=0;i<x;i++)printf("%*c%*c%*c\n",A,*s,B,s[1],C,s[2]);
f(n)
{
    int s=2*n++,t=s+1,i;

    g(1,  "  ^",  1,      1,  t-1)
    g(t, "/ \\",t-i,      1,2*i+1)
    g(s,  "|||",  1,      t,    t)
    g(n,"\\\\/",i+1,      t,t-2*i)
    g(n,"/\\\\",n-i,  2*i+1,    t)
    g(s,  "|||",  1,      t,    t)
    g(t, "\\/ ",i+1,2*t-2*i,    1)
    g(1,  "  v",  1,      1,  t-1)
}

การเรียกไปยังg()แมโครมีลักษณะคล้ายกับตารางที่สามารถสร้างและวนซ้ำได้ บางครั้งความกว้างของฟิลด์เกี่ยวข้องกับตัวนับดัชนีและบางครั้งก็ไม่ เราสามารถสรุปความกว้างของสนามที่จะเป็นได้F * i + Aโดยที่ F เป็นปัจจัยที่จะคูณiด้วยและ A คือค่าบางอย่างเพื่อเพิ่มความกว้าง ดังนั้นความกว้างสุดท้ายของการโทรที่สี่ด้านบนจึงเป็น-2 * i + tเช่นนั้น

ดังนั้นเราจึงได้รับ:

f(n){int s=2*n++,t=s+1,         s = size of "side" parts, t = size of top and bottom slopes
I[]={1,t,s,n,n,s,t,1},          The number of lines per part.
A[]={...},x;                    A[] holds the values to add to each field-width.
for(s=8;s--;)                   Loop through the parts.
for(n=0;n<I[s];n++,puts(""))    I[s] decides how many lines to the part. Ends with newline.
for(t=3;t--;)                   Go through the three chars of each line.
x=s*3+t,                        Calculate offset.
printf("%*c",                   Print the char.
n*("..."[x]-65)+A[x],           Build field-width. The string holds the index factor, A[]
                                holds the offset part.
"..."[x]-1);}                   The char itself is grabbed from the string.
                                Shifted by 1 to eliminated double backspaces.

ในท้ายที่สุดมันก็ไม่สั้นกว่ารุ่นที่g()เรียกแน่นมากแต่สั้นกว่า


@ceilingcat ไชโย
Gastropner

@ceilingcat ลำดับการประเมินผลที่ไม่ได้กำหนดของอาร์กิวเมนต์ฟังก์ชันให้ฉันหยุดชั่วคราว
Gastropner

2

Java, 435 ไบต์

ฟังก์ชั่นตัวเองใช้เวลา 435 ไบต์ มีห้องพักสำหรับการปรับปรุงอย่างแน่นอน "ระดับสูง" โดยการวิเคราะห์กฎเกี่ยวกับสถานที่ที่ตัวละคร (ในตอนท้าย S คือจุดสมมาตร) และ "ระดับต่ำ" โดยการเล่นกอล์ฟแบบคลาสสิก (อาจดึงตัวแปรอื่นหรือ การรวมสองfor-loops) แต่มันเป็นช็อตแรกของภาษาที่ค่อนข้างอวดดี

import static java.util.Arrays.*;
import static java.lang.System.*;

public class CoolS
{
    public static void main(String[] args)
    {
        print(1);
        print(2);
        print(3);
    }
    static void print(int n){int i,r,d=3+6*n,w=3+n*4,h=6+n*10,m=n+n,v=w/2,k=h-1,j=w-1;char t[],S='/',B='\\',P='|',s[][]=new char[h][w];for(char x[]:s)fill(x,' ');s[0][v]='^';s[k][v]='v';for(i=0;i<1+m;i++){r=i+1;t=s[r];t[v-r]=S;t[v+r]=B;t=s[k-r];t[v-r]=B;t[v+r]=S;}for(i=0;i<m;i++){r=2+m+i;t=s[r];t[0]=t[v]=t[j]=P;t=s[k-r];t[0]=t[v]=t[j]=P;}for(i=0;i<1+n;i++){r=2+m+m+i;t=s[r];t[i]=t[i+1+m]=B;t[j-i]=S;t=s[d-i];t[i]=S;t[v-i]=t[j-i]=B;}for(char x[]:s)out.println(x);}
}

สวัสดี. นำเข้าเป็นส่วนหนึ่งของไบต์นับฉันกลัวดังนั้นคำตอบปัจจุบันของคุณเป็นจริง478 ไบต์ อย่างไรก็ตามคุณสามารถตีมันลงไป (โดยบังเอิญ) 435 ไบต์ในปัจจุบันของคุณพร้อมสิ่งพื้นฐานในการตีกอล์ฟ
Kevin Cruijssen

สามารถเล่นกอล์ฟได้มากถึง405 ไบต์โดยการลบตัวแปรบางตัวและใช้t=...บิตน้อยลงเพื่อประหยัดไบต์ หากคุณมีคำถามเกี่ยวกับการเปลี่ยนแปลงใด ๆ ที่ฉันทำแจ้งให้เราทราบ :)
Kevin Cruijssen

ขอบคุณ @KevinCruijssen โชคไม่ดีที่ฉันยังไม่สามารถลงทุนเวลาเพิ่มเติมได้ที่นี่ - นี้เป็นเพียงสิ่งนันทนาการและพิจารณา "ฟุ่มเฟื่อย" ชวาไม่ได้เป็นคู่แข่งที่รุนแรง แต่อย่างใด ;-) พิจารณาการเพิ่มวิธีการแก้ปัญหาของคุณเป็นคำตอบของตัวเองแม้ว่า - แล้วเรา อย่างน้อยก็มีการแข่งขันระหว่างภาษา :-)
Marco13

2

PHP , 378 374 378 377 376 335 331 328 ไบต์

-3 ไบต์ขอบคุณ manatwork

-4 ไบต์ใช้ str_pad แทน str_repeat

-41 ไบต์ขอบคุณคำแนะนำของ manatworks

-1 ไบต์รวมสองส่วนที่เพิ่มเข้าไปใน + = 2

-1 ไบต์ลบฟุ่มเฟือย \

-4 ไบต์โดยการสะท้อนครั้งเดียว ลืมฉันต้องส่งสตริงเข้าไปในฟังก์ชั่นเพื่อให้มันเป็นไบต์มากขึ้น

ทำงานสำหรับ n = 0 เช่นกัน

function s($b){return str_pad($w,$b);}echo s($i=1+$a=2*$argv[1]).'^
';for(;$i;$j++,$y=$z.$y)echo$z=s(--$i).'/'.s(++$j).'\
';for(;$k<$a;$k++)$x.='|'.s($a).'|'.s($a).'|
';echo$x;for(;$l<=$a/2;)echo s($m++).$c='\\',s($a).$c.s($a-$l++*2).'/
';for(;$m;$n+=2)echo s(--$m).'/'.s($n).$c.s($a).'\
';echo$x.strtr($y,'/\\','\/').s($a+1).v;

ลองออนไลน์!


1
ขณะที่การประกาศฟังก์ชันค่อนข้างแพงและคุณใช้ตัน () เพียงสองครั้งจะสั้นลงโดยไม่ได้ หากด้านข้าง 9 ประกาศที่คุณใช้เตือน 1 ครั้งคุณสามารถลบเครื่องหมายคำพูดรอบ'v'สุดท้ายechoได้
จัดการ

1
คุณสามารถใช้วงเดียวสำหรับชิ้นส่วนเฉียงบนและล่าง การเริ่มต้นของ $ a และ $ i สามารถถูกบีบอัดได้ด้วยการย้ายพวกเขาเมื่อใช้งานครั้งแรก
จัดการ

1
Oh, และ$i>0และ$m>0สามารถเขียนเป็นเพียงและ$i $m
จัดการ

1
ด้วยช่องว่างต่อท้ายเช่นเดียวกับโซลูชั่นอื่น ๆ
จัดการ

1
นอกจากนี้คุณยังสามารถย้ายการประกาศ $ c เป็นการใช้ครั้งแรก เพียงแค่เปลี่ยนการเรียงต่อกันหลังจากที่มันจะ. ลองออนไลน์! ,
จัดการ

1

Python 3 , 321 307 ไบต์

ขอบคุณ @EsolangingFruit สำหรับการบันทึก 14 ไบต์

n=int(input())
b,f='\/'
c,l=4*n+3,10*n+6
r=range
h=c//2
L=[c*[' ']for _ in r(l)]
L[0][h],L[-1][h]='^v'
for i in r(h):a=L[h-i];a[i],a[c+~i]=f,b
for i in r(2*n):L[h-~i][0::h]='|'*3
for i in r(n+1):a=L[h+h+i];a[c+~i],a[i:c-1:h]=f,b*2
for i in r(1,l//2):L[l+~i]=L[i][::-1]
print('\n'.join(''.join(i)for i in L))

ลองออนไลน์!

Python 2 , 303 ไบต์

n=int(input())
b,f='\/'
c,l,r=4*n+3,10*n+6,range
h=c/2
L=[c*[' ']for _ in r(l)]
L[0][h],L[-1][h]='^v'
for i in r(h):a=L[h-i];a[i],a[c+~i]=f,b
for i in r(2*n):L[h-~i][0::h]='|'*3
for i in r(n+1):a=L[h+h+i];a[c+~i],a[i:c-1:h]=f,b*2
for i in r(1,l/2):L[l+~1]=L[i][::-1]
print'\n'.join(''.join(i)for i in L)

ลองออนไลน์!


คุณสามารถแทนที่'\\','/'ในบรรทัดที่สองด้วย*'\/'เพื่อบันทึกสามไบต์
ผลไม้ที่แยกแยะ


ขอบคุณ! @EsolangingFruit! ฉันไม่ได้ตระหนักถึงการทำงานของบิตใน Python นอกจากนี้มันจะประหยัดไม่กี่ไบต์ในการใช้ Python2 เนื่องจากการหารและวงเล็บในprint
Pétur

ใน Python 2 สตริงinput()อัตโนมัติeval()ดังนั้นคุณสามารถข้ามint()สายได้เช่นกัน
แยกผลไม้

สำหรับ Python 3 คุณสามารถเปลี่ยนบรรทัดสุดท้ายเป็นfor l in L:print(*l,sep="")(ฉันไม่คิดว่ามี Python 2 ที่เทียบเท่ากัน)
แยกผลไม้
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.