刻字宏程序

刻字宏程序刻字宏程序我找到了以前的程序(在FANUC上运行通过),在下面: % O1000 主程序 (PROGRAM NAME ) (DATE, Day-Month-Year ) G0G17G40G49G80G90 (TOOL - 11 DIA. OFF. - 11 LEN. - 11 DIA. - 1.) (刻字前面不变的) T1T0M6 中间的程序写自己要的 G65 P1200 刻要变字的主程序,刻字:000~999 M5 G91G28Z0.M9 G28X0.Y0. M30 % % ...

刻字宏程序我找到了以前的程序(在FANUC上运行通过),在下面: % O1000 主程序 (PROGRAM NAME ) (DATE, Day-Month-Year ) G0G17G40G49G80G90 (TOOL - 11 DIA. OFF. - 11 LEN. - 11 DIA. - 1.) (刻字前面不变的) T1T0M6 中间的程序写自己要的 G65 P1200 刻要变字的主程序,刻字:000~999 M5 G91G28Z0.M9 G28X0.Y0. M30 % % O1200 刻变字主程序 T1T0M6 #1=0 ;定义计数常数 #2=19.5 ;定义字符起始偏移(X方向)? #3=2.0 ;字间距(X方向) #4=#5221 ;记录当前G54坐标系X的机器坐标 #10=#4+#2 ;第一个字的坐标 WHILE[#1 LT 3]DO1 G90 G10 L2 P01 X#10 IF [#1 NE 0]GOTO5 G65 P1201 ;刻第一个字 GOTO5 IF [#1 NE 1]GOTO5 G65 P1202 ;刻第二个字 GOTO5 IF [#1 NE 2]GOTO5 G65 P1203 ;刻第三个字 N5 #5=#[101+#1] ;计数第几个字 N10 #10=#10+#3 ;下一个字的X坐标 N20 #1=#1+1. ;计数加1 END1 G90 G10 L2 P01 X#4 ;写回G54坐标系X的机器坐标 M99 % % O1201 ;刻第一个变字 #1=#101 ;下面程序是判断刻0~9中的哪个字符 IF [#1 NE 0]GOTO10 G65 P0010 G53 GOTO100 N10 IF [#1 NE 1]GOTO20 G65 P0001 G53 GOTO100 N20 IF [#1 NE 2]GOTO30 G65 P0002 GOTO100 N30 IF [#1 NE 3]GOTO40 G65 P0003 GOTO100 N40 IF [#1 NE 4]GOTO50 G65 P0004 GOTO100 N50 IF [#1 NE 5]GOTO60 G65 P0005 GOTO100 N60 IF [#1 NE 6]GOTO70 G65 P0006 GOTO100 N70 IF [#1 NE 7]GOTO80 G65 P0007 GOTO100 N80 IF [#1 NE 8]GOTO90 G65 P0008 GOTO100 N90 IF [#1 NE 9]GOTO100 G65 P0009 GOTO200 N200 M99 % % O1202 刻第二个变字 #1=#102 ;下面程序是判断刻0~9中的哪个字符 IF [#1 NE 0]GOTO10 G65 P10 GOTO100 N10 IF [#1 NE 1]GOTO20 G65 P1 GOTO100 N20 IF [#1 NE 2]GOTO30 G65 P2 GOTO100 N30 IF [#1 NE 3]GOTO40 G65 P3 GOTO100 N40 IF [#1 NE 4]GOTO50 G65 P4 GOTO100 N50 IF [#1 NE 5]GOTO60 G65 P5 GOTO100 N60 IF [#1 NE 6]GOTO70 G65 P6 GOTO100 N70 IF [#1 NE 7]GOTO80 G65 P7 GOTO100 N80 IF [#1 NE 8]GOTO90 G65 P8 GOTO100 N90 IF [#1 NE 9]GOTO100 G65 P9 #102=0 #101=#101+1. GOTO200 N100 #102=#102+1. N200 M99 % % O1203 ;刻第三个变字 #1=#103 ;下面程序是判断刻0~9中的哪个字符 IF [#1 NE 0]GOTO10 G65 P10 GOTO300 N10 IF [#1 NE 1]GOTO20 G65 P1 GOTO300 N20 IF [#1 NE 2]GOTO30 G65 P2 GOTO300 N30 IF [#1 NE 3]GOTO40 G65 P3 GOTO300 N40 IF [#1 NE 4]GOTO50 G65 P4 GOTO300 N50 IF [#1 NE 5]GOTO60 G65 P5 GOTO300 N60 IF [#1 NE 6]GOTO70 G65 P6 GOTO300 N70 IF [#1 NE 7]GOTO80 G65 P7 GOTO300 N80 IF [#1 NE 8]GOTO90 G65 P8 GOTO300 N90 IF [#1 NE 9]GOTO300 G65 P9 #2=#102 #103=0 IF [#2 NE 9] GOTO200 #102=0 #101=#101+1. GOTO400 N200 #102=#102+1. GOTO N400 N300 #103=#103+1. N400 M99 %

                    本文档为【刻字宏程序】，请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑，
                    图片更改请在作品中右键图片并更换，文字修改请直接点击文字进行修改，也可以新增和删除文档中的内容。 
 该文档来自用户分享，如有侵权行为请发邮件ishare@vip.sina.com联系网站客服，我们会及时删除。

                    [版权声明] 本站所有资料为用户分享产生，若发现您的权利被侵害，请联系客服邮件isharekefu@iask.cn，我们尽快处理。

                    本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权，请谨慎使用。

                    网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传，仅限个人学习分享使用，禁止用于任何广告和商用目的。
                

下载需要：免费已有0 人下载

立即下载

你可能还喜欢

最新资料

资料动态

专题动态

is_037433

暂无简介~

格式：doc

大小：22KB

软件：Word

页数：7

分类：高中语文

上传时间：2018-05-15

浏览量：321

热点搜索

欣赏自己-欣赏他人——学生心理健康教育活动设计方案 2023年云南省初中学业水平考试数学试题及答案分前端机房传输设备原理褥疮的治疗与护理ppt课件弱电系统维护方案设计 2011年全国青少年(中学生)毽球锦标赛成绩表【模板】歌曲缘分歌词串词朗诵词预制构件企业申请资质的程序和申报材料的要求 2019-2020年八年级英语复习测试题：U2 单元测试卷8 Word版无答案钢构车棚施工方案四年级上书法教案青岛出版社初一作文别样的师生情作文800字 iso3485质量管理体系讲义仁爱英语九年级上册Unit1Topic1SectionB课文解析和练习题(无答案) 欣赏自己-欣赏他人——学生心理健康教育活动设计方案 2023年云南省初中学业水平考试数学试题及答案分前端机房传输设备原理褥疮的治疗与护理ppt课件弱电系统维护方案设计 2011年全国青少年(中学生)毽球锦标赛成绩表【模板】歌曲缘分歌词串词朗诵词预制构件企业申请资质的程序和申报材料的要求 2019-2020年八年级英语复习测试题：U2 单元测试卷8 Word版无答案钢构车棚施工方案四年级上书法教案青岛出版社初一作文别样的师生情作文800字 iso3485质量管理体系讲义仁爱英语九年级上册Unit1Topic1SectionB课文解析和练习题(无答案)