以下程序的子程序是系统自带的?还是要自己编制,如要,请问怎样编写?
DEF REAL PKT[3,2]=(20,50,50,40,65,20)
点定义,括号内是对刀的三点坐标
DEF REAL ERG[3] 结果
DEF BOOL STATUS 变量,用于状态
STATUS = CALCDAT(PKT,3,ERG) 调用求算的圆弧数据
IF STATUS == FALSE GOTOF ERROR
R101=ERG[0]圆心横坐标
R102=ERG[1]圆心纵坐标
R103=ERG[2]R半径,最后就减去你对刀用的刀具半径!
ERROR: