nx_beach_npc_origin_contact_gate_t43.nx source
↩ module page · 35 lines · 1757 B
1// ORIGINAL. Exact observed shoreline NPC root coordinates; private native diagnostic.
2import "_hdl_build/nx_wasm_craft_journal_index_t21.nx"
3import "nx_gate_verdict.nx"
4const OBS_X_Q8: i64 = 13758
5const OBS_Z_Q8: i64 = 512
6const OBS_ROOT_Q8: i64 = 3503
7const OBS_ORIGIN_Z: i64 = 96
8func main() -> i64 {
9 let base: i64 = sys_mmap(CRAFT_EXT_TOTAL) as i64
10 if base <= 0 { return 2 }
11 let ctr: *i64 = gv_ctr()
12 gv_head("BEACH-NPC-ORIGIN-CONTACT-DIAGNOSTIC" as *u8)
13 init_impl_v(base,BEACH_RELEASE_WORLD,CRAFT_DEFAULT_SEED)
14 var step: i64 = 0
15 while step < (OBS_ORIGIN_Z/SHIFT_STRIDE)-1 { wc_shift(base,0,SHIFT_STRIDE);step=step+1 }
16 let m: *i64 = mobp(base)
17 let h: i64 = en_nth(m,1)
18 if h <= 0 { return 2 }
19 en_set(m,h,MC_X,OBS_X_Q8);en_set(m,h,MC_Z,OBS_Z_Q8);en_set(m,h,MC_Y,OBS_ROOT_Q8)
20 let before: i64 = wc_contact_floor_q(base,OBS_X_Q8,OBS_Z_Q8,WY-1)
21 wc_shift(base,0,SHIFT_STRIDE)
22 let after: i64 = wc_contact_floor_q(base,en_get(m,h,MC_X),en_get(m,h,MC_Z),WY-1)
23 let root: i64 = en_get(m,h,MC_Y)
24 gv_values_head()
25 gv_kv("origin_z" as *u8,wst(base)[S_WOZ])
26 gv_kv("before_contact_q8" as *u8,before)
27 gv_kv("after_contact_q8" as *u8,after)
28 gv_kv("after_root_q8" as *u8,root)
29 gv_kv("root_minus_contact_q8" as *u8,root-after)
30 gv_check("observed origin and clamped XZ reproduced" as *u8,wst(base)[S_WOZ]==OBS_ORIGIN_Z&&en_get(m,h,MC_X)==OBS_X_Q8&&en_get(m,h,MC_Z)==OBS_Z_Q8,ctr)
31 gv_check("observed terrain contact reproduced" as *u8,after==3720,ctr)
32 gv_check("shift preserves stale root below new contact" as *u8,root==OBS_ROOT_Q8&&root-after==(0-217),ctr)
33 sys_munmap(base as *u8,CRAFT_EXT_TOTAL)
34 return gv_verdict("BEACH-NPC-ORIGIN-CONTACT-DIAGNOSTIC" as *u8,ctr,"Reproduction of defect, not acceptance; actual skinned sole not measured" as *u8)
35}