From 77338a6b34d6a164fc2f70e6d736eca8a5b7d251 Mon Sep 17 00:00:00 2001 From: Clyne Sullivan Date: Mon, 5 Mar 2018 11:36:00 -0500 Subject: bug fixes, keypad work --- xinitrd/init | 33 +++++++++++++++++++++++++++++++++ 1 file changed, 33 insertions(+) create mode 100644 xinitrd/init (limited to 'xinitrd/init') diff --git a/xinitrd/init b/xinitrd/init new file mode 100644 index 0000000..4fd74dd --- /dev/null +++ b/xinitrd/init @@ -0,0 +1,33 @@ +print "Hello." + +set fg 32767 + +# draw bg, lines +rect 50 50 380 220 6375 +line 50 160 430 160 fg +line 240 50 240 270 fg + +set x 50 +do + line x 170 x 150 fg + set x (x + 20) +while (x < 431) + +set y 50 +do + line 230 y 250 y fg + set y (y + 20) +while (y < 271) + +do + rand 379 > x + rand 219 > y + rand 379 > i + rand 219 > j + set x (x + 50) + set y (y + 50) + set i (i + 50) + set j (j + 50) + + line x y i j 511 +while (1) -- cgit v1.2.3