From d07e55b32dfcbc0863bc72fd4ecc77fa94ed753a Mon Sep 17 00:00:00 2001 From: Ian Jackson Date: Sat, 13 Feb 2016 21:50:22 +0000 Subject: [PATCH] sealing-box: move BoxLocals (code motion, nfc) --- sealing-box.scad.m4 | 18 +++++++++--------- 1 file changed, 9 insertions(+), 9 deletions(-) diff --git a/sealing-box.scad.m4 b/sealing-box.scad.m4 index cbdff22..a076ddd 100644 --- a/sealing-box.scad.m4 +++ b/sealing-box.scad.m4 @@ -21,6 +21,15 @@ // 3. Invoke BoxUseShape // 4. Use the Box and Lid modules generated +m4_define(`BoxLocals',` + wall = $sealingbox_wallthick; + + ts_cidoff = (ts_cnrrad * (1-.7) + wall * .8) * [1,1]; + + ts_xbox_lin = ts_xbox - ts_cnrrad*2; + ts_ybox_lin = ts_ybox - ts_cnrrad*2; +') + m4_dnl Box_Part($1=transl_x,$2=transl_y, $3=rot_z,$4=mirror_xy) m4_dnl $5=kind, $6=kindargs, $7=profile(profileargsargs)) m4_define(`Box_Part',` @@ -62,15 +71,6 @@ m4_define(`BoxPart_Extrude_Arc',` } ') -m4_define(`BoxLocals',` - wall = $sealingbox_wallthick; - - ts_cidoff = (ts_cnrrad * (1-.7) + wall * .8) * [1,1]; - - ts_xbox_lin = ts_xbox - ts_cnrrad*2; - ts_ybox_lin = ts_ybox - ts_cnrrad*2; -') - m4_dnl BoxDoShapeRect(`profile(profileargs)'); m4_define(`BoxDoShapeRect',` Box_Part(0, ts_cnrrad, 0,0, Linear,`ts_ybox_lin', `$1' ) -- 2.30.2