1
0
mirror of git://projects.qi-hardware.com/wernermisc.git synced 2024-11-15 12:08:27 +02:00

xbrd/top.fpd: hatch wall; added space between headers measurement

This commit is contained in:
Werner Almesberger 2012-01-18 15:50:50 -03:00
parent a756aa6bf4
commit aafdb9c7b8

View File

@ -1,6 +1,8 @@
/* MACHINE-GENERATED ! */ /* MACHINE-GENERATED ! */
frame top { frame top {
loop i = 0, (fpy+fny)/FT-1
__0: vec @(-B/2, 0mm) __0: vec @(-B/2, 0mm)
__1: vec @(B/2, 0mm) __1: vec @(B/2, 0mm)
__2: vec __0(0mm, HL/2) __2: vec __0(0mm, HL/2)
@ -20,6 +22,9 @@ frame top {
__13: vec .(-CB, CR) __13: vec .(-CB, CR)
__14: vec __1(FB, 0mm) __14: vec __1(FB, 0mm)
__15: vec .(0mm, -fny) __15: vec .(0mm, -fny)
__20: vec .(0mm, (i+0.5)*FT)
__21: vec .(FT, FT)
line __20 . w/2
__16: vec __14(FT, 0mm) __16: vec __14(FT, 0mm)
__17: vec .(0mm, fpy) __17: vec .(0mm, fpy)
__18: vec __14(0mm, fpy) __18: vec __14(0mm, fpy)
@ -31,10 +36,6 @@ frame top {
package "xbrd" package "xbrd"
unit mm unit mm
table
{ name, top }
{ "Top", 1 }
table table
{ B, CB, CF, CL, CR } { B, CB, CF, CL, CR }
{ 45mm, 25mm, 10mm, 5mm, 15mm } { 45mm, 25mm, 10mm, 5mm, 15mm }
@ -73,3 +74,4 @@ measx "FW = " top.__15 >> top.__19 -2*s
measx "FB = " top.__1 >> top.__14 -fny-2*s measx "FB = " top.__1 >> top.__14 -fny-2*s
measx top.__1 >> top.__16 -fny-3*s measx top.__1 >> top.__16 -fny-3*s
measx top.__11 >> top.__15 -CR-HL/2-fny-s measx top.__11 >> top.__15 -CR-HL/2-fny-s
measx top.__3 >> top.__9 CR+s