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; }