Chop up my ASCII art

Question

Let's say I've got some ASCII art:

          ___
        ,"---".
        :     ;
         `-.-'
          | |
          | |
          | |
       _.-\_/-._
    _ / |     | \ _
   / /   `---'   \ \
  /  `-----------'  \
 /,-""-.       ,-""-.\
( i-..-i       i-..-i )
|`|    |-------|    |'|
\ `-..-'  ,=.  `-..-'/
 `--------|=|-------'
          | |
          \ \
           ) ) hjw
          / /
         ( (

(Source)

But I want to focus on the cable of this joystick, because I actually want a picture of a garden path, leading up to a door.

 ,=.
-|=|-
 | |
 \ \
  ) )
 / /
( (

I could copy out line after line, I could use a text editor with block selection mode, or... I could write some code!

So, my code needs five arguments:

A piece of ASCII art, a newline separated string.
The X axis of the top-left corner (1-indexed, from left hand column, positive integer)
The Y axis of the top-left corner (1-indexed, from top row, positive integer)
Width of the resultant image (positive integer)
Height of the resultant image (positive integer)

Test Cases

ASCII image:

          ___
        ,"---".
        :     ;
         `-.-'
          | |
          | |
          | |
       _.-\_/-._
    _ / |     | \ _
   / /   `---'   \ \
  /  `-----------'  \
 /,-""-.       ,-""-.\
( i-..-i       i-..-i )
|`|    |-------|    |'|
\ `-..-'  ,=.  `-..-'/
 `--------|=|-------'
          | |
          \ \
           ) ) hjw
          / /
         ( (

Garden path

X: 10
Y: 15
Width: 5
Height: 7

Result:

 ,=.
-|=|-
 | |
 \ \
  ) )
 / /
( (

DB icon

X: 3
Y: 12
Width: 6
Height: 4

Output:

,-""-.
i-..-i
|    |
`-..-'

Alien Elder

X: 9
Y: 1
Width: 7
Height: 10

  ___
,"---".
:     ;
 `-.-'
  | |
  | |
  | |
.-\_/-.
|     |
 `---'

Signature

X: 16
Y: 19
Width: 3
Height: 1

hjw

Rules

Output can be given by any convenient method.
Either a full program or a function are acceptable.
Standard loopholes are forbidden.
This is code-golf so all usual golfing rules apply, and the shortest code (in bytes) wins.

Also, in testcase 1, Y should bew 15, and in TC 2, X should be 3 — TFeld, Oct 26, 2018 at 9:15
Can we assume the input is padded to a rectangle with spaces? — DLosc, Oct 26, 2018 at 9:23
That's exactly what I thought of when I saw that ascii art, a garden path. I didn't think of anything else at all... — Jo King, Oct 26, 2018 at 10:27
It seems many of the X and Y values are incorrect in the test cases (maybe some are 0 indexed?!) - at least: Y of Garden Path should be 15; X of DB Icon should be 3. — Jonathan Allan, Oct 26, 2018 at 10:44

dzaima · Accepted Answer · 2018-10-27 11:06:43Z

22

Canvas, 1 byte

＠

Try it here!

It takes height, width, Y, X, and ASCII art as inputs, in that order.

Though almost everything about the ASCII art objects in Canvas is 0-indexed, ＠ is 1-indexed by some reason. ¯\_(ツ)_/¯

edited Oct 27, 2018 at 11:06

answered Oct 26, 2018 at 11:39

dzaima

20.2k2 gold badges40 silver badges75 bronze badges

\$\begingroup\$ Expected answer from canvas :D (mb charcoal have something similar) \$\endgroup\$
– Dead Possum
Oct 26, 2018 at 11:44
\$\begingroup\$ What sorcery is this! \$\endgroup\$
– AJFaraday
Oct 29, 2018 at 9:18
\$\begingroup\$ @AJFaraday I mean, wouldn't you expect that a language specifically made for ASCII-art manipulation to not have a built-in to get a specific part of an ascii-art? :p \$\endgroup\$
– dzaima
Oct 29, 2018 at 9:36

Add a comment |

TFeld · Accepted Answer · 2018-10-26 09:17:20Z

7

Python 2, 64 62 bytes

lambda I,x,y,w,h:[l[x-1:][:w]for l in I.split('\n')[y-1:][:h]]

Try it online!

If X and Y can be 0-indexed:

Python 2, 56 bytes

lambda I,x,y,w,h:[l[x:x+w]for l in I.split('\n')[y:y+h]]

Try it online!

answered Oct 26, 2018 at 9:17

TFeld

19.8k3 gold badges19 silver badges63 bronze badges

Add a comment |

Neil · Accepted Answer · 2018-10-26 12:20:31Z

4

Charcoal, 7 bytes

δＪθηＴζε

Try it online! Link is to verbose version of code. Takes 0-indexed coordintaes. Explanation:

δ

Print the ASCII art.

Ｊθη

Jump to the top left corner of the desired rectangle.

Ｔζε

Trim the canvas to the desired size.

answered Oct 26, 2018 at 12:20

Neil

165k12 gold badges69 silver badges273 bronze badges

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

Pip `-n`, 21 bytes

_@>--b@<dM(a^n--c+,e)

Try it online!

Or, if 0-indexing is allowed...

Pip `-n`, 17 bytes:

_@>b@<dM(a^nc+,e)

Try it online!

Explanation

Takes all five arguments as command-line args.

                   a-e are the 5 cmdline args; n is newline
         a^n       Split a on newlines
              ,e   Range(e)
            c+     Add c to each element
        (       )  Use the resulting range(c,c+e) to slice into the list of lines
       M           To each line, map this function:
_                   The line
 @>b                Slice, keeping indices b and greater
    @<d             Slice, keeping indices less than d
                   Print, joining on newlines (-n flag)

The above solutions also assume the input is a perfect rectangle--i.e., the lines are all the same length. Otherwise, 2 extra bytes are needed (use -l instead of -n):

(Z(a^nZDsb+,d)c+,e)      0-indexed, 19 bytes
(Z(a^nZDs--b+,d)--c+,e)  1-indexed, 23 bytes

Emigna · Accepted Answer · 2018-10-26 09:51:25Z

3

05AB1E, 21 19 bytes

UV¶¡εXG¦}Y£}sG¦}s£»

Try it online!

Or if 0-indexing is allowed:

05AB1E, 18 bytes

UV¶¡εX.$Y£}sF¦}s£»

Try it online!

edited Oct 26, 2018 at 9:51

answered Oct 26, 2018 at 9:26

Emigna

52.9k5 gold badges42 silver badges162 bronze badges

\$\begingroup\$ 12 if you can take in [X1, X2] and [Y1, Y2] as v³ŸNåiy²ŸèJ= \$\endgroup\$
– Magic Octopus Urn
Oct 26, 2018 at 13:14

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

3

Japt `-R`, 13 11 bytes

·tWÉY ®tVÉX

Try it

2 bytes saved thanks to Kamil Drakari

9 bytes if not for the unnecessary requirement that solutions use 1-based indexing.

·tWY ®tVX

Explanation

                :Implicit input of string U and integers V=X, W=Y, X=Width & Y=Height
·               :Split U on newlines
 t              :Slice
  WÉ            : From 0-based index W-1
    Y           : To length Y
      ®         :Map
       t        :  Substring
        VÉ      :   From 0-based index V-1
          X     :   To length X
                :Implicitly join with newlines and output

edited Jun 17, 2020 at 9:04

CommunityBot

1

answered Oct 26, 2018 at 10:07

Shaggy

41.6k4 gold badges34 silver badges92 bronze badges

\$\begingroup\$ In my testing, you can save 2 bytes by switching the slice to t, and another 2 bytes by 0 indexing. It might be worth waiting on the second one since OP hasn't clarified whether 0 indexing is acceptable, or fixed the test cases. \$\endgroup\$
– Kamil Drakari
Oct 26, 2018 at 14:40
\$\begingroup\$ Nice one, @KamilDrakari - completely forgot the t method works on arrays, too. \$\endgroup\$
– Shaggy
Oct 26, 2018 at 16:44

Add a comment |

Shieru Asakoto · Accepted Answer · 2018-10-29 01:04:16Z

3

JavaScript (Node.js), 70 69 bytes

-1 Thanks @Shaggy for the splice() idea.

(a,x,y,w,h)=>a.split`
`.map(q=>q.substr(x-1,w)).splice(--y,h).join`
`

Try it online!

The ASCII art given is annoying tbh

edited Oct 29, 2018 at 1:04

answered Oct 26, 2018 at 10:13

Shieru Asakoto

6,17814 silver badges40 bronze badges

1

\$\begingroup\$ 69 bytes \$\endgroup\$
– Shaggy
Oct 26, 2018 at 16:52

Add a comment |

Galen Ivanov · Accepted Answer · 2018-10-26 13:12:44Z

2

J, 45 bytes

f=:4 :0
'a b c d'=.x-#:10
y{~<(a+i.b);c+i.d
)

Try it online!

Notes: J accepts up to 2 arguments, left and right. The right argument is the ASCII art string, the left one - a list of U H X W values

I simulate the newline and the function call has a code to convert the string to an array.

answered Oct 26, 2018 at 13:12

Galen Ivanov

21k3 gold badges23 silver badges61 bronze badges

Add a comment |

DJMcMayhem · Accepted Answer · 2018-10-26 15:47:06Z

2

V, 16 bytes

ÀGÀ|<C-v>@cl@djyHVGp

Try it online!

Input is expected to be padded with spaces to be a perfect rectangle. Also, the 'Y' input comes before the 'X'.

Hexdump:

00000000: c047 c07c 1640 636c 4064 6a79 4856 4770  .G.|.@cl@djyHVGp

answered Oct 26, 2018 at 15:47

DJMcMayhem

58.9k17 gold badges194 silver badges345 bronze badges

Add a comment |

ErikF · Accepted Answer · 2018-10-29 23:04:55Z

2

C (gcc), 118 109 bytes

The input can contain jagged lines: newlines are printed if they exist in the y-range.

Thanks to ceilingcat for the suggestion.

f(s,x,y,w,h,a,b,c)char*s;{for(b=1,a=0;*s;a=c?!b++:a,s++)((c=*s==10)|++a>=x&a-x<w)&b>=y&b-y<h-c&&putchar(*s);}

Try it online!

edited Oct 29, 2018 at 23:04

answered Oct 28, 2018 at 2:52

ErikF

4,5877 silver badges11 bronze badges

Add a comment |

Erik the Outgolfer · Accepted Answer · 2018-10-26 12:55:31Z

1

Jelly, 11 bytes

Ỵṫ€¥ṫḣ€ḣ4ƭ/

Try it online!

Takes the ASCII-art as a Python multi-line r-string (so as to avoid problems with backslashes).

answered Oct 26, 2018 at 12:55

Erik the Outgolfer

40.5k5 gold badges41 silver badges121 bronze badges

Add a comment |

totallyhuman · Accepted Answer · 2018-10-26 13:14:59Z

1

Haskell, 61 bytes

(x#y)w h=unlines.map(take w.drop(x-1)).take h.drop(y-1).lines

Try it online!

Takes arguments in order: x, y, w, h, s.

edited Oct 26, 2018 at 13:14

answered Oct 26, 2018 at 13:09

totallyhuman

16.3k3 gold badges31 silver badges86 bronze badges

\$\begingroup\$ 58 bytes: Try it online! \$\endgroup\$
– Laikoni
Oct 26, 2018 at 17:38

Add a comment |

Digital Trauma · Accepted Answer · 2018-10-26 18:02:17Z

1

Bash + coreutils, 37

cut -b$1-$[$1+$3-1]|tail +$2|head -$4

Interestingly, GNU tail 8.28 (on Ubuntu 18.04) allows +NUM format, whereas GNU tail 8.29 on TIO requires 2 extra bytes for this -n+NUM.

Try it online!

I thought doing this all in sed might be shorter, but at 50 bytes its not:

sed -nr "$2,$[$2+$4-1]s/.{$[$1-1]}(.{,$3}).*/\1/p"

edited Oct 26, 2018 at 18:02

answered Oct 26, 2018 at 17:44

Digital Trauma

71.8k9 gold badges109 silver badges261 bronze badges

Add a comment |

Community · Accepted Answer · 2020-06-17 09:04:33Z

K4, 31 bytes

Solution:

{[a;x;y;w;h]a .-1+(y;x)+!:'h,w}

Examples:

q)ASCII:("          ___";"        ,\"---\".";"        :     ;";"         `-.-'";"          | |";"          | |";"          | |";"       _.-\\_/-._";"    _ / |     | \\ _";"   / /   `---'   \\ \\";"  /  `-----------'  \\";" /,-\"\"-.       ,-\"\"-.\\";"( i-..-i       i-..-i )";"|`|    |-------|    |'|";"\\ `-..-'  ,=.  `-..-'/";" `--------|=|-------'";"          | |";"          \\ \\";"           ) ) hjw";"          / /";"         ( (")
q)k){[a;x;y;w;h]a .-1+(y;x)+!:'h,w}[ASCII;10;15;5;7]
" ,=. "
"-|=|-"
" | | "
" \\ \\ "
"  ) )"
" / / "
"( (  "
q)k){[a;x;y;w;h].[a;-1+(y;x)+!:'h,w]}[ASCII;3;12;6;4]
",-\"\"-."
"i-..-i"
"|    |"
"`-..-'"
q)k){[a;x;y;w;h].[a;-1+(y;x)+!:'h,w]}[ASCII;9;1;7;10]
"  ___  "
",\"---\"."
":     ;"
" `-.-' "
"  | |  "
"  | |  "
"  | |  "
".-\\_/-."
"|     |"
" `---' "
q)k){[a;x;y;w;h].[a;-1+(y;x)+!:'h,w]}[ASCII;16;19;3;1]
"hjw"

Explanation:

Take the 1-indexed input, generate the x/y coordinates and index into ascii art.

{[a;x;y;w;h]a .-1+(y;x)+!:'h,w} / the solution
{[a;x;y;w;h]                  } / lambda taking 5 inputs, a(scii), x, y, w(idth), h(eight)
                           h,w  / concatenate height and width, e.g. 7 5
                        !:'     / range til each, e.g. (0 1 2 3 4 5 6;0 1 2 3 4)
                  (y;x)+        / add list y x to it, e.g. (15 16 17 18 19 20 21;10 11 12 13 14)
               -1+              / subtract 1, e.g. (14 15 16 17 18 19 20;9 10 11 12 13)
            a .                 / index into a at these coordinates

J.Doe · Accepted Answer · 2018-10-27 12:12:41Z

1

R, 62 bytes

Perhaps surprisingly short solution to a text challenge in R, because we don't need to actually read the whole text into a matrix.

function(x,y,w,h)write(substr(readLines()[y+1:h-1],x,x+w-1),1)

Try it online!

edited Oct 27, 2018 at 12:12

answered Oct 27, 2018 at 10:59

J.Doe

2,54910 silver badges14 bronze badges

Add a comment |

torcado · Accepted Answer · 2018-11-10 01:08:52Z

\/\/>, 123 bytes

j:j8+}j+}j}pppp80x
{:}i:0(?v:a=?x@s1+:
~~~~1+0!/000y
yp:qqqq~
q{y?=p:+1q:}}g$q:pp:
1}x}p}ap:q~q+1{{y!?:-
ys{{
~!u.*2(0:;!?h

Input consists of a single line of space-delimited input variables x, y, w, and h, followed by the ascii art on the next line onward.

Explanation

This code uses \/\/>'s ability to self-modify by placing the ascii art in the code itself, which ends up looking like this:

code

It then grabs the characters in the specified rectangle off of the code and outputs it.

Stack Exchange Network

Chop up my ASCII art

Test Cases

Garden path

DB icon

Alien Elder

Signature

Rules

16 Answers 16

Canvas, 1 byte

Python 2, 64 62 bytes

Python 2, 56 bytes

Charcoal, 7 bytes

Pip `-n`, 21 bytes

Pip `-n`, 17 bytes:

Explanation

05AB1E, 21 19 bytes

05AB1E, 18 bytes

Japt `-R`, 13 11 bytes

Explanation

JavaScript (Node.js), 70 69 bytes

J, 45 bytes

V, 16 bytes

C (gcc), 118 109 bytes

Jelly, 11 bytes

Haskell, 61 bytes

Bash + coreutils, 37

K4, 31 bytes

R, 62 bytes

\/\/>, 123 bytes

Explanation

Your Answer

Not the answer you're looking for? Browse other questions tagged
code-golf
ascii-art
or ask your own question.

Hot Network Questions

Chop up my ASCII art

Test Cases

Garden path

DB icon

Alien Elder

Signature

Rules

16 Answers 16

Canvas, 1 byte

Python 2, 64 62 bytes

Python 2, 56 bytes

Charcoal, 7 bytes

Pip -n, 21 bytes

Pip -n, 17 bytes:

Explanation

05AB1E, 21 19 bytes

05AB1E, 18 bytes

Japt -R, 13 11 bytes

Explanation

JavaScript (Node.js), 70 69 bytes

J, 45 bytes

V, 16 bytes

C (gcc), 118 109 bytes

Jelly, 11 bytes

Haskell, 61 bytes

Bash + coreutils, 37

K4, 31 bytes

R, 62 bytes

\/\/>, 123 bytes

Explanation

Your Answer

Sign up or log in

Post as a guest

Not the answer you're looking for? Browse other questions tagged code-golfascii-art or ask your own question.

Related

Hot Network Questions

Pip `-n`, 21 bytes

Pip `-n`, 17 bytes:

Japt `-R`, 13 11 bytes

Not the answer you're looking for? Browse other questions tagged
code-golf
ascii-art
or ask your own question.