1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
namespace;
include rt;
// bare-metal syscalls: clock, a RAM file, random, and the machine size.
// zc0 subset, so a run-only image can carry it.
fn main() {
let buf[16], n, t0, t1, i, fd, r, board[8];
t0 = rt.syscall(6, 0, 0, 0);
i = 0;
while (i < 20000) i = i + 1;
t1 = rt.syscall(6, 0, 0, 0);
if (t0 >= 0 && t1 >= t0) rt.put_s("tick ");
else rt.put_s("notick ");
fd = rt.syscall(1, "note", 1, 0);
n = rt.syscall(4, fd, "zy", 2);
rt.syscall(2, fd, 0, 0);
fd = rt.syscall(1, "note", 0, 0);
n = rt.syscall(3, fd, buf, 8);
rt.syscall(2, fd, 0, 0);
buf[n] = 0;
rt.put_n(n); rt.put_c(' '); rt.put_s(buf); rt.put_c(' ');
r = rt.syscall(8, 0, 0, 0);
if (r != -1) rt.put_s("rand ");
else rt.put_s("norand ");
n = rt.syscall(5, "BOARD", board, 8);
if (n > 0) rt.put_s("board ");
else rt.put_s("noboard ");
rt.put_n(rt.syscall(9, 0, 0, 0));
rt.put_c(10);
return 0;
}
|
