精益人论坛

精益生产推荐读物《精益思想》

一例高水平的宏程序,求其数学原理

[复制链接]
孤城领主领主 发表于 2013-11-5 08:03:34 | 显示全部楼层 |阅读模式
查看: 71|回复: 7
说明:机器上装了个四轴,尾座,及连接两者的连接板。在连接板上有一个能转动0度和90度的旋转气缸。四轴为A轴,旋转气缸为C轴。
O7015;
G91G28Z0.;
G40G80G49G69;
M06T21;
M19;(准确定位)
M17;(探针打开)
M81;(C轴松开)
M72;(四轴松开)
G90 G0 G54.1 P10 A20. M82;(M82为C轴旋转至90度)
M71;(四轴锁紧)
M80;(C轴锁紧)
#7441=#580-[#581-#7182];
#7442=#581-[#580-#7181];
#7443=#7183;
G65 P7200 A20. S123 W125 X0. Y0. Z0.;(意思是坐标g54.1P23旋转20度,后得到的新坐标为G54.1P25)
G00 G90 G54.1 P26 Y-54.1;
G00 G90 G54.1 P26 X-18.75;
......
......
M30;
O7200;
G5.1 Q0;
IF[#2EQ2]GOTO200;
N200;
#8=#580;(C轴旋转中心X)
#9=#581;(C轴旋转中心Y)
#10=#582;(A轴旋转中心Y)
#11=#583;(A轴旋转中心Z)
GOTO300;
N300;
#12=#0;(THERMAL X)
#13=#0;(THERMAL Y)
#14=#600;(THERMAL Z)(#600是Z 向探针的温度 补偿值,这个由探针确定,一般在0.01以内在本程式中为已知的)
IF[#19NE#23]GOTO1;
#3000=91;
N1;
IF[#19GT100]GOTO2;
N2;
#19=#19-101;
#100=#19*20;
#101=[#[7001+#100]+#24]-#8;(X DISTANCE FROM ROT X)
#102=[#[7002+#100]+#25]-#9;(Y DISTANCE FROM ROT Y)
#108=[#[7003+#100]+#26]-#11;(Z DISTANCE FROM ROT Z)
N3;
#101=#101-#12;
#102=#102-#13;
#108=#108-#14;
#103=ATAN[#102/#101]/[1];
#104=#102/SIN[#103]
#105=#103+#3;(NEW C ANGLE)
#106=COS[#105]*#104;(NEW X)
#107=SIN[#105]*#104;(NEW Y)
#120=#107+[#9-#10];
#109=ATAN[#108/#120]/[1];
#110=#108/SIN[#109];(RADIUS)
#111=#109+#1;(NEW A ANGLE)
#112=COS[#111]*#110;(NEW Y)
#113=SIN[#111]*#110;(NEW Z)
#114=#8+#106+#12;(X WCS POSSITION)
#115=#10+#112+#13;(Y WCS POSSITION)
#116=#11+#113+#14;(Z WCS POSSITION)
#117=#0;
#118=#0.;
#119=#0.;
IF[#20EQ#0]GOTO60
N60;
IF[#23EQ#0]GOTO20;
IF[#23GT100]GOTO10;
N10;
#23=#23-101;
#100=#23*20;
#[7001+#100]=#114+#117
#[7002+#100]=#115+#118
#[7003+#100]=#116+#119
N20;
M99;
哪位大侠能看出红色标记处的数学原理?
回复

使用道具 举报

女人丝袜
karlmayerdesign 发表于 2013-11-5 08:38:05 | 显示全部楼层
看不懂 可不可以留下个脚印
回复

使用道具 举报

duanyz 发表于 2013-11-5 09:07:38 | 显示全部楼层
井号+数字就是一个变量吧?红色的就是一个运算+赋值
回复

使用道具 举报

精益生产必读书籍
ame0624 发表于 2013-11-5 09:09:07 | 显示全部楼层
这种宏程序要从头才能看懂,红色的就是三角函数的知识
回复

使用道具 举报

女人丝袜
_Lee 发表于 2013-11-5 09:37:56 | 显示全部楼层
本帖最后由 _Lee 于 2013-11-5 10:26 编辑
作为菜鸟,说下心中的一些疑惑。上面的很多参数都不全,例如#3、#19、#580、#7441这些具体是什么?我也做过类似的坐标转换,但是没涉及到机床的参数,原理应该差不多。第一个红的应该跟机床自身有关,第二个红的其实很好理解,原理就是三角函数而已。把这点移到另一点,新点在旧坐标系里的坐标值。

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
回复

使用道具 举报

精益生产必读书籍
惠智网安 发表于 2013-11-5 10:29:00 | 显示全部楼层
这叫高水平?
回复

使用道具 举报

女人丝袜
lukexc 发表于 2013-11-5 10:19:00 | 显示全部楼层
看来落后了,看不懂了!
回复

使用道具 举报

精益生产必读书籍
冷月梧桐 发表于 2013-11-5 11:11:49 | 显示全部楼层
我可以说这程序很乱吗??
G65 P7200 A20. S123 W125 X0. Y0. Z0
IF[#2EQ2]GOTO200;
N200;
……
GOTO300;
N300;
主程序没有传递B(#2)的值,这段IF根本就没用。而且这两段的跳转(目的段就在跳转的下面,无论有没有跳转都将执行这下面的程序)根本就意思,所以后面主题程序还没仔细看,兴趣就少了一大截
回复

使用道具 举报

女人丝袜
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

手机版|精益人 ( 沪ICP备19004111号 )

GMT+8, 2019-9-20 19:36 , Processed in 0.190472 second(s), 22 queries .

Powered by Lean.ren X3.4 © 2019-2033 Lean.ren

Designed by Lean.ren