From f27b19a531a61aa088d380174cc960b9f2e68237 Mon Sep 17 00:00:00 2001 From: Clyne Sullivan Date: Tue, 20 Feb 2018 17:50:47 -0500 Subject: major work, own malloc, making things work --- initrd/init | 39 +++++++++++++++++++-------------------- 1 file changed, 19 insertions(+), 20 deletions(-) (limited to 'initrd/init') diff --git a/initrd/init b/initrd/init index 324e519..c7ce93b 100644 --- a/initrd/init +++ b/initrd/init @@ -1,23 +1,22 @@ -func div9 - if ((arg0 % 9) == 0) - ret 1 - end - ret 0 -end +print "Hello." -set a 0 -set b 0 -do - set a (a + 1) - div9 a > b - if (b) - print a - print ", " - end - delay 1 -while (a < 100) +set fg 32767 -if (a == 100) - print " All good!" -end +# 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 +# delay 10 +# line x 170 x 150 fg +# set x (x + 20) +#while (x < 430) + +#set y 50 +#do +# delay 10 +# line 230 y 250 y fg +# set y (y + 20) +#while (y < 270) -- cgit v1.2.3