Giriş:

• olması garanti edilen bir tamsayı .$n$$\ge3$
• biri olan bir tamsayı .$d$$[-1,0,1]$

Çıktı:

ise kuzeybatı yönünde olacak boyutunda bir yol ; ise kuzey yönü ; veya ise kuzey doğu yönü . Yol her zaman üç boşluk olacak (veya dış sınırları da dahil edersek genel olarak beş) olacak. Ek olarak, alt kısımda bir yol ayırma çizgisi olacaktır ve bundan sonra yukarı doğru ilerlerken dönüşümlü olarak olacaktır.$n$$d=-1$$d=0$$d=1$

Bazı örnekler:

Giriş: Çıkış:$n=7, d=1$

      / / /
     /   /
    / / /
   /   /
  / / /
 /   /
/ / /

Giriş: Çıkış:$n=4, d=-1$

\   \
 \ \ \
  \   \
   \ \ \

Meydan okuma kuralları:

• Ekranda herhangi bir yere gerekli yolu yazdırdığı sürece, her türlü satır aralığı / / veya yeni satır kabul edilebilir.
• Seçenekler yerine, bunun yerine veya seçeneklerini kullanmanıza izin verilir . Ayrıca, üç seçenek haritasından hangisinin üç yönden hangisinin olacağını seçebilirsiniz. ( Bu meydan okuma tanımında kullanılanlar için sırasıyla den farklıysa hangi seçenekleri kullandığınızdan emin olun !)$[-1,0,1]$$[0,1,2]$$[1,2,3]$$[-1,0,1]$[north-west, north, north-east]
• Herhangi bir makul çıktı biçimi kabul edilebilir. Tabii ki en yaygın olanı STDOUT'a yazdırmaktır, ancak dizge veya 2D karakter listesi olarak döndürmek de iyidir.

Genel kurallar:

• Bu kod golf , bayt cinsinden en kısa cevap kazanır.
  Code-golf dillerinin, codegolfing olmayan dillerle cevap göndermekten vazgeçmesine izin vermeyin. Herhangi bir programlama dili için mümkün olduğunca kısa bir cevap bulmaya çalışın.
• Standart G / Ç kurallarına cevabınız için standart kurallar geçerlidir , bu nedenle STDIN / STDOUT işlevlerini, uygun parametreleri içeren fonksiyonlar / yöntemleri ve dönüş tipini, tam programları kullanmanıza izin verilir. Senin çağrı.
• Varsayılan Loopholes yasaktır.
• Mümkünse, lütfen kodunuzu test eden bir bağlantı ekleyin (ör. TIO ).
• Ayrıca, cevabınız için bir açıklama eklemek şiddetle tavsiye edilir.

Test durumları:

Yukarıdaki iki örnek ve:

Giriş: Çıkış:$n=10, d=0$

|   |
| | |
|   |
| | |
|   |
| | |
|   |
| | |
|   |
| | |

Tuval , 23 22 bayt

B}⁴H‟ｍ↶⁷？／|∙/╋］＼|∙\╋］｝

Burada dene!

0, 1 ve 2 yön girişlerini kullanır.

Açıklama:

...‟    push "--¶¶- ¶¶--"
    m   mold the horizontal length to the 1st input - a horizontal road
     ↶  rotate counter-clockwise - so the separator is on the bottom
        also replaces the dashes with bars

⁷?     ]     ]}  switch over the 2nd input:
                 default case (input 2):
  /                pad with spaces to a "/" diagonal
   |∙/╋            replace "|" with "/"
                 case 0:
        \          pad with spaces to a "\" diagonal
         |∙\╋      replace "|" with ""

case 1 is empty, but because of a bug, the trailing "}" is still required

Python 2 , 79 78 73 72 bayt

n,d=input()
c='|\/'[d]
i=n
while i:print' '*(n-i*d)+c,i%2*c or' ',c;i-=1

Çevrimiçi deneyin!

Alır [1,0,-1]için[north-west, north, north-east]

_{-1 bayt, Neil sayesinde}

Python 2 , 66 bayt

n,d=input()
s=' '+'|\/'[d]
for c in(s*n)[n:]:print' '*n+s,c+s;n+=d

Çevrimiçi deneyin!

Kullanımları d=-1NE için d=0N için ve d=1NW için. İzin verilen öncü alanlardan yararlanır. Yolun alt bölümünün bir ayırıcıya sahip olması kuralı , paritenin doğru olmasını sağlamayı zorlaştırdı; boşluk ve yol karakteri arasındaki değişimlerin (s*n)[n:]ikinci yarısını alan dilimleme ile elde edilir 2n.

1. Python 3.5, 122 120 bayt

Senaryo iki paragraf alır: n, d.

d: 0, 1, 2 -> \ | /

tio.run

import sys;(n,d)=[*map(int,sys.argv[1:3])];c="\\|/"[d]
for i in range(n):j=n+~i;print(" "*(i,0,j)[d],c,c*(j%2<1)or" ",c)

çıktı:

$ ./script.py 6 2
      /   /
     / / /
    /   /
   / / /
  /   /
 / / /
$ ./script.py 6 1
 |   |
 | | |
 |   |
 | | |
 |   |
 | | |
$ ./script.py 6 0
 \   \
  \ \ \
   \   \
    \ \ \
     \   \
      \ \ \

açıklama

# parse input params
(n,d)=[*map(int,sys.argv[1:3])]

# select char for "road"
c="\\|/"[d]

# loop n-times
for i in range(n):

    # complement (how many lines to end)
    j=n+~i

    # print
    #   space i or 0 or j times
    #   road, center of road if j is even else space, road
    print(" "*(i,0,j)[d], c, c*(j%2<1) or " ", c)

edit: -2 byte Kevin Cruijssen sayesinde

PowerShell , 88 82 80 74 71 bayt

^{-Mazzy sayesinde -8 bayt , AdmBorkBork sayesinde -6 bayt ve AdmBorkBork sayesinde -Mazzy
-3 bayt sayesinde}

param($n,$d)$n..1|%{' '*($_,($n-$_))[$d]+($y='/\|'[$d])," $y"[$_%2],$y}

Çevrimiçi deneyin!

NW, NE, N için [0,1,2] kullanır d. İlk önce boşluk bırakma yöntemini almak için iki kez liste dizini olarak kullanır (0 değerini döndüren 2 kullanılırken listeden çıkarılır) ve sonra çizgileri çizerken kullanılacak karakter. Yolu oluşturan boşluk dizesine bir liste ekler (bunlar, eklendiğinde üyeler arasında boşluklar vardır). Ayrıca, modulo matematiğine dayalı açık bir şerit veya kısa çizgi arasında geçiş yapar.

C (gcc) , 100 90 bayt

f(a,b,c,d){for(c=a,d="\\|/"[b+1];c--;)printf("%*c %c %c\n",b>0?c+1:b?a-c:0,d,c%2?32:d,d);}

Çevrimiçi deneyin!

İyi yazılmış versiyon

Kömür , 33 29 23 bayt

↷ＮＮη⊘⊕ηＵＥ¹¦¹Ｆ⟦²±²⟧«Ｊι⁰η

Çevrimiçi deneyin! Bağlantı, kodun ayrıntılı bir versiyonudur. Şimdi tüm temel kömür hatalarının giderildiği görülüyor ve optimal kodun reklamını yapabiliyorum. Açıklama:

↶Ｎ

İlk girişe göre imleç yönünü saat yönünün tersine çevirin, böylece 1 kuzey doğu, 2 kuzey ve 3 kuzey batı olur.

Ｎη

Yolun uzunluğunu giriniz.

⊘⊕ηＵＥ¹¦¹

Yol uzunluğunun yarısını yazdırın ve ardından yol ayırıcıyı vererek gerin.

Ｆ⟦²±²⟧«Ｊι⁰η

Yolun kenarlarını yazdırın.

@KevinCruijssen, daha sonra silinmiş olan bu sorunun daha zor bir versiyonunu sundu, ancak yeterince cevap sahibi kullanıcılar, onu burada görebilir: Kod Zor (Zor) Yolu Bu cevapta kullandığım germe hilesi bu soru için geçerli değil aşağıdaki 47 45 baytlık programı yazdı :

Ｆ³«Ｊ×ι⊘⊕θ⁰≔…⟦¹ ⟧⊕﹪ι²ιＦη«↶§κ⁰Ｆ⊖§κ¹§ιⅉＰ§ιⅉ↑↷§κ⁰

Çevrimiçi deneyin! Bağlantı, kodun ayrıntılı bir versiyonudur. Açıklama:

Ｆ³«

Kenarlar ve ayırıcı üzerinde döngü.

Ｊ×ι⊘⊕θ⁰

Yanın başlangıcına atla.

≔…⟦¹ ⟧⊕﹪ι²ι

A 1ve boşluk içeren bir dizi yapın , ancak ayırıcı yerine tarafları çizersek alanı tekrar kaldırın.

Ｆη«

Her yol bölümünün üzerinde döngü.

↶§κ⁰

İmleç yönünü uygun şekilde çevirin.

Ｆ⊖§κ¹

Yol bölümünün uzunluğundan az birinden fazla döngü ...

§ιⅉ

... ve dizinin alternatif öğelerini yazdırın. Değişim, imlecin Y koordinatı ile diziye periyodik olarak indeksleme ile sağlanır.

Ｐ§ιⅉ

Bu yol bölümünün son satırını yazdır, ancak imleci hareket ettirmeden ...

↑

... böylece imleç bir sonraki bölüm için hazır duruma getirilebilir.

↷§κ⁰

İmleç yönünü bir sonraki bölüm için hazır duruma getirin.

Kotlin , 96 92 bayt

{n,d->val c="\\|/"[d];(0..n-1).map{println(" ".repeat(n-it*(d-1))+ "$c ${" $c"[it%2]} $c")}}

[-1, 0, 1] yerine [0, 1, 2] kabul eder

Diğer dillerdeki çözümlere benzer şekilde çalışır, ancak ne yazık ki Kotlin bu konuda pek parlamadı.

val c=“\\|/“; Kotlin'in karakter dizilerini karakter dizisi gibi ele almasından (olması gerektiği gibi, Java'ya bakması) avantajlarından faydalanarak yol yapımında kullanılacak kömürü alır.

Çevrimiçi deneyin!

TSQL kodu, 171 117 bayt

Bunun kod olarak daha kısa yazılabileceğini anladım.

DECLARE @n INT=7,@d INT=0

,@ INT=0a:PRINT
space(@n-@*@d)+stuff(replicate(substring('\|/',@d+2,1)+' ',3),3,@%2,space(@%2))SET
@+=1IF @n>@ GOTO a

TSQL sorgusu, 137 bayt

USE master
DECLARE @n INT=6,@ INT=-1

SELECT space(@n-y*@)+z+iif(y%2=1,z,'  ')+z 
FROM(SELECT top(@n)row_number()over(order
by @)y,' '+substring('\|/',@+2,1)z FROM spt_values)x

Eğer veritabanınız master ise, USE master gerekli değildir. Ancak bazı kullanıcılar farklı bir varsayılan veritabanına sahiptir.

Senaryo ne zaman dışarı çalışırken biraz farklıdır. Ascii-32 alanını ascii-160 ile değiştirmek zorunda kaldım, boşluklar gösterilmedi.

Denemek

Biraz tweaks yaptım ve değiştirebileceğimi fark ettim.

1/0 sipariş

ile

tarafından sipariş @

JavaScript (ES8),  90 87  85 bytes

Takes input as (direction)(length). Expects $0$ for North-West, $1$ for North or $2$ for North-East.

d=>g=(n,w=n)=>n?(c='/|\\'[d]).padStart([n--,,w-n][d])+` ${n&1?' ':c} ${c}
`+g(n,w):''

Try it online!

JavaScript (ES6), 90 bytes

This one draws the output character by character with a little more maths instead of the .padStart() method.

Takes input as (direction)(length). Expects $1$ for North-West, $2$ for North or $3$ for North-East.

d=>n=>(g=x=>y?` /|\\
`[x+5?17+y%2*4>>--x+5-[,n+1-y,n,y][d]&1&&d:(x=n,y--,4)]+g(x):'')(y=n)

Try it online!

Jelly,  31  30 bytes

⁶ẋẋƤḂ};€ị“\/|”ẋ3KƊ}Ṛ⁹¡⁶-2¦€ÐeṚ

A dyadic Link accepting the length on the left and the negated-direction* on the right which yields a 2d array of characters.
* [north-west, north, north-east]=[1, 0, -1]

Try it online! (footer calls the Link, joins with newline characters and prints the result)

How?

⁶ẋẋƤḂ};€ị“\/|”ẋ3KƊ}Ṛ⁹¡⁶-2¦€ÐeṚ - Link: integer, L; integer, D
⁶                              - space character
 ẋ                             - repeat L times
     }                         - using the right argument (D):
    Ḃ                          -   mod 2 (0 if D = 0, 1 otherwise ...A would work too)
   Ƥ                           - for each prefix (of the list of spaces):
  ẋ                            -   repeat (D mod 2 times)
                  }            - using the right argument (D):
                 Ɗ             -   last three links as a monad:
        ị“\/|”                 -     index into "\/|" (1-indexed & modular)
              ẋ3               -     repeat three times - e.g. "\\\"
                K              -     join with spaces          "\ \ \"
      ;€                       - concatenate €ach (altered prefix with that list)
                     ¡         - repeat action...
                    ⁹          - ...number of times: right argument (-1 repeats 0 times)
                   Ṛ           - ...action: reverse (i.e. reverse if north-west)
                           Ðe  - for even indexes:
                         ¦€    -   sparse application for €ach...
                       -2      -   ...to indices: [-2] (the middle of the road)
                      ⁶        -   ...action: a space character
                             Ṛ - reverse

Python 2, 127 bytes

n,d=input()
c='|/\\'[d]
for i in range(n):t=0if d==0else(i if d<0else n-i);print(' '*t+'{} {} {}'.format(c,' 'if i%2==0else c,c))

Try it online!

First two lines taken from @TFeld.

Python 2, 93 bytes

n,d=input();p=''
while n:g='|/\\'[d];n-=1;print['',' '*n,p][d]+g+' %s '%(g,' ')[n%2]+g;p+=' '

Try it online!

J, 64 bytes

' \|/'{~(_2&|*[:i.[*1 _1{~3=])|."_1((5+[){."1(5,~[)|.@$]*#:@689)

Try it online!

• 1 North-West
• 2 North
• 3 North-East

Will try to golf it later

C# (Visual C# Interactive Compiler), 129 107 103 93 bytes

a=>b=>{for(char i=a,W="/|\\"[b+1];i>0;)Write("{0,"+(a-i*b+5)+"} {1} {0}\n",W,--i%2<1?W:' ');}

-1 for north-east, 1 for north-west, 0 for north

Try it online!

Red, 157 bytes

func[s d][p: pick"\|/"d set[a b]reduce pick[[4 1]0[5 + s -1]]d 
repeat n s[print pad/left form reduce pick[[p" "p][p p p]]odd?(n + pick[1 0]odd? s)a: a + b]]

Try it online!

• 1 North-West
• 2 North
• 3 North-East

Japt, 53 bytes

W="|/\\"gV;Æ"{W} {YÉ %2?W:' } {W}"ùVÄ?V?Y+5:5:U-Y+4Ãw

Try it Online!

Swift 4.2, 112 108 bytes

^{-4 bytes thanks to Sriotchilism O'Zaic}

let c=["\\","|","/"][d];(0..<n).map{print((0..<n-$0*(d-1)).map{_ in" "}.joined()+c+" \($0%2==0 ?c:" ") "+c)}

[0,1,2] instead of [-1,0,1].

Try it online!

Explanation

let c=["\\","|","/"][d]

Determines the street sign to use. (I bet this can be shortened somehow)

(0..<n).map{

Iterates over the length of the street.

(0..<n-$0*(d-1)).map{_ in" "}.joined()

Adds the spaces in front of the street.

\($0%2==0 ?c:" ")"

Adds the middle sign to every other line.

My very first one ☝️, I'm happy about any optimization advices. Learned mostly from that thread: Tips for golfing in Swift.

Perl 6, 66 bytes

->\n,\d{{(' 'x--$ *d%-+^n~(' ',<\ | />[d+1])[1,(n+$++)%2,1])xx n}}

Try it online!

Returns a list of lines.

Explanation

->\n,\d{                                                         }  # Block taking n, d
        {                                                       }   # Reset $ variables
         (                                                 )xx n    # Repeat n times
          ' 'x  # Space times
              --$ *d  # (-1,-2,-3,...) if d=1
                      # (0,0,0,...) if d=0
                      # (1,2,3,...) if d=-1
                    %-+^n  # modulo -~n = n+1
                         ~  # Concat
                          (' ',<\ | />[d+1])  # Space or line
                                            [1,(n+$++)%2,1]  # Alternate middle char

Ruby, 90 bytes

n,a=*$*.map{|i|-i.to_i}
c='|\/'[a]
n.upto(-1){|i|puts' '*(i*a-n)+c+' '+[' ',c][i%2]+' '+c}

Try it online!

UPDATE: Thank you, Kevin, for pointing out that my original submission was missing spaces between the road edges and markers (i.e., 3-width roads instead of 5-width.) That said, there might be a shorter fix for that than c+' '+...+' '+c.

Directional information: -1, 0, 1 maps to { north-west, north, north-east }

Arguments: this reads command-line arguments such as 4 -1 (a four row road, slanted to the north-west).

Additional note: This was tested locally with Ruby v2.6.1, and it appears that Try It Online uses Ruby v2.5.3. I have no reason to think it would not work with all other Ruby versions.

Java (JDK), 116 bytes

d->n->{for(int c="\\|/".charAt(d),i=n;i-->0;)System.out.printf("%"+(d<1?n-i:d>1?i+1:1)+"c%2c %c%n",c,i%2<1?c:32,c);}

Try it online!

Takes d as one of 0, 1 or 2.

Japt -R, 40 bytes

Æ=Vg"|\\/";²i1S+iX%2?S:U)iSp[TZÊ-YY]gVÃw

Try it online!

Explanation:

Æ=Vg"|\\/";²i1S+iX%2?S:U)iSp[TZÊ-YY]gVÃw
                                            // U = road size
                                            // V = direction
Æ                                     Ã     // Loop X through [0...U]
 =        ;                                 //   Set U to:
    "|\\/"                                  //       "|\/"
  Vg                                        //            [V]
           ²                                //  Double U
            i1          )                   //  Insert at index 1:
              S+                            //    " " +
                 X%2?S:U                    //         X%2?" ":U
                i                           //                  + " "
                         i                  //  Insert at index 0:
                          Sp                //    " " repeated this many times:
                            [TZÊ-YY]        //      [0,U.length - X,X]
                                    gV      //                        [V]
                                        w   // Reverse output

Stax, 23 bytes

ù╒←∩♂2Ωⁿ¡├∩22♀Ç○=÷â╧δÖ↑

Run and debug it

Input is two integers separated by a space.
The first is d. -1 specifies north-east. 0 for north. 1 for north-west. The second parameter is n. These two values will get implicitly parsed from input and placed on the input stack with n on top. Additionally d will be accessible from the stax's x register since it's the first implicitly parsed value.

For example, input "1 7"

            Main stack      Explanation
            ----------      -----------
;           [7]             peek from input stack
m                           map over integers [1..n] using the rest of the program
                            output each produced value implicitly
  ;         [1 7]           peek from input stack
  +         [8]             add
  .*"       [8 [42 34]]     2 character string literal with codepoints 42 and 34
  @         [42]            get the element at the specified modular index (8)
  0         [42 0]          literal zero
  "|\/"x@   [42 0 92]       get codepoint from string literal at input d (from x register)
  \         [42 [0 92]]     make pair
  :B        ['\ \ \ ']      encode in custom base; it's binary with custom codepoints
  _x*       ['\ \ \ ' 1]    (loop variable) * (input d)
  ;^        ['\ \ \ ' 1 8]  peek from input stack and increment
  %         ['\ \ \ ' 1]    modulus
  6+        ['\ \ \ ' 7]    add 6
  )         [' \ \ \ ']     left-pad to length

Run this one

perl -M5.010 -Mfeature=signatures, 97 bytes

sub f($n,$d){$x=qw[| / \\][$d];say" "x($d<1?$_*-$d:$n-$_),$x,$",($n-$_)%2?$":$x,$",$x for 1..$n;}