シンプルなASCIIアートはさみアニメーションを作成してみてください！

チャレンジ

すべての入力は整数-31〜31です。

出力は、アニメーション（1つ前のフレームが置き換えられる限り、どこかに出力されます。GIFが許可されます）で、1/4秒（約）で区切られます。

入力（n）が正の場合：

• アニメーションは8<、オープンハサミで始まる必要があります。
• 次のフレームは8=です。これは、ハサミが「切断」していることを示しています。
• はさみの後ろにダッシュ（カットマーク）が追加され、nダッシュが現れるまでアニメーションが繰り返されます。

入力が負の場合：

• ：ハサミは（このようなオープン起動し、左の方を向く>8と、）nの前にスペース。
• はさみは閉じて、左に向けたままです（=8）。
• スペースが削除されると、ハサミが再び開き、ハサミの後ろにダッシュが追加されます。

入力がゼロの場合：

• 10フレームの開閉はさみだけを出力します。一貫している限り、どちらの方向を向いていてもかまいません。

これはcode-golfであるため、バイト単位の最短の送信が優先されます。（もしあなたのエントリーが何らかの新しい「ゴルフ言語」のせいで明らかに勝てない場合でも、私たちはそれを見たいと思っています。）

エラーメッセージ自体がアニメーションに干渉しない限り、エラーメッセージは許可されます。

入力と出力のペアの例：

（わかりやすくするためにフレームを分離しましたが、各フレームの間に約.25秒が必要です）

Input: 1
Output: 
8<
8=
-8<

Input: 2
Output:
8<
8=
-8<
-8=
--8<

Input: 5
Output:
8<
8=
-8<
-8=
--8<
--8=
---8<
---8=
----8<
----8=
-----8<

Input: 0
Output:
8<
8=
8<
8=
8<
8=
8<
8=
8<
8=

Input: -2
Output:
  >8
  =8
 >8-
 =8-
>8--

Input: -3
Output:
   >8
   =8
  >8-
  =8-
 >8--
 =8--
>8---

楽しい！

SOGL V0.12、53のバイト

LA0≠?.θ«IA}a∫H.¡*»:B┌* 8+Ƨ<=F2%W+a»b-@*+.0<?↔±}1¼UU░P

ここで試してみてください！

MATL、59 58 57バイト

|EQG~10*+:"&FXx45@q2/kGg*XHY"8Vh61@oGO<Eq*+h4M?G|H-Z"hP]D

MATL Onlineでお試しください！または、オフラインコンパイラから実行された例を参照してください。

JavaScript（ES2017）+ HTML、165 + 10バイト

@Shaggyで-16バイト

n=>(g=i=>i<-~(n?2*m:9)&&setTimeout(g,250,i+1,s=8+"<>="[i%2?2:n<0|0],o=("-".repeat(i/2)+s).padEnd(m+2),e.innerHTML=(n?n<0?[...o].reverse().join``:o:s)))(0,m=n<0?-n:n)

<pre id=e>

以下のスニペットで試してください：

let globalTimeout;
const _setTimeout = setTimeout;
window.setTimeout = function(){ globalTimeout = _setTimeout.apply(this, arguments); }
// Code above is to support user input

f=
n=>(g=i=>i<-~(n?2*m:9)&&setTimeout(g,250,i+1,s=8+"<>="[i%2?2:n<0|0],o=("-".repeat(i/2)+s).padEnd(m+2),e.textContent=(n?n<0?[...o].reverse().join``:o:s)))(0,m=n<0?-n:n)

// Code below is to support user input
f(10)
const $inp = document.getElementById("inp");
inp.addEventListener("change", ()=>{
  clearTimeout(globalTimeout);
  f(+inp.value);
});

<input type="number" id="inp" min="-31" max="31" value="10" />

<pre id=e>

TI-BASIC、173バイト

:"-
:For(X,1,5
:Ans+Ans
:End
:For(X,1,32
:" "+Ans+" →Str1
:End
:ClrHome
:Input N
:N<0→X
:For(A,not(N),abs(N+5not(N
:For(B,4-3X,6-3X-(A=abs(N)),2
:33X-Anot(not(N
:Output(1,16,sub(Str1,33X+32,abs(Ans-1)-NX-31X)+sub(">8=8<8=",B,2)+sub(Str1,Ans+32,1
:rand(11
:End
:End

0入力を他のフレームとは異なるフレームで終了させることは、非常に興味深い障害でした！

TI-BASICは空の文字列を好まないため、これはハサミの左側に少なくとも1つのダミー文字を維持します。最初のダミー文字は常にスペースです。これを負の入力のnスペースの一部としてカウントしないように、このプログラムは最初の行の右端の列から印刷を開始し、そこから実際のアニメーションのフィールドを開始するために文字列の残りを下に折り返します最初の列。

エキゾチックなデバイスに関する注意事項：TI-BASICコードサイズは、文字ではなくトークンで測定されます。計算機間の一貫した比較のために、通常、ヘッダーの長さを扱うバイトカウントを無視します（たとえば、PROGRAM：SCISSORSから8を減算します）。さらに、ホーム画面上で完全に適切に動作するルーチン（ほとんどの場合、制御構造が不足しているルーチン）については、空のプログラムのサイズをさらに削除して、9バイトも「保存」します。特に、このプログラムはホーム画面に入力できないため、自由は奪われません。

オクターブ、190 186バイト

k=32+~e((a=abs(n=(z=input(''))+~z*10))+1,1);for i=1:a
clc
k(i:i+1)=[56,61-(s=sign(n))];q=@(m)fprintf(rot90([m ''],s));q(k)
if(i-a)pause(.25)
clc
k(i+1)+=s;q(k)
pause(.25);k(i)=45;end
end

オンラインでお試しください！（注：clcTIOでは機能しないため、順次出力されるすべてのアニメーションフレームのみです）。@LuisMendoにe(...)、Octave の機能を知らせてくれてありがとうexp(1)*ones(...)。

インライン割り当てでは、配列全体ではなく、変更された配列エントリのみが返されることがわかりました。つまり、次のような構成q(k(i+1)+=s)は不可能であるため、プログラムはほとんどMATLABに似ています。実際、MATLABエントリはわずかに長くなっていますが、

MATLAB、198 195バイト

n=input('');n=n+~n*10;a=abs(n);s=sign(n);k=zeros(a+1,1);q=@(k)fprintf(rot90([k ''],s));for i=1:a
k(i:i+1)=[56 61-s];clc
q(k)
if(i-a)pause(.25);
k(i+1)=k(i+1)+s;clc
q(k)
pause(.25)
k(i)=45;end
end

クリーン、294バイト

import StdEnv,System.Time,ArgEnv,System._Unsafe
Start#n=toInt(select(getCommandLine)1)
=[?k l\\k<-[1..]&l<-if(n==0)(flatten o$5)(init)[$(abs n+2)'\b'++if(n<0)(rjustify(abs n+2))reverse[c,'8': $i'-']\\i<-[0..abs n],c<-[if(n<0)'>''<','=']]]
?t#(Clock n)=accUnsafe clock
|n>t*250=id= ?t
$ =repeatn

オンラインでお試しください！

これはTIOでは機能しないことに注意してください。リンクはプレゼンテーション用です。

x86 Windows CleanのデフォルトであるCLOCK_PER_TICK以外の定数がある場合、結果は異なる場合があります1000。

Python 2、170バイト

import time
n=input()
a=abs(n);s=a and n/a
for i in range([a-~a,10][a<1]):print'\n'*30+(a-i/2)*-s*' '+i/2*s*'-'+'>='[i%2]*(s<1)+'8'+'<='[i%2]*s+i/2*-s*'-';time.sleep(.25)

オンラインでお試しください！

ルビー、169バイト

->x{i="";o=?=;(x!=0&&x.abs*2+1||10).times{|l|o=o[?=]?x>0?"8<":">8":x>0?"8=":"=8";f=?\s*(x<0&&-x-l/2||0);system"cls";puts x>0?i+o:f+o+i;i+=?-if(l).odd?&&x!=0;sleep 0.25}}

あなたがそれを掘り下げるとき、私の意見では少なくとも、自己説明的です。プログラムは、clsコマンド/エイリアスを使用してコンピューターで実行する必要があります。

オンラインでお試しください！（上記の制限のため、このスクリプトのためだけにsystem（）メソッドを上書きする必要がありました。）

私は使用しようとしました

puts `cls`, ...

しかし、それは目に見えない文字を印刷しただけです、誰もがその理由を知っていますか？