initrd/init


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23

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 < 430)

set y 50
do
	line 230 y 250 y fg
	set y (y + 20)
while (y < 270)

line 80 250 380 90 511