⛳Perlbatross

独自のプログラミング言語の命令と値が改行区切りで渡されます。

このプログラミング言語には変数はなく、ただ1つのスタックが存在します。以下の文章ではスタックの一番上の値をスタックトップと言います。

命令表

• 二項演算子 + - * / %: スタックトップとスタックの次の値を取り出して演算子を適用してスタックトップに積みます
• 比較演算子 = != < > <= >=: スタックトップとスタックの次の値を取り出して比較し、条件に一致すれば1をスタックトップに積み、そうでなければ0を積みます
• dup: スタックトップの値を複製してスタックの上に更に積みます
• drop: スタックトップの値を取り出して破棄します
• swap: スタックトップとスタックの次の値を入れ替えます
• .: スタックトップを取り出して標準出力へ出力します
• cr: 改行を標準出力へ出力します
• if 〜 else 〜 then: スタックトップの値が1である場合は if と else の間の命令を実行します。スタックトップの値が0である場合は else と then の間の命令を実行します。else は省略できません
• begin 〜 until: まず、begin から until の間の命令を実行し、untilに到達したらスタックトップから値を取り出し、この値が0であれば、begin の次の命令まで戻ります。1以外であれば、untilの次の命令に移ります

これ以外の値が入力された場合はスタックトップに積みます

Leaderboard

Rank	Score	Name	Code bytes
1	-194	KarakasaDcFd	256
2	-107	nsfisis	343
3	-34	sago35	416
4	0	sugyan	450
5	+38	gugod	488
6	+47	acidlemon	497
7	+125	risou	575
8	+625	kt3k	1075
9	+1199	nqounet	1649
10	+1315	codehex	1765
11	+1478	mihyaeru21	1928
12	+1491	akiym	1941
13	+3574	ytnobody	4024
14	+3579	マコピー	4029
14	+3579	papix	4029
14	+3579	onk	4029
14	+3579	satoki00	4029
18	+3581	fujiwara	4031