夜总是要来的
发表于 2013-8-27 07:59:55
很不错的帖子!!!
天天他爸
发表于 2013-8-27 08:03:35
感谢分享
夜总是要来的
发表于 2013-8-27 08:04:18
主要是学思路、。。其实宏做到最后都差不多
夜总是要来的
发表于 2013-8-27 10:48:30
#10是代表什么?
mcsino
发表于 2013-8-27 13:06:06
本帖最后由 mcsino 于 2013-8-27 14:00 编辑
不用这么复杂吧,既然有人挖,我写点简单的 1~9个槽应该随便切(如果需要切10个以上的槽,适当增加变量即可),也不需要逻辑运算,位运算,也许有错,没深究
#20=#200While 1>0 do1#20=#20/10#33= FIX[#20]#32=#20-FIX[#20]*10IF[ #33==0 and #32<1] goto 1#30=#1-(#32-1)*10-#3g0 z#30g1 x40 f#7g0 x52end1n1m99 #1 z向第一个槽起点, #3槽刀宽
吃玩乐
发表于 2013-8-27 14:42:46
呵呵!用子程序不快一些吗!?
龍少
发表于 2013-8-27 19:47:35
看不懂,但是学习了
mcsino
发表于 2013-8-28 18:44:50
本帖最后由 mcsino 于 2013-8-28 18:53 编辑
#17=0
#19=1#20=#200While 1>0 do1#20=#20/10#33= FIX[#20]#32=#20-FIX[#20]*10IF[ #33==0 and #32<1] goto 1#18=#32WHILE #18>0 do2#19=#19*2#18=#18-1end2if #17 and #19 goto2;判断当前槽是否已经加工,已加工则跳转#17=#17+#19 ;对当前槽状态做记录,标记为已加工#30=#1-(#32-1)*10-#3g0 z#30g1 x40 f#7g0 x52n2 end1n1m99
红色字体为避免重复切削增加的代码
闲潭梦落
发表于 2013-8-28 19:59:57
哪里哦,那个程序的算法的确不是我目前所能掌握的!只是刚入门!正在学习中,不过进步很慢!!请你有空多多指点啦!!
jiangssli
发表于 2013-8-28 21:16:28
本帖最后由 jiangssli 于 2013-8-29 12:02 编辑
mcsino 发表于 2013-8-28 18:44 http://bbs.cmiw.cn/static/image/common/back.gif
#17=0
#19=1#20=#200While 1>0 do1#20=#20/10#33= FIX[#20]#32=#20-FIX[#20]*10IF[ #33==0 and #320 do2#1 ...
哇咔咔......用你这个思路还有更简单更完美的......可以很容易就判断出数据是否重复...