code wiki / _hdl_build / nx_metal_gcode_gate.nx
nx_metal_gcode_gate.nx source
↩ module page · 104 lines · 5512 B
1// nx_metal_gcode_gate.nx -- GATE: 3D-printing workstream R3, metal (WAAM). Completes the material ladder.
2// T1 valid WAAM G-code (arc + wire, no FDM hotend), T2 layers from the steel profile, T3 CARDINAL-26 never-
3// brick (no firmware/EEPROM), T4 WAAM process present (arc on/off + inter-layer cooling dwell), T5 wire feed
4// accumulates, T6 HONEST SAFETY note (real arc-weld run needs operator interlocks), T7 sovereign provenance.
5// license_tier: ORIGINAL
6import "nx_metal_gcode.nx"
7import "nx_print_material.nx"
8import "nx_food_science.nx"
9import "nx_seg_store.nx"
10import "nx_syscalls.nx"
11import "nx_gate_verdict.nx"
12
13const MG_PRINT: *u8 = "knowledge/store/print-"
14const MG_OUT: *u8 = "knowledge/staging/print/steel_wall.gcode"
15
16func g_p(s: *u8) -> i64 { var n: i64 = 0; while s[n] != (0 as u8) { n = n + 1 } sys_write(1, s, n); return 0 }
17func g_i(v: i64) -> i64 {
18 let bb: *u8 = sys_mmap(28); var m: i64 = v
19 if m < 0 { sys_write(1, "-" as *u8, 1); m = 0 - m }
20 let t: *u8 = sys_mmap(28); var k: i64 = 0
21 if m == 0 { t[0] = 48 as u8; k = 1 }
22 while m > 0 { t[k] = (48 + (m % 10)) as u8; m = m / 10; k = k + 1 }
23 var i: i64 = 0; while i < k { bb[i] = t[k - 1 - i]; i = i + 1 } sys_write(1, bb, k); return 0
24}
25
26func main() -> i64 {
27 g_p("=== nx_metal_gcode_gate (3D-printing R3: metal WAAM -- completes filament->concrete->METAL) ===\n" as *u8)
28 pm_seed(MG_PRINT)
29
30 let g: *u8 = sys_mmap(262144)
31 let n: i64 = mg_emit(MG_PRINT, 200, 200, 100, g) // 200x200mm footprint, 100mm tall steel wall
32 g_p("emitted " as *u8); g_i(n); g_p(" bytes of WAAM G-code (200x200x100mm steel wall)\n" as *u8)
33
34 var pass: i64 = 0
35 var tot: i64 = 0
36
37 // T1 valid WAAM structure (arc + wire; no FDM hotend)
38 tot = tot + 1
39 var ok1: i64 = 1
40 if as_contains(g, n, "G21" as *u8) != 1 { ok1 = 0 }
41 if as_contains(g, n, "G28" as *u8) != 1 { ok1 = 0 }
42 if as_contains(g, n, "M3 S" as *u8) != 1 { ok1 = 0 } // arc on + wire
43 if as_contains(g, n, "M5" as *u8) != 1 { ok1 = 0 } // arc off
44 if as_contains(g, n, "G1 X" as *u8) != 1 { ok1 = 0 }
45 if as_contains(g, n, "M84" as *u8) != 1 { ok1 = 0 }
46 if as_contains(g, n, "M104" as *u8) != 0 { ok1 = 0 } // no FDM hotend
47 if ok1 == 1 { pass = pass + 1; g_p("PASS T1 valid WAAM G-code (arc + wire feed, no FDM hotend)\n" as *u8) } else { g_p("FAIL T1\n" as *u8) }
48
49 // T2 layers from the steel profile (100mm / 1mm = 100 layers, 0..99)
50 tot = tot + 1
51 var ok2: i64 = 1
52 if as_contains(g, n, ";LAYER:0" as *u8) != 1 { ok2 = 0 }
53 if as_contains(g, n, ";LAYER:99" as *u8) != 1 { ok2 = 0 }
54 if as_contains(g, n, ";LAYER:100" as *u8) != 0 { ok2 = 0 }
55 if ok2 == 1 { pass = pass + 1; g_p("PASS T2 100 layers from the steel profile (1mm beads), indexed 0..99\n" as *u8) } else { g_p("FAIL T2\n" as *u8) }
56
57 // T3 CARDINAL 26 never-brick
58 tot = tot + 1
59 var ok3: i64 = 1
60 if as_contains(g, n, "M997" as *u8) != 0 { ok3 = 0 }
61 if as_contains(g, n, "M500" as *u8) != 0 { ok3 = 0 }
62 if as_contains(g, n, "M502" as *u8) != 0 { ok3 = 0 }
63 if ok3 == 1 { pass = pass + 1; g_p("PASS T3 never-brick: no firmware-flash / EEPROM writes -- emit-only\n" as *u8) } else { g_p("FAIL T3\n" as *u8) }
64
65 // T4 WAAM process: arc on/off + inter-layer COOLING DWELL (the metal-critical step)
66 tot = tot + 1
67 var ok4: i64 = 1
68 if as_contains(g, n, "M3 S150" as *u8) != 1 { ok4 = 0 }
69 if as_contains(g, n, "G4 P2000" as *u8) != 1 { ok4 = 0 } // inter-layer cooling dwell
70 if ok4 == 1 { pass = pass + 1; g_p("PASS T4 WAAM process (arc M3/M5 + G4 inter-layer cooling dwell -- prevents heat buildup)\n" as *u8) } else { g_p("FAIL T4\n" as *u8) }
71
72 // T5 wire feed accumulates (100 layers x 800mm perimeter)
73 tot = tot + 1
74 if as_contains(g, n, "E80000" as *u8) == 1 { pass = pass + 1; g_p("PASS T5 wire feed accumulates to E80000\n" as *u8) } else { g_p("FAIL T5\n" as *u8) }
75
76 // T6 HONEST safety
77 tot = tot + 1
78 var ok6: i64 = 1
79 if as_contains(g, n, "SAFETY" as *u8) != 1 { ok6 = 0 }
80 if as_contains(g, n, "interlocks" as *u8) != 1 { ok6 = 0 }
81 if ok6 == 1 { pass = pass + 1; g_p("PASS T6 honest safety (real arc-weld hardware run requires operator interlocks -- future, gated)\n" as *u8) } else { g_p("FAIL T6\n" as *u8) }
82
83 // T7 sovereign provenance
84 tot = tot + 1
85 var ok7: i64 = 1
86 if as_contains(g, n, "Nishi" as *u8) != 1 { ok7 = 0 }
87 if as_contains(g, n, "NEVER-BRICK" as *u8) != 1 { ok7 = 0 }
88 if ok7 == 1 { pass = pass + 1; g_p("PASS T7 sovereign provenance header\n" as *u8) } else { g_p("FAIL T7\n" as *u8) }
89
90 sys_mkdir("knowledge/staging" as *u8, 0x1ed)
91 sys_mkdir("knowledge/staging/print" as *u8, 0x1ed)
92 let fd: i64 = sys_openat_wr(MG_OUT, 420); if fd >= 0 { sys_write(fd, g, n); sys_close(fd); g_p("wrote " as *u8); g_p(MG_OUT); g_p("\n" as *u8) }
93
94 g_p("nx_metal_gcode_gate pass=" as *u8); g_i(pass); g_p("/" as *u8); g_i(tot)
95 // MIGRATED onto nx_gate_verdict by nx_gate_dry_apply (D001, minimal form): every check
96 // row above is untouched, so the PASS/FAIL vector cannot change; only the hand-rolled
97 // verdict emission is replaced by the ONE shared base class. Proven by nx_gate_migrate verify.
98 let ctr__dry: *i64 = gv_ctr()
99 ctr__dry[0] = pass
100 ctr__dry[1] = tot
101 let rc__dry: i64 = gv_verdict("METAL-GCODE-GATE" as *u8, ctr__dry, "material ladder COMPLETE at G-code: filament -> concrete -> METAL, never-brick)" as *u8)
102 sys_exit(rc__dry)
103 return rc__dry
104}