数控车高级宏程序逻辑运用的题目

jiangssli · 发表于 2013-10-31 21:54:10

当#200=0时;切槽1.2.3.4.5，
  =1
切槽1，
  =2
切槽2，
  =3
切槽3，
  =4
切槽
4,
  =5切槽5,
  =12切槽1、2，
  =13
切槽1、3，
  =14
切槽1、4，
  =15
切槽1﹑
5,
  =23切槽2、3,
  =24切槽2、4，
  =25
切槽2﹑
5
  =34切槽3、4，
  =35
切槽3﹑
5,
  =123切槽1、2、3，  =124切槽1、2、4，
  =125
切槽1、2、5，
  =134
切槽1、3、
4,
  =135切槽1、3、5,
  =145
切槽1、4、
5
  =234切槽2、3、4,
  =235切槽2、3、5,
  =245
切槽2、4、5，
  =345
切槽3﹑4﹑
5,
  =1234切槽1﹑2﹑3﹑4,
  =1235切槽1、2、3、5,  =1245切槽1、2、4、5,
  =1345
切槽1、3、4、
5,
  =2345切槽2﹑3﹑4﹑
5.
要求：只能用五组坐标实现,力求把程序做到最简短!

这个题目是以前在其它论坛发过的!现在转贴在这里,请各位大侠多讨论下!!

2010dengkai · 发表于 2013-10-31 21:54:51

假如是我我不用宏，用宏太伤脑了。

jiangssli · 发表于 2013-10-31 21:55:51

我把程序上传吧,除了老邓哥哥以外...居然没有一个人看得出这个题目的真正含义!!!!!
M3S500T101
#1=13
#200=0
#10=31
IF[#200EQ0]GO5
#200=1
#10=1
IF[#200EQ1]GO5
#200=2
#10=2
IF[#200EQ2]GO5
#200=3
#10=4
IF[#200EQ3]GO5
#200=4
#10=8
IF[#200EQ4]GO5
#200=5
#10=16
IF[#200EQ5]GO5
#200=12
#10=3
IF[#200EQ12]GO5
#200=13
#10=5
IF[#200EQ13]GO5
#200=14
#10=9
IF[#200EQ14]GO5
#200=15
#10=17
IF[#200EQ15]GO5
#200=23
#10=6
IF[#200EQ23]GO5
#200=24
#10=10
IF[#200EQ24]GO5
#200=25
#10=18
IF[#200EQ25]GO5
#200=123
#10=7
IF[#200EQ123]GO5
#200=124
#10=11
IF[#200EQ124]GO5
#200=125
#10=19
IF[#200EQ125]GO5
#200=135
#10=21
IF[#200EQ135]GO5
#200=145
#10=25
IF[#200EQ145]GO5
#200=234
#10=14
IF[#200EQ234]GO5
#200=235
#10=22
IF[#200EQ235]GO5
#200=245
#10=26
IF[#200EQ245]GO5
#200=345
#10=28
IF[#200EQ345]GO5
#200=1234
#10=15
IF[#200EQ1234]GO5
#200=1235
#10=23
IF[#200EQ1235]GO5
#200=1245
#10=27
IF[#200EQ1245]GO5
#200=1345
#10=29
IF[#200EQ1345]GO5
#200=2345
#10=30
IF[#200EQ2345]GO5
IF[#200EQ#0]GO3000
N5G0X52M8
IF[[#10AND1]EQ0]GOTO10
G0Z[-#1]
G75R0.5
G75X44P500F80
N10#1=#1+10
IF[[#10AND2]EQ0]GOTO20
Z[-#1]
N20#1=#1+10
IF[[#10AND4]EQ0]GOTO30
Z[-#1]
N30#1=#1+10
IF[[#10AND8]EQ0]GOTO40
Z[-#1]
N40#1=#1+10
IF[[#10AND16]EQ0]GOTO50
Z[-#1]
N50G0X100.M9
Z100.M5
M30
N3000#3000=1﹙#200-MODE-ERROR﹚

昊天大帝 · 发表于 2013-10-31 21:56:27

在书上见过这个图！~！~我也可以编出来但是达不到你所说的精短！~！~

jiangssli · 发表于 2013-10-31 21:57:12

在下去年刚学会位操作时的原创

天空的樱花 · 发表于 2013-10-31 21:58:12

先收了啊，好东西啊，有时间看看

flm0095 · 发表于 2013-10-31 21:58:58

好像楼主也掌握了那个分中程序的精要了
这个题目和那个程序所用的原理一样

jiangssli · 发表于 2013-10-31 21:59:57

回复
flm0095
的帖子
哪里哦,那个程序的算法的确不是我目前所能掌握的!只是刚入门!正在学习中,不过进步很慢!!请你有空多多指点啦!!

jiangssli · 发表于 2013-10-31 22:00:33

还有比这个更简短的程序!不过那个程序有一个弊端,就是图中的切槽数目大于9了.就不好判断了!呵呵虽然这个程序比较长,但是就算是有10几个槽也同样可以达到要求和目的!!
如果社友们多多的来发帖讨论下,我可以把另外的程序也贴出了献献丑!!!!

yukunv6 · 发表于 2013-10-31 22:01:12

呵呵！用子程序不快一些吗！？