流水号刻印宏程序编制

呵呵，赞一个。。。

学习之中~~

21213333333

呵呵 看看，有帮助，。

我也会点宏，大受启发，谢谢

我找到了以前的程序(在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
%
已有 1 人评分        大米        收起理由
进明         + 10

看看

学习一下，不错。

这个宏跑不起来，是因为没有将具体的刻字编程变为NC文件，思路是对的，将NC文件套在子程序里就可以了

实际上的流水号有很多方式，数字的程序是固定的，可依时间和工件、机床号的变化而设定，机床里有很多参数是可以被宏调用的，要看下机床厂家的说明书，实际运用很重要