Khi sử dụng Markup, giống như trên mạng SE, một vết lõm của bốn khoảng trắng trước khi một dòng văn bản biểu thị nó là một phần của khối mã, như tôi hy vọng bạn biết. Nếu bạn không, đây là một ví dụ ( .đại diện cho một khoảng trắng):

.... Mã
.... Thêm mã

kết quả trong

Code
More code

Vấn đề là, khi bạn sao chép-dán mã vào câu trả lời, bạn cần thụt lề từng dòng theo cách thủ công. Điều này đặc biệt khó khăn khi làm việc với mã không được mã hóa, vì nó có thể đã bị thụt vào và có thể gây nhầm lẫn. Bạn chỉ có thể chọn mã của bạn và nhấn Ctrl + K, nó bật ra. Hàng giờ cuộc đời tôi bị lãng phí mà không có lý do gì ...

Vì vậy, mục tiêu của bạn là, được đưa ra một đầu vào, trả lại nó với bốn khoảng trắng trước mỗi dòng. Với tinh thần tiết kiệm thời gian dán sao chép, bạn phải xử lý toàn bộ đầu vào dưới dạng một chuỗi (miễn là ngôn ngữ của bạn có thể phân tích cú pháp). Nếu ngôn ngữ của bạn không thể xử lý một ký tự (chẳng hạn như dòng mới) trong chuỗi, bạn có thể cho rằng nó được ký hiệu / thoát qua một số phương thức khác được ngôn ngữ hỗ trợ; tuy nhiên, đầu ra phải xuất ra mỗi dòng trên dòng riêng của nó (vì vậy không chuyển qua một cái gì đó như ....foo\n....bar).

Sơ hở tiêu chuẩn không được phép. Vì đây là môn đánh gôn , câu trả lời ngắn nhất bằng byte sẽ thắng. Chúc may mắn!

V , 4 byte

Î4É 

Hãy thử trực tuyến!

(Lưu ý dấu cách)

V được mã hóa bằng Latin1, trong đó mã này được mã hóa như vậy:

00000000: ce34 c920                                .4. 

Giải trình

Î            " On every line
 4É<space>   " Prepend 4 spaces

Đây là một giải pháp cũng có 4 byte trong UTF-8!

VG4>

VG          " Select everything
   >        " Indent
  4         " 4 times (with spaces)

Crayon , 7 byte

`¤q;3xq

Hãy thử trực tuyến!

Giải trình

Crayon là một ngôn ngữ dựa trên ngăn xếp được thiết kế để tạo nghệ thuật ASCII. Nó vẫn đang trong giai đoạn phát triển ban đầu, nhưng nó biết vừa đủ để hoàn thành thử thách này với số byte khá thấp:

         Implicit: input string is on the stack
`¤       Push a non-breaking space to the stack.
  q;     Draw this at the cursor (0,0 by default) and pop it.
    3x   Move three more spaces to the right.
      q  Draw the input string here (at 4,0).
         Implicit: output the canvas, trimmed to a rectangle

Việc vẽ không gian không phá vỡ là cần thiết vì Crayon tự động cắt đầu ra thành hình chữ nhật, do đó, nếu không có NBSP, nó sẽ chỉ in đầu vào ban đầu.

Võng mạc , 8 byte

%`^

Hãy thử trực tuyến!

Có bốn khoảng trống trên dòng thứ hai. Các giải pháp thay thế sử dụng một m`^hoặc %1`hoặc 1%`trên dòng đầu tiên. Tất cả những thứ này khớp với vị trí ở đầu mỗi dòng và thay thế nó bằng bốn khoảng trắng.

Cheddar, 31 byte

@.lines.map(("    ":+)).asLines

Thực sự đơn giản, nhưng tôi đã đăng vì nó cho thấy các nhà khai thác chức năng mới.

(" ":+)cũng giống như A -> " " + A. (tức là +op là một hàm có " "ràng buộc với LHS).

Tôi không nghĩ thậm chí cần giải thích

Python ,  44  39 byte

Bỏ qua & nbsp; 44 & nbsp; không còn 44 :)

-5 byte nhờ vào ovs (tránh dequeue với khoản trả trước)

lambda s:' '*4+s.replace('\n','\n    ')

Hãy thử trực tuyến!

JavaScript, 26 byte

Cảm ơn @Conor O'Brien vì đã chơi golf 8 byte

x=>x.replace(/^/gm,"    ")

Thay thế bằng một regex bằng / g thay thế tất cả các trường hợp. m làm cho regex xử lý riêng từng dòng cho đầu chuỗi ^.

Hãy thử trực tuyến!

Python 2, 87 45 byte

print' '*4+'\n    '.join(input().split('\n'))

Đầu vào được lấy là 'Line1\nLine2\nLine3...'(Báo giá cần thiết)

Cảm ơn @WheatWizard đã cho tôi một ý tưởng giúp tôi chơi golf 42 byte.

Thạch , 8 byte

Ỵṭ€⁶ẋ4¤Y

Hãy thử trực tuyến!

Làm sao?

Ỵṭ€⁶ẋ4¤Y - Main link: string
Ỵ        - split on newlines
      ¤  - nilad followed by ink(s) as a nilad:
   ⁶     -     a space character
    ẋ4   -     repeated four times
 ṭ€      - tack for €ach
       Y - join with newlines

Một số biến thể 8 byte khác là:
Ỵṭ€⁶Yµ4¡(4 lần lặp lại phân tách trên dòng mới, giải quyết một khoảng trắng);
⁶ḤḤ;ЀỴY(nhân đôi hai lần giống như nhân với 4, Ѐánh xạ qua đối số đúng, vì vậy chúng ta có thể nối thay vì giải quyết);
và sắp xếp lại chúng.

Emacs, 5 móc khóa, 5 byte

C-x h M-4 C-x tab

Trong ít nhất một mã hóa thường được sử dụng cho mục nhập bàn phím, mỗi bàn phím này là một byte : 18 68 b4 18 09. Các mục Emacs có xu hướng rất nặng, vì mỗi ký tự ASCII có thể in được, tự nó ngoại trừ ký tự tiếp theo của lệnh đa ký tự (có nghĩa là chỉ có thể sử dụng các phím bấm để đưa ra các lệnh thực tế).

Tôi không chắc làm thế nào điều này so sánh với Vim (trái ngược với V). Nhưng Vim được sử dụng khá phổ biến trên PPCG, và vì vậy tôi nghĩ rằng phía bên kia của cuộc chiến biên tập cũng xứng đáng được chú ý.

Điều này giả định rằng I / O được thực hiện thông qua bộ đệm (tương đương với các quy ước I / O thông thường cho vim), hoặc được lấy từ một tệp và xuất ra màn hình (đi kèm với điều tương tự). Thay vào đó, nếu bạn thực hiện I / O thông qua khu vực, điều này là tự nhiên đối với một số dạng chương trình, bạn có thể xóa hai ký tự đầu, với số điểm là 3 byte; tuy nhiên, tôi không nghĩ rằng tuân thủ các quy tắc PPCG.

Giải trình

C-x h M-4 C-x tab
C-x h               Specify the entire buffer as the region
      M-4           Give the argument 4 to the next command that runs
          C-x tab   Increase the indentation level of each line by a constant

Nội dung cuối cùng được sử dụng ở đây, tất nhiên, vô cùng hữu ích cho thử thách này; phần còn lại chỉ là cấu trúc.

PowerShell, 29 28 byte

"$args"-split"
"|%{" "*4+$_}

-1 Cảm ơn fergusq, sử dụng một dòng mới thực tế thay vì `n

lấy "$args"đầu vào dưới dạng một chuỗi (truyền bằng cách sử dụng "s) và đặt -splitnó trên một dòng mới, sau đó lặp ( %{}) qua nó, nối thêm bốn khoảng trắng ( " "*4) và dòng ( $_) sau đó xuất ra nó một cách ngầm định.

Bình, 10 byte

jm+*4\ d.z

Thử nó!

Nếu đầu vào dưới dạng danh sách các dòng sẽ được cho phép, tôi có thể thực hiện trong 7 byte:

jm+*4\ 

Hãy thử nó

giải pháp dài hơn:

12 byte:

+*4d:Eb+b*4d

12 byte:

+*4dj+b*4d.z

13 byte:

t:E"^|
"+b*4d

Röda , 21 byte

{(_/"
")|[`    $_
`]}

Hãy thử trực tuyến!

Nó là một chức năng ẩn danh. Đầu vào được kéo từ luồng.

Giải trình:

{
    (_/"\n") |        /* Splits the input at newlines */
    ["    ".._.."\n"] /* For each line, prints four spaces before the line */
}

Perl 5 , 11 + 1 = 12 byte

11 byte mã + -pcờ.

s/^/    /mg

Hãy thử trực tuyến!

Lần đầu tiên, các giải thích sẽ ngắn gọn: regex thay thế mỗi đầu dòng ( ^kết hợp với /msửa đổi) bằng bốn khoảng trắng - kết thúc.

Perl 6 , 11 byte

*.indent(4)

Thử nó

Mở rộng:

*\       # declare a WhateverCode lambda/closure (this is the parameter)
.indent( # call the `indent` method on the argument
  4      # with the number 4
)

sed , 16 10 9 byte

s/^/    /

Hãy thử trực tuyến!

Chỉnh sửa

Giảm kích thước giải pháp từ 16 xuống 10 byte nhờ Kritixi Lithos .

-1 byte nhờ seshoumara .

Java 7, 58 byte

String c(String s){return"    "+s.replace("\n","\n    ");}

Giải trình:

Hãy thử nó ở đây.

• Nối với bốn không gian hàng đầu
• Thay thế mỗi dòng mới cho một dòng mới + bốn khoảng trắng

Brain-Flak , 109 103 byte

-6 cảm ơn Wheat Wizard

Bao gồm +1 cho -c

((()()()()()){}){(({}<>)[()()((()()()()){})]<(((((({}){}){}))))>){(<{}{}{}{}{}>)}{}<>}<>{({}<>)<>}<>{}

Hãy thử trực tuyến!

((()()()()()){})        # Add a newline to the beginning
                        # This is needed to get spaces infront of the first line)
{                       # For every character (call it C)
  (({}<>)               #   Move C to the other stack
  [()()((()()()()){})]  #   Push 8 and subtract 10 (\n) from C
  <(((((({}){}){}))))>) #   Push 4 spaces using the 8 from earlier
  )                     #   Push C - 10
  {(<                   #   If C - 10 != 0...
    {}{}{}{}{}          #     Pop the 4 spaces that we added
  >)}{}                 #   End if
  <>                    #   Switch stacks to get the next character
}                       # End while
<>{({}<>)<>}<>          # Reverse the stack (back to the original order)
{}                      # Pop the newline that we added

PHP, 43 byte

<?="    ".strtr($_GET[0],["\n"=>"\n    "]);

Xếp chồng lên nhau , 13 byte

'^'4' '*mrepl

Hãy thử trực tuyến!

Giải trình

'^'4' '*mrepl      (* input: top of stack *)
        mrepl      perform multiline regex replacements,
'^'                  replacing /^/ with
   4' '*             four spaces

Octave, 17 byte

@(s)["    "';s']'

Hãy thử trực tuyến!

MATL , 12 byte

10&Yb"4Z"@gh

Đầu vào là một chuỗi với dòng mới. Để nhập cái này, bạn cần nối ký tự 10 giữa các ký tự bình thường để thể hiện dòng mới (dấu ngoặc vuông là concatenattion):

['Code' 10 'More code']

Hãy thử nó tại MATL trực tuyến!

Giải trình

10&Yb   % Implicit input. Split at char 10 (newline). Gives cell array of strings
"       % For each
  4Z"   %   Push string of 4 spaces
  @g    %   Push the contents of current cell array, i.e. a string with one of the
        %   original lines
  h     %   Concatenate the two strings horizontally
        % Implicit end. Implicit display

PHP, 16

echo"    $argn";

chạy với php -R <code>. -Rchạy mã đã cho cho mỗi dòng đầu vào và $argnđược cung cấp dòng đầu vào hiện tại. Vì vậy, điều này chỉ đơn giản là in mỗi dòng với bốn không gian phía trước nó.

V , 3 byte (Không cạnh tranh)

4>G

Đây là câu trả lời sử dụng một tính năng mà tôi đã lên kế hoạch thêm một thời gian, nhưng chỉ cần thêm vào ngày hôm nay. Điều đó làm cho câu trả lời này không cạnh tranh và không hợp lệ để giành chiến thắng. Nhưng thật tuyệt khi thể hiện một tính năng hữu ích / cạnh tranh như vậy!

Hãy thử trực tuyến!

Giải trình:

4>   " Add an indent of 4 to...
  G  "   Every line from the current line (0 by default) to the end of the buffer

Vim, 6 tổ hợp phím

<Ctrl-V>G4I <Esc>

Giả sử rằng con trỏ ở đầu tệp, như thể bạn đã mở tệp từ dòng lệnh thông qua vim filename.

<Ctrl-V>            " Enter visual block move (enables rectangular selection)
        G           " Move to bottom line (selecting the entire first column)
         4          " Repeat the following action 4 times
          I         " Insert at start of (each selected) line
                    " [input a space]
            <Esc>   " Exit insert mode

Với một vim được cấu hình để sử dụng 4 khoảng trắng để thụt lề, đó sẽ là 2 lần nhấn phím : >G.

Japt , 7 6 byte

Đã lưu 1 byte nhờ @ETHproductions

miS²²R

Hãy thử trực tuyến!

Giải trình:

miS²²R
m       // At each char in the input:
 iS²²   //   Prepend " " repeated 4 times
     R  // Rejoin with newlines  

UberGenes , 62 byte

Tôi đã phải tham gia thử thách này với UberGenes, vì một chương trình rất giống nhau (chỉ chèn một khoảng trắng) là một trong những chương trình đầu tiên tôi từng viết bằng ngôn ngữ và có vẻ như nó sẽ dễ dàng sửa đổi cho mục đích này.

=aA=p9=z4=cI=AC+a1-z1:pz=Ao:CA:Ii  =b5+b5-bA+a1=d3*d7:db=i0   

Làm thế nào nó hoạt động:

=aA                                                         Set a to 61
                                                            (Begin main loop)
   =p9                                                      Set p to 9
      =z4                                                   z counts spaces
         =cI                                                Set c to 61
                                                            (Jumping to p jumps here)
            =AC                                             Put the space at position 61
                                                              at position a.
               +a1-z1                                       Move a right and decrement z
                     :pz                                    Jump to p if z is nonzero
                                                            (Jumping to d jumps here)
                        =Ao                                 Read a character to position a.
                           :CA                              Jump to position 32+3 if input
                                                              was nonzero.
                              :Ii                           Otherwise, jump to position 61,
                                                              causing the entire string
                                                              that begins there to be
                                                              printed before halting.
                                                            (This is position 32+3=35)
                                   =b5+b5                   Set b to 10 (newline).
                                         -bA                Subtract the input character to
                                                              compare it with newline.
                                            +a1             Move a right.
                                               =d3*d7       Set d to 21
                                                     :db    Jump to d if not newline.
                                                        =i0 Jump back to begin main loop.
(The 3 spaces at the end position a space character at position 61 so that, after =cI,
C refers to the space character--it will also be the first space printed.)

CJam , 11 byte

Cảm ơn @ Challenger5 đã chỉnh sửa

qN/{S4*\N}%

Hãy thử trực tuyến!

Giải trình

q              e#  Read whole input as a string with newlines
 N/            e#  Split at newlines, keeping empty pieces. Gives an array of strings
   {     }%    e#  Map this function over the array of strings
               e#  The current string is automatically pushed
    S4*        e#  Push a string of four spaces
       \       e#  Swap. Moves the original string after the four spaces
        N      e#  Push a newline
               e#  Implicity display stack contents

J-uby , 17 16 byte

~:gsub&' '*4&/^/

Giải trình

~:gsub           # :gsub with reversed arguments: 
                 # (f)[regex,sub,str] == str.gsub(regex, sub)
      &' '*4     # replace with four spaces
            &/^/ # match the start of each line

Điều này trực tiếp dịch thành (trong Ruby):

->s{s.gsub(/^/,' '*4)}

Trên thực tế , 16 byte

9uc;§s⌠' 4*+⌡M@j

Hãy thử trực tuyến!

Giải trình:

9uc;§s⌠' 4*+⌡M@j
9uc;              push two newlines
    §s            raw input, split on newlines
      ⌠' 4*+⌡M    for each line:
       ' 4*+        prepend 4 spaces
              @j  join with newlines

C, 66 65 byte

p(){printf("    ");}f(char*s){for(p();*s;)putchar(*s++)-10||p();}

Hãy thử trực tuyến!