pcan1 #Canned text - with move strcantext = sblank if cant_no > zero, [
if cant_pos1 = one, pcant_1 if cant_pos2 = one, pcant_2 if cant_pos3 = one, pcant_3 if cant_pos4 = one, pcant_4 if cant_pos5 = one, pcant_5 if cant_pos6 = one, pcant_6 if cant_pos7 = one, pcant_7 if cant_pos8 = one, pcant_8 if cant_pos9 = one, pcant_9 if cant_pos10 = one, pcant_10 ]
if cstop, strcantext = strcantext + sm00 if cgstop, strcantext = strcantext + sm01
#Output of strcantext occurs at the end of the output line
pcan2 #Canned text - after output call strcantext = sblank if cant_no > zero, [
if cant_pos1 = two, pcant_1 if cant_pos2 = two, pcant_2 if cant_pos3 = two, pcant_3 if cant_pos4 = two, pcant_4 if cant_pos5 = two, pcant_5 if cant_pos6 = two, pcant_6 if cant_pos7 = two, pcant_7 if cant_pos8 = two, pcant_8 if cant_pos9 = two, pcant_9 if cant_pos10 = two, pcant_10 pbld, n, strcantext, e strcantext = sblank ]
pcant_1 #Canned text - output call cantext = cant_val1 pcant_out
pcant_2 #Canned text - output call cantext = cant_val2 pcant_out
pcant_3 #Canned text - output call cantext = cant_val3 pcant_out
pcant_4 #Canned text - output call cantext = cant_val4 pcant_out
pcant_5 #Canned text - output call cantext = cant_val5 pcant_out
pcant_6 #Canned text - output call cantext = cant_val6 pcant_out
pcant_7 #Canned text - output call cantext = cant_val7 pcant_out
pcant_8 #Canned text - output call cantext = cant_val8 pcant_out
pcant_9 #Canned text - output call cantext = cant_val9 pcant_out
pcant_10 #Canned text - output call cantext = cant_val10 pcant_out
pcant_out #Canned text - build the string for output #Assign string select type outputs if cantext = three, bld = one if cantext = four, bld = zero #Build the cantext string
if cantext = one, strcantext = strcantext + sm00 if cantext = two, strcantext = strcantext + sm01 if cantext > four, [
strtextno = no2str(cantext)
strcantext = strcantext + strm + strtextno
] #
--------------------------------------------------------------------------
# 坐标计算,通常不需要修改 #
--------------------------------------------------------------------------
pxyzcout #Map coordinates
xabs = vequ (x) feed = fr_pos
if feed > maxfeedpm, feed = maxfeedpm
#Incremental calculations
ps_inc_calc #Incremental calculations, start xia = fmtrnd(xabs) yia = fmtrnd(yabs) zia = fmtrnd(zabs)
xinc = vsub (xia, prv_xia)
pe_inc_calc #Incremental calculations, end !xia, !yia, !zia !x, !y, !z #
--------------------------------------------------------------------------
# Numbered questions for Mastercam Version 8 #
--------------------------------------------------------------------------
38. 快速进给率? 300.0 #76. 配置文件名?
80. 接收和发送的通信端口号 (1 or 2) ? 2
81. 传输速率 (110,150,300,600,1200,2400,4800,9600,14400,19200,38400)? 9600
82. 奇偶校验 (E/O/N)? E 83. 数据位 (7 or 8)? 7 84. 停止位 (1 or 2)? 2 85. Strip line feeds? N 86. 每行末延迟(秒)? 0
87. Ascii, Eia, or Binary (A/E/B)? A
88. Echo keyboard to screen in terminal emulation? n
89. Strip carriage returns? N
90. NC和材料文件所处的磁盘和目录? 91. 执行的后置处理器名? MP
92. 反向处理器名(nic->nc)? RP 93. 反向处理 PST 文件名? RPFAN 100. 序号之小数点前的位数? 3 101. 序号之小数点后的位数? 0 103. 最大的主轴转数? 6000
107. 换刀平均时间(seconds)? 2.0 #110. 默认的刀具库? TOOLS.TL8 158. 挖槽精加工时使用磨损补偿? n
159. Compensate the first and last point in cutter comp. in control simulation? y
160. Display first and last entity in toolpath when simulating cutter compensation in control? y 161. 打开机械原点按钮? y 162. 打开参考点按钮? y 163. 打开杂项变数按钮? y 164. 打开旋转轴按钮? n 165. 打开刀具平面按钮? y 166. 打开构图平面按钮? y 167. 打开刀具显示按钮? y
168. Check tplane during automatic work origin creation? y #在自动工作原点建立时检查刀具平面 #
--------------------------------------------------------------------------
# 定义杂项实数值 #
--------------------------------------------------------------------------
201. Default miscellaneous real variable 1 (mr1)? 0.0 202. Default miscellaneous real variable 2 (mr2)? 0.0 203. Default miscellaneous real variable 3 (mr3)? 0.0 204. Default miscellaneous real variable 4 (mr4)? 0.0 205. Default miscellaneous real variable 5 (mr5)? 0.0 206. Default miscellaneous real variable 6 (mr6)? 0.0 207. Default miscellaneous real variable 7 (mr7)? 0.0 208. Default miscellaneous real variable 8 (mr8)? 0.0 209. Default miscellaneous real variable 9 (mr9)? 0.0 210. Default miscellaneous real variable 10 (mr10)? 0.0
#
--------------------------------------------------------------------------
# 定义杂项整数值 #
--------------------------------------------------------------------------
301. 工作坐标系 [0-1=G92, 2=G54's] (mi1)? 2 302. 绝对或增量 [0=ABS, 1=INC] (mi2)? 0 303. 参考点回归 [0=G28, 1=G30] (mi3)? 0 304. 杂项整数变量 4 (mi4)? 0 305. 杂项整数变量 5 (mi5)? 0 306. 杂项整数变量 6 (mi6)? 0 307. 杂项整数变量 7 (mi7)? 0 308. 杂项整数变量 8 (mi8)? 0 309. 杂项整数变量 9 (mi9)? 0 310. 杂项整数变量 10 (mi10)? 0 #
--------------------------------------------------------------------------
# 配置文件关联参数 (缺省为 \#
--------------------------------------------------------------------------
#400. 关联的配置文件名? 401. 读取系统颜色部分? y 402. 读取配置部分地区? y 403. 读取公差部分? y 404. 读取资料路径部分? y 405. 读取通信部分? y 406. 读取绘图设置部分? y 407. 读取杂项部分? y 408. 读取 NC-设置部分? y
409. 读取 DIALOG SCRIPTS 部分? y 410. 读取DESIGN设置部分? y 411. 读取打印设置部分? y
412. 读取 ALT-KEY 分配部分? y 413. 读取CAD部分? y
414. 读取 载入/离开 部分? y 415. 读取 荧屏 部分? y 416. 读取文件名部分? y
1500. Chook to execute from 'Misc. values' button? y
1501. 插入参数信息到 ascii NCI? n
1502. 写入操作信息到二进制文件 (.ops)? n