Mastercam后处理Buffer应用实例

Mastercam后处理Buffer应用实例代码

  简单的Buffer应用实例,代码未经测试,代码如存在问题,跟帖提出.


  以下代码适用于X---X+以上版本,X以下版本,自行转格式.

debug    : 1

#定义刀具数据的6个参数

var1 : 0    #buffer 1 (t)
var2 : 0    #buffer 1 (tloffno)
var3 : 0    #buffer 1 (tldia)
var4 : 0    #buffer 1 (tlngno)
var5 : 0    #buffer 1 (tlngno)
var6 : 0    #buffer 1 (tlngno)

  #定义buffer 1

size1  : 0
rc1    : 1
wc1   : 1
fbuf 1 0 6 0 0

  #定刀具数据格式

fs2 16 1.4
fs2 17 1.3 1.3lt
fs2 18   0.4 0.3

  #定刀具数据格式

fmt T 16 var1
fmt D 16 var2
fmt R 16 var3
fmt FL 18 var4
fmt LOC 17 var5
fmt OVL 17 var6

  #写Buffer

pwritebuf
    var1 = t$
    var2 = tldia$
    var3 = tcr$
    var4 = n_flutes$
    var5 = flute_len
    var6 = oa_len
   #调试输出

    if debug, "before call to wbuf -->  WC1=", *wc1, e$
   #写Buffer
    var1 = wbuf (1, wc1)
   #调试输出
    if debug, "After call to wbuf -->  WC1=", *wc1, e$

  #读Buffer

preadbuf
    size1 = rbuf (1,0)
    while rc1 <= size1,
        [
      #调试输出
        if debug, "before call to rbuf -->  RC1=", *rc1, e$
     #读Buffer内容
        var1 = rbuf (1, rc1)

       #调试输出
        if debug, "before call to rbuf -->  RC1=", *rc1, e$
      #输出Buffer内容

        *var1, *var2, *var3, *var4, e$
        ]

  #调用读写Buffer模块

在psof$下调用

psof$
    pwritebuf

在ptlchg$下调用

ptlchg$
    pwritebuf

在peof$下调用

peof$
    preadbuf
    
    
    

免责声明：本文系网络转载或改编，未找到原创作者，版权归原作者所有。如涉及版权，请联系删