ME-4640-TAREA-1 - X($XP2) X($XCL) Y($YCL) $COUNT = $COUNT+1...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon
FLOWSPLITTER.PGM ;MICROMILLING PROGRAMMING ASSIGMENT 1: MICROFLUIDIC FLOW SPLITTER ; USE 200 MICRONS DIAMETER TOOL DVAR $XCL $YCL $ZSURF $FDRT $AXDEPH $XP2 $XP3 $YP3 $YP4 $XP5 DVAR $YP5 $XP6 $COUNT ENABLE X Y Z ;enables X , Y and Z axis SECONDS ;sets feedrate time in seconds METRIC ;sets feedrate distance in mm ABSOLUTE ;sets numbers to be absolute coordinate moves LINEAR ;sets linear interpolated moves $XCL = 15 ;X CENTER OF PART $YCL = 10 ;Y CENTER OF PART $XP2 = $XCL-15 ;X COORDINATE OF POINT 2 $XP3 = $XCL+10 ;X COORDINATE OF POINT 3 $YP3 = $YCL-5 ;Y COORDINATE OF POINT 3 $YP4 = $YP3-5 ;Y COORDINATE OF POINT 4 $XP5 = $XCL+10 ;X COORDINATE OF POINT 5 $YP5 = $YCL+5 ;Y COORDINATE OF POINT 5 $XP6 = $XP5+5 ;X COORDINATE OF POINT 6 $ZSURF = 0 ;Z COORDINATE OF PART SURFACE $FDRT= 0.1 ;CUTTING FEEDRATE OF100 MICRO METERS /SEC $AXDEPH = 0.05 ;AXIAL DEPTH PER PASS 50 MICRO METERS X($XCL) Y($YCL) Z($ZSURF) ;LOCATES TOOL IN CENTER OF PART F($FDRT) $COUNT =1 REPEAT 4 ; CUTS MAIN FLOW TRENCH IN 4 PASSES Z($ZSURF+($COUNT*$AXDEPTH))
Background image of page 1

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
Background image of page 2
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: X($XP2) X($XCL) Y($YCL) $COUNT = $COUNT+1 ENDREPEAT Z($ZSURF-0.5) ;MOVES TOOL TO SAFE PLACE F($FDRT) $COUNT =1 REPEAT 4 ;CUTS PART OF UPPER SPLIT FLOW TRENCH IN 4 PASSES Z($ZSURF+($COUNT*$AXDEPTH)) X($XP3) Y($YP3) X($XCL) Y($YCL) $COUNT = $COUNT+1 ENDREPEAT Z($ZSURF-0.5) ;MOVES TOOL TO SAFE PLACE X($XP3) Y($YP3) F($FDRT) $COUNT =1 REPEAT 4 ;CUTS PART OF UPPER SPLIT FLOW TRENCH IN 4 PASSES Z($ZSURF+($COUNT*$AXDEPTH)) Y($YP4) X($XP3) Y($YP3) $COUNT = $COUNT+1 ENDREPEAT Z($ZSURF-0.5) ;MOVES TOOL TO SAFE PLACE X($XCL) Y($YCL) F($FDRT) $COUNT =1 REPEAT 4 ;CUTS PART OF LOWER SPLIT FLOW TRENCH IN 4 PASSES Z($ZSURF+($COUNT*$AXDEPTH)) X($XP5) Y($YP5) X($XCL) Y($YCL) $COUNT = $COUNT+1 ENDREPEAT Z($ZSURF-0.5) X($XP5) Y($YP5) F($FDRT) $COUNT =1 REPEAT 4 ;CUTS PART OF LOWER SPLIT FLOW TRENCH IN 4 PASSES Z($ZSURF+($COUNT*$AXDEPTH)) X($XP6) X($XP5) Y($YP5) $COUNT = $COUNT+1 ENDREPEAT Z($ZSURF-20) ;MOVES TOOL TO SAFE PLACE OVER CENTER LINE SURFACE X($XCL) Y($YCL)...
View Full Document

This note was uploaded on 02/11/2010 for the course MEEM 4640 taught by Professor Friedrich during the Spring '08 term at Michigan Technological University.

Page1 / 2

ME-4640-TAREA-1 - X($XP2) X($XCL) Y($YCL) $COUNT = $COUNT+1...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online