code wiki / (root) / nx_craft_inspection_emit_t142.nx

nx_craft_inspection_emit_t142.nx source

↩ module page · 53 lines · 2623 B

1// Private page-fit composition only; no publisher main. Presentation helpers copied exactly from existing nx_craft_integrated_emit_t73 owner. The fit supplies already compiled, hash-verified bytecode. 2import "nx_game_page_inspection_t142.nx" 3import "nx_softbind.nx" 4const CE_NATIVE:*u8="nx_desktop_craft" 5const CE_EV_CAP:i64=8192 6func ce_cat(d: *u8, p: i64, s: *u8) -> i64 { 7 var i: i64 = 0 8 while s[i] != (0 as u8) { d[p+i] = s[i]; i = i + 1 } 9 return p + i 10} 11func ce_catn(d: *u8, p: i64, v: i64) -> i64 { 12 if v == 0 { d[p] = 48 as u8; return p + 1 } 13 var t: i64 = v 14 var n: i64 = 0 15 while t > 0 { t = t/10; n = n + 1 } 16 var k: i64 = n 17 var u: i64 = v 18 while k > 0 { d[p+k-1] = ((u % 10) + 48) as u8; u = u/10; k = k - 1 } 19 return p + n 20} 21func ce_stamp(t: *u8) -> *u8 { 22 let o: *u8 = sys_mmap(192) 23 var i: i64 = 0 24 while t[i] != (0 as u8) { o[i] = t[i]; i = i + 1 } 25 o[i] = 32 as u8; o[i+1] = 98 as u8; i = i + 2 26 var m: i64 = sys_now_realtime_sec() 27 let d: *u8 = sys_mmap(32) 28 var k: i64 = 0 29 while m > 0 { d[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 } 30 while k > 0 { k = k - 1; o[i] = d[k]; i = i + 1 } 31 o[i] = 0 as u8 32 return o 33} 34func ce_evidence(base_ctrl: *u8, out: *u8) -> i64 { 35 var p: i64 = ce_cat(out, 0, base_ctrl) 36 p = ce_cat(out, p, "<br><b>TISSUE PHYSICS, DERIVED NOT TUNED</b> &mdash; every figure here is COMPUTED by the shipping solver as this page is written, so it cannot drift from the code running above it. Chest plant " as *u8) 37 p = ce_catn(out, p, sb_fn_mhz(0)) 38 p = ce_cat(out, p, "&ndash;" as *u8) 39 p = ce_catn(out, p, sb_fn_mhz(SB_FIRM_MAX)) 40 p = ce_cat(out, p, " mHz across bred bodies (cited tissue_fn_mhz 4000&ndash;5200, free-vibration modes) &middot; damping " as *u8) 41 p = ce_catn(out, p, SB_ZETA_PERMIL) 42 p = ce_cat(out, p, " permil (haake-scurr-2010 measured 475, and what our own XPBD ringdown read) &middot; downward stiffness " as *u8) 43 p = ce_catn(out, p, sb_k_dn(sb_fn_mhz(0))*10/sb_k_up(sb_fn_mhz(0))) 44 p = ce_cat(out, p, " tenths of the upward branch (cai2018 piecewise, selected by one sign test) &middot; anisotropy AP " as *u8) 45 p = ce_catn(out, p, SB_ANISO_AP_PERMIL) 46 p = ce_cat(out, p, " / ML " as *u8) 47 p = ce_catn(out, p, SB_ANISO_ML_PERMIL) 48 p = ce_cat(out, p, " permil of vertical (mills2025) &middot; " as *u8) 49 p = ce_catn(out, p, SB_FULL_N) 50 p = ce_cat(out, p, " distinct bodies drawn from each girl's whole genome, where there were 4 &middot; proven by nx_gamefeel_oracle_gate and nx_softbind_gate." as *u8) 51 out[p] = 0 as u8 52 return p 53}