ref: 640c58cc289a23e6bc192b3e9bfd03d3b9339cf8
parent: 3e845f9a7a473495cd7ff52de50ac1a3818cd522
author: Devine Lu Linvega <aliceffekt@gmail.com>
date: Mon Dec 31 08:23:21 EST 2018
Added yump
--- a/sim.c
+++ b/sim.c
@@ -251,6 +251,7 @@
_('V', variable) \ _('W', movement) \ _('X', teleport) \+ _('Y', yump) \ _('Z', zig)#define MOVEMENT_CASES \
@@ -699,6 +700,13 @@
PORT(0, 1, IN);
PORT(out_y, out_x, OUT | NONLOCKING);
POKE_STUNNED(out_y, out_x, PEEK(0, 1));
+END_OPERATOR
+
+BEGIN_OPERATOR(yump)
+ LOWERCASE_REQUIRES_BANG;
+ PORT(0, -1, IN);
+ PORT(0, 1, OUT);
+ POKE(0, 1, PEEK(0, -1));
END_OPERATOR
BEGIN_OPERATOR(zig)