code wiki / _hdl_build / ss_goal_organ.nx
ss_goal_organ.nx source
↩ module page · 18 lines · 597 B
1// SELF-SCAFFOLDED (R9 goal-directed acquisition). license_tier: ORIGINAL
2import "nx_syscalls.nx"
3func main() -> i64 {
4 let x: i64 = 3
5 var acc: i64 = x
6 acc = acc * acc
7 acc = acc * 2
8 acc = acc + 1
9 sys_write(1, "RESULT=" as *u8, 7)
10 var mm: i64 = acc
11 if mm < 0 { sys_write(1, "-" as *u8, 1); mm = 0 - mm }
12 let t: *u8 = sys_mmap(28)
13 var kk: i64 = 0
14 if mm == 0 { t[0] = 48 as u8; kk = 1 }
15 while mm > 0 { t[kk] = (48 + (mm % 10)) as u8; mm = mm / 10; kk = kk + 1 }
16 while kk > 0 { kk = kk - 1; sys_write(1, (((t as i64)+kk) as *u8), 1) }
17 return 0
18}