《复杂工件测量程序的合并》
有些工件结构复杂,加工工序多,例如汽缸头,即使用带4和5轴的加工中心,也要经过4道工序。正常情况下我们要编制相同数量的测量程序对产品进行质量跟踪,造成了程序多而乱的情况,为此我把这些程序集中成一个大的程序,测量时只要调用大程序再选适当的测量模块就可以了。优点之一:是程序清晰,不会调错,之二:相同元素的测量可以用子程序来表达,减少了工作量。
我们的汽缸头一次放置就能完成所有工位的测量,所以工件安装注释只有一个,如需要多次变换安装位置,进行适当的修改就行了。
dy (" ")
dy (" ")
dy (" ")
dy (" ")
dy ("本程序用于分步测量汽缸头")
dy ("产品竖立放置,排气门面对自己,2球窝竖立向左")
dy ("下方用3个方形块规支撑,产品垫正")
dy (" ")
for i=5 to 1 by -1
dy (" ")
delay(30)
end_for
loop
dy ("请选择测量模块:")
dy (" A - 测量正反安装面和球窝")
dy (" B - 测量凸轮轴")
dy (" C - 测量进排气门底座和导套")
dy (" D - 测量导套高度及位置")
dy (" E - 测量进排气连接口")
dy (" F - 测量火花塞")
dy (" G - 全部检验")
read (ASK)
exif (ASK eq "A") or (ASK eq "a") or (ASK eq "B") or (ASK eq "b")
exif (ASK eq "C") or (ASK eq "c") or (ASK eq "D") or (ASK eq "d")
exif (ASK eq "E") or (ASK eq "e") or (ASK eq "F") or (ASK eq "f")
exif (ASK eq "G") or (ASK eq "g")
end_loop
!
!
if (ASK eq "a") or (ASK eq "A") then
!
!<<<<<<<<<< A模块 >>>>>>>>>>
!
elsif (ASK eq "b") or (ASK eq "B") then
!
!<<<<<<<<<< B模块 >>>>>>>>>>
!
!
end_if
何必呢 何苦呢...