我很累，但似乎无法入睡。帮我数羊。

给定输入N（正整数），使N只羊跳过ascii栅栏，如以下示例所示。一次只能显示一帧：

o |-|
──|-|──  0

 o|-|
──|-|──  0

   o
  |-|
──|-|──  0

  |-|o
──|-|──  0

  |-| o
──|-|──  0

o |-|
──|-|──  1

 o|-|
──|-|──  1

   o
  |-|
──|-|──  1

计数应保持在“地面”的右下角。允许尾随和前导空格以及换行符。如果您选择的语言难以清除每一帧的屏幕，则可以添加足够的换行符来清除屏幕-请在回答中说明为此添加的行数。该程序应在第N只羊位于第五层时终止。

我明天需要早起，所以以字节为单位的最短代码会获胜。请提交功能或完整程序。有标准漏洞。

MATL，60 56 53字节

:"@qXJx[HKCbO]"7Z"'  |-|  'v'o'@('--|-|--  '  JVhXxXD

上面代码的动画运行非常快。以下版本包含一个暂停，以使动画变慢并因此更易于观看（挑战不需要），但要多花4个字节：

:"@qXJx[HKCbO]"7Z"'  |-|  'v'o'@('--|-|--  '  JVhXxXD.2Y.

在MATL在线上尝试一下！口译员是测试版；刷新页面（如果它不起作用）。

或查看脱机编译器的记录：

说明

:"              % Input N implicitly. Repeat N times
  @q            %   Push iteration index minus 1, that is, from 0 to N-1. This
                %   are the numbers of sheep
  XJx           %   Copy into clipboard J and delete
  [HKCbO]       %   Push array [2 4 7 -2 0]
  "             %   For each value in that array. This loops generates the 5
                %   frames for each number of sheep
    7Z"         %     Push string of 7 spaces
    '  |-|  '   %     Push this string
    v           %     Concatenate vertically. This gives a 2x7 char array
                %     with the upper part of the frame, except the 'o',
                %     which will be now placed in a varying position 
    'o'         %     Push string 'o'
    @           %     Push loop variable, that is, 2, 4, 7, -2 or 0
    (           %     Write 'o' into that position of the 2x7 char array.
                %     The position is interpreated linearly, that is, a single
                %     number is used as index into the 2D array in column-major
                %     order (down, then across). So index 2 is lower-left corner,
                %     index 4 is to the right of that etc. Indexing is
                %     semi-modular (modular for non-positive values). So 0 is
                %     the lower-right corner, and -2 is to the left of that
    '--|-|--  ' %     Push this string
    JV          %     Push current number of sheep converted to string
    h           %     Concatenate horizontally
    Xx          %     Clear screen
    XD          %     Display all stack contents
    .2Y.        %     Pause for 0.2 seconds (optional)
                %   End implicitly
                % End implicitly

的JavaScript（ES6），120个 124字节

f=(n,m=`   2
43|-|10
──|-|── `,s=0)=>n?alert(m.replace(s%5,'o').replace(/\d/g,' ')+' '+(n-1),(++s%5?f(n,m,s):f(n-1,m,0))):''

计算的最后一帧首先显示。由于此跳转数字为n-1
In alert，字符的宽度不同，因此看起来好像坏了。

f=(n,m=`   2
43|-|10
──|-|── `,s=0)=>n?alert(m.replace(s%5,'o').replace(/\d/g,' ')+' '+(n-1),(++s%5?f(n,m,s):f(n-1,m,0))):''
;

f(2);//You'll get 10 alert popup

先前的答案：

120个字节，跳转号是错误的，因为它从1而不是0开始

f=(n,m=`   2
43|-|10
──|-|── `,s=0)=>n?alert(m.replace(s%5,'o').replace(/\d/g,' ')+' '+n,(++s%5?f(n,m,s):f(n-1,m,0))):''

的JavaScript（ES6），144个 142字节

清除输出并在每帧之间等待300ms：

n=>(F=j=>((c=console).clear(),c.log(`   2
01|-|34
──|-|── `.replace(/\d/g,i=>(j-i)%5?' ':'o')+(j/5|0)),++j<n*5&&setTimeout(`F(${j})`,300)))(0)

您可以在此处进行测试（确保打开控制台）。

Ruby，83个字节

->n{(n*5).times{|i|$><<"   c
  |-|  
ab|-|de  #{i/5}
".tr('abcde',' '*(i%5)+'o ')}}

打印到标准输出。输出以换行符分隔。将屏幕高度减小到3可使一次仅显示一幅图像。

C＃，234个字节

using C=System.Console;class P{static void Main(string[]a){for(int n=0;n-1+""!=a[0];++n){foreach(int p in new[]{5,6,3,10,11}){C.Clear();C.Write("    \n  |-|  \n──|-|── ".Remove(p,1).Insert(p,"o")+n);for(var w=3e7;w>0;--w);}}}}

PHP + JavaScript，168字节

<?extract($_GET);$s="     ";$s[$f=++$f%5]=o;echo strtr("<pre>   C
AB|─|DE
──|─|── $c",EABCD,$s),($c+=!$f)<$n?"<script>location.href='s.php?n=$n&c=$c&f=$f'</script>":"";

保存到文件s.php，然后使用调用浏览器s.php?n=<n>。

每帧都使用新参数调用自身，没有延迟。

我可以再存5个index.php; 但我不想走那么远。

Tcl，168个字节

使用10行高屏幕的版本。（将7下面的屏幕高度替换为下面的四列。）

set s {0 1 2 3 4 }
for {set n 0} {$n<$argv} {incr n} {foreach x $s {
puts [string repe \n 6][string map [split $s {}] [string map "$x o" {   2
01|-|34
--|-|--  }]]$n}}

这运行得非常快，因此您可以在第二行添加一个暂停：

Tcl，177字节

set s {0 1 2 3 4 }
for {set n 0} {$n<$argv} {incr n} {foreach x $s {after 250
puts [string repe \n 6][string map [split $s {}] [string map "$x o" {   2
01|-|34
--|-|--  }]]$n}}

它通过将顶部的字符串重用于两种不同的方式来工作：

• 作为内循环的列表（以显示绵羊和围栏的每个版本）
• 作为数字→空间的映射，以从羊+栅栏图像模板中删除数字

模板本身就是要显示的字符串图像。首先，我们将绵羊的当前位置数字（内循环）映射（替换为字符串）为“ o”。然后我们将剩余的数字映射到空格。然后我们打印结果字符串。

（字符串本身从第三行的最后一个{开始，到最后一行的最左端}结束。）

QBasic，110个字节

INPUT n
FOR i=0TO 5*n-1
CLS
?
?"  |-|"
?"--|-|-- ";i\5
x=i MOD 5
LOCATE(x=2)+2,1+x-(x>1)+x\3
?"o"
SLEEP 1
NEXT

遍历5*n刻度线。在每个刻度上，清除屏幕，打印阶梯和绵羊数，然后用于在适当的位置LOCATE打印o。与x为0和4之间的位置的代码：

• 行： (x=2)+2
  • 如果x=2为真，则-1+2=1
  • 如果x=2为假，则0+2=2
• 柱： 1+x-(x>1)+x\3
  • 如果x是0或1，x>1则为false，并且x\3为0：1+x-0+0= 1或2
  • 如果x为2，x>1则为true，x\3为0：1+x-(-1)+0=4
  • 如果x是3或4，x>1则为true且x\3为1：1+x-(-1)+1= 6或7

最后，SLEEP持续1秒钟并循环。如果您不介意在每一帧按回车键，则可以通过删除参数来剃除两个字节SLEEP。

PHP，132个 131字节

在评论后进行编辑（谢谢！）：

<?php for(;$i<$argv[1]*5;sleep(1),system(clear),$c="    
  |-|  
──|-|──  ".floor($i/5),$c[[5,6,3,10,11][$i++%5]]=o)echo$c;

这是不符合要求的：

<?php

ini_set('error_reporting', '0');        # golfing precondition

for(; $i<$argv[1]*5;                    # repeat N times
  sleep(1),                             # sleep after iteration
  system(clear),                        # clear screen (linux only)
  $c = "    
  |-|  
──|-|──  " . floor($i / 5),             # define template
  $c[[5, 6, 3, 10, 11][$i++ % 5]] = o)  # replace with sheep (and finish "for" statement)
  echo $c;                              # output result

原始帖子

<?php $i=0;for(;;){system("clear");$c="  \n  |-|  \n──|-|──  ";$c[[3,4,1,8,9][$i%5]]='o';echo"  $c".floor($i++/5);sleep(1);}

在ubuntu上测试（不知道，是否system("clear")可以在Windows上运行）

取消高尔夫：

<?php
$i = 0;
for(;;) {
  system("clear");
  $content = "  \n  |-|  \n──|-|──  ";
  $content[[3,4,1,8,9][$i%5]] = 'o';
  echo "  $content " . floor($i++/5);
  sleep(1);
}

node.js + sleep，169字节

c='   2\n01|-|34\n──|-|──  '
for(i=0;i<process.argv[2]*5;require('sleep').sleep(1))console.log('\033[2J'+c.replace(i%5,'o').replace(/\d/g,' ')+Math.floor(i++/5))

原始解决方案

的node.js，146个 142 185字节

仅使用ubuntu终端进行了测试（现在使用n个羊）：

i=0
c='   2\n01|-|34\n──|-|──  '
setInterval(function(){console.log('\033[2J'+c.replace(i%5,'o').replace(/\d/g,' ')+Math.floor(i++/5))
if(process.argv[2]*5==i)process.exit()},9)

好吧，这是每9毫秒发送一帧。更加舒缓睡眠的版本（每1秒帧一次）：

i=0;setInterval(function(){console.log('\033[2J'+'   2\n01|-|34\n──|-|──  '.replace(i%5,'o').replace(/\d/g,' ')+Math.floor(i++/5))},1000)

和无高尔夫球场：

var i = 0;
setInterval(function(){
  console.log('\033[2J' + '   2\n01|-|34\n──|-|──  '.replace(i%5, 'o').replace(/\d/g, ' ') + Math.floor(i++/5));
}, 1000)

05AB1E，66 60 59字节

FNU5Fð4×N<i¨'oJ},N<iðë'o}ðNÉis}"|-|  "JN1›iR},…──|Â'-sððXJ,

使用CP-1252编码。

说明

迭代是指绵羊旅程的内部迭代（0-> 4）。

主循环

F      # For N in range [0 .. input)
 NU    # Save N in variable X
 5F    # For N in range [0 .. 5)

产生顶行

ð4×         # push 4 spaces
N<i    }    # if we're on the 2nd iteration
   ¨'oJ     # replace the last space with an "o"
,           # print row

产生中间行

N<iðë'o}     # push a space if we're on the 2nd iteration, else push "o"
ð            # push a space
NÉis}        # if we're on an odd numbered iteration, swap the stacks top 2 chars
"|-|  "      # push this string
J            # join the stack to one string
N1›iR}       # if we're on the any of the last 3 iterations, reverse the string
,            # print row

产生底行

…──|  # push the string "──|"
     # push a reversed copy
'-s   # push "-" between the 2 strings on the stack
ðð    # push 2 spaces
X     # push the N we saved in the main loop (current sheep number)
J,    # join and print row

果冻，55 54 53 字节

ị30214D¤“o    ”ṙ“   “
““|-|““
__|-|__  ”ż
×5Ḷµ:5ż@Ç€Y

在线试用

打印由换行分隔的帧。

怎么样？

ị30214D¤“o    ”ṙ“   “
““|-|““
__|-|__  ”ż           - Link 1, build a frame without counts: frameNumber
       ¤              - nilad and link(s) as a nilad:
 30214                -     literal 30214 (a nilad)
      D               -     to decimal: [3,0,2,1,4]
ị                     - index into (1-based and modular, so frames go 4,3,0,2,1,4,...)
        “o    ”       - string "o    "
               ṙ      - rotated to the left by that number
                “   “ - the rest, except the last character, is:
““|-|““               -     an array of strings ["   ","\n","","|-|","","\n__|-|__  "]
__|-|__  ”            -     i.e. split where a sheep might go

          ż           - zip the sheep (the rotated "o    ") into that

×5Ḷµ:5ż@Ç€Y - Main link: nSheep
×5          - multiply by 5 -> nFrames
  Ḷ         - lowered range: [0,1,2,...nFrames-1]
   µ        - monadic chain separation
    :5      - integer division by 5 (vectorises): [5 zeros, 5 ones, ..., 5 (nSheep-1)s]
      ż@    - zip with reversed arguments
        ǀ  - call last link (1) as a monad for each (zip sheep numbers with frames)
          Y - join with line feeds (TODO: replace with future animate frames atom :p)

Python 2中，171个 159 144字节，163个 151 136字符

使用递归函数的解决方案。呼叫为f（int）

编辑

重读注释并看到绵羊到达字段末尾时计数不必增加，因此返回-12

-15通过直接遍历索引列表并丢失变量

def f(a,x=0):
 if a>0:
  for c in 5,6,3,10,11:
   b=list('    \n  |-|  \n──|-|──  ');b[c]='o';print"\n"*50+"".join(b)+(`x`)
  f(a-1,x+1)

笔记

假设采用UTF-8编码

使用-而不是─（如@Luis MATL回答）将使字节数减少8以匹配字符数，并且将失去UTF-8依赖性

添加了50条换行符-输出位于控制台的底部（比导入和使用os.system（“ clear”）更便宜，并且在Windows和Linux上都可以使用）

版本之间的输出之间有1秒的时间延迟（170字节，162个字符）

import time
def f(a,x=0):
 if a>0:
  for c in 5,6,3,10,11:
   b=list('    \n  |-|  \n──|-|──  ');b[c]='o';print"\n"*50+"".join(b)+(`x`);time.sleep(1)
  f(a-1,x+1)

Bash +标准Linux实用程序（339字节）

e(){ echo "$@";}
n(){ e -n "$@";}
r(){ [ $? -eq 0 ]&&s=o||s=" ";[ $1 ]&&n " $s "||n "$s";}
f(){ k=$(($1%5));n "  ";[ $k -eq 2 ];r .;e "  ";for i in 0 1;do [ $k -eq $i ];r;done;n "|-|";for i in 3 4;do [ $k -eq $i ];r;done;e;n "──|-|──";}
for l in `seq 1 $1`;do for z in `seq 0 4`;do clear;f $z;e "  $((l-1))";sleep 1;done;done