diff options
author | Clyne Sullivan <tullivan99@gmail.com> | 2018-02-20 17:50:47 -0500 |
---|---|---|
committer | Clyne Sullivan <tullivan99@gmail.com> | 2018-02-20 17:50:47 -0500 |
commit | f27b19a531a61aa088d380174cc960b9f2e68237 (patch) | |
tree | 57830178579ee20dbc0c14b280fdbc7bd59a53a9 /initrd/init | |
parent | b0cd81cf66c0e5b5d0d662384752337f6c69cde5 (diff) |
major work, own malloc, making things work
Diffstat (limited to 'initrd/init')
-rw-r--r-- | initrd/init | 39 |
1 files changed, 19 insertions, 20 deletions
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) |