Date:2010-12-01 15:06:09 (8 years 7 months ago)
Author:Werner Almesberger
Commit:e137bc42c507f190d9c2dc5fc656af6fae0ca20e
Message:atusb/cam: modernize, and change setup for current workpiece

- atusb/cam/doit: new workpiece parameters
- atusb/cam/doit: use "cameo", increase feed rate, increase tool clearance
- atusb/cam/pcb.pl: removed radii from toolpath (cameo takes care of them)
Files: atusb/cam/doit (1 diff)
atusb/cam/pcb.pl (1 diff)

Change Details

atusb/cam/doit
44ALIGN=$DIR/align/align
55ZMAP=$DIR/zmap/zmap
66GP2RML=$DIR/gp2rml/gp2rml
7CAMEO=../../../cae-tools/cameo/cameo
78
89GEN=${1:-./pcb.pl}
910
10rdata="12.10 8.90 -55.90 12.30 81.50 -55.80 111.70 11.30 -55.60"
11rdata="8.1 11.2 -56.3 8.1 80.1 -56.1 117.2 12.8 -55.9"
12
1113# we need quite a large Z adjustment due to the table's vertical flexibility
12Z=-56.30
14Z=-56.6
1315
1416rect=`$RECT $rdata | awk '{$3 = ""; print}'`
1517
1618$GEN |
1719  awk '{ if ($3 != "") $3 += '$Z'; print $0; }' |
20  $CAMEO -d 0.4445 |
1821  $ALIGN 0 1 $rect |
1922    # angle, reference (lower left corner), rect
20  $GP2RML 1.5 0.1 0.1
23  $GP2RML 2 0.5 0.5
2124    # clearance, xy speed, z speed
25# since everything is in the same plane, z clearance must be thickness plus
26# real clearance !
atusb/cam/pcb.pl
4141sub one
4242{
4343    &cut(
44      &mil( 0)-$r, &mil( 0)-$r,
45      &mil( 0)-$r, &mil(620)+$r,
46      &mil( 810)+$r, &mil(620)+$r,
47      &mil( 850) , &mil(580)+$r,
48      &mil( 890)-$r, &mil(620)+$r,
49      &mil(1300)+$r, &mil(620)+$r,
50      &mil(1490)+$r, &mil(430)+$r,
51      &mil(1630)+$r, &mil(430)+$r,
52      &mil(1630)+$r, &mil(360)+$r,
53      &mil(1850)-$r, &mil(360)+$r,
54      &mil(1850)-$r, &mil(430)+$r,
55      &mil(2150)+$r, &mil(430)+$r,
56      &mil(2150)+$r, &mil(-70)-$r,
57      &mil( 890)-$r, &mil(-70)-$r,
58      &mil( 890)-$r, &mil( 0)-$r,
59      &mil( 850) , &mil( 40)-$r,
60      &mil( 810)+$r, &mil( 0)-$r,
61      &mil( 0)-$r, &mil( 0)-$r);
44      &mil( 0), &mil( 0),
45      &mil( 0), &mil(620),
46      &mil( 810), &mil(620),
47      &mil( 850) , &mil(580),
48      &mil( 890), &mil(620),
49      &mil(1300), &mil(620),
50      &mil(1490), &mil(430),
51      &mil(1630), &mil(430),
52      &mil(1630), &mil(360),
53      &mil(1850), &mil(360),
54      &mil(1850), &mil(430),
55      &mil(2150), &mil(430),
56      &mil(2150), &mil(-70),
57      &mil( 890), &mil(-70),
58      &mil( 890), &mil( 0),
59      &mil( 850), &mil( 40),
60      &mil( 810), &mil( 0),
61      &mil( 0), &mil( 0));
6262}
6363
6464

Archive Download the corresponding diff file



interactive