summaryrefslogtreecommitdiff
path: root/tetris/io.prn
diff options
context:
space:
mode:
Diffstat (limited to 'tetris/io.prn')
-rw-r--r--tetris/io.prn12
1 files changed, 10 insertions, 2 deletions
diff --git a/tetris/io.prn b/tetris/io.prn
index 7b2c704..0d18c44 100644
--- a/tetris/io.prn
+++ b/tetris/io.prn
@@ -96,10 +96,18 @@
"+--+" print
}
-@defun "io_gsquare" { #args: x y
+@defun "io_pos_square" { #args: x y
swap
tile_sizex * padding_x +
swap
tile_sizey * padding_y +
- io_square
+}
+
+@defun "io_gsquare" { #args: x y
+ io_pos_square io_square
+}
+
+
+@defun "io_setcolour" { #args: coloridx [0..7]
+ "\x1B[3" swap + "m" + print
}