From 603d04992cbf6c02cfc16f06ffab7d014d817634 Mon Sep 17 00:00:00 2001 From: Clyne Sullivan Date: Sun, 25 Mar 2018 21:16:33 -0400 Subject: added licensing --- initrd/lines | 29 +++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 initrd/lines (limited to 'initrd/lines') diff --git a/initrd/lines b/initrd/lines new file mode 100644 index 0000000..f6b2a82 --- /dev/null +++ b/initrd/lines @@ -0,0 +1,29 @@ +print("Hello.\n") + +fg = 32767 + +# draw bg, lines +rect(50, 50, 380, 220, 6375) +line(50, 160, 430, 160, fg) +line(240, 50, 240, 270, fg) + +x = 50 +while (x <= 430) { + line(x, 170, x, 150, fg) + x = x + 20 +} + +y = 50 +while (y <= 270) { + line(230, y, 250, y, fg) + y = y + 20 +} + +while (1) { + x = rand(379) + 50 + y = rand(219) + 50 + i = 50 + rand(379) + j = 50 + rand(219) + + line(x, y, i, j, 511) +} -- cgit v1.2.3