_ts_diag.nx source
↩ module page · 26 lines · 1329 B
1// _ts_diag.nx -- prints the KAT4 score comparison values (3-layer score).
2import "nx_syscalls.nx"
3import "nx_tier.nx"
4import "nx_worldgen_tunelib.nx"
5
6func d_puts(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(1, s, n); return 0 }
7func d_putn(v: i64) -> i64 { let bb: *u8 = sys_mmap(28); var m: i64=v; if m<0 {m=0-m;sys_write(1,"-" as *u8,1)}; let t: *u8 = sys_mmap(28); var k: i64=0; if m==0 {t[0]=48;k=1}; while m>0 {t[k]=48+(m%10); m=m/10; k=k+1}; var i: i64=0; while i<k {bb[i]=t[k-1-i]; i=i+1}; sys_write(1, bb, k); return 0 }
8
9func main() -> i64 {
10 let a12: *i64 = sys_mmap(8 * 12) as *i64
11 let v12: *i64 = sys_mmap(8 * 12) as *i64
12 var z: i64 = 0
13 while z < 12 { a12[z] = 0; v12[z] = 0; z = z + 1 }
14 v12[NX_WQG_OFF_FLATNESS_PENALTY] = 4000
15 v12[NX_WQG_OFF_EXTREMES] = 0
16 a12[NX_WQG_OFF_EXTREMES] = NX_WQG_Q
17 let lo: i64 = tl_score(NX_GRADE_C, a12, NX_WQG_REFINE_MORE_FEATURES)
18 let hi: i64 = tl_score(NX_GRADE_B, v12, NX_WQG_REFINE_MORE_FEATURES)
19 d_puts("axis_a=" as *u8); d_putn(tl_axis_value(a12, NX_WQG_REFINE_MORE_FEATURES))
20 d_puts(" health_a=" as *u8); d_putn(tl_health(a12))
21 d_puts(" health_v=" as *u8); d_putn(tl_health(v12))
22 d_puts(" lo=" as *u8); d_putn(lo)
23 d_puts(" hi=" as *u8); d_putn(hi)
24 d_puts("\n" as *u8)
25 return 0
26}