独家发布，群处理源代码

真的很有用  顶楼主

这个要顶

楼主大哥你的那些代码复制保存什么文件啊

胡哥     可以说你很伟大   谢谢你对我们的无私的奉献   谢谢你在“生命的最后”为我们做的贡献  老天是多么的不公平    好人往往都不长久   让我们一起为胡哥祝福  希望他过得快乐。。。。

谢谢楼主大哥共享
我想解决个问题就是处理时可不可以自动创建以图档为文件夹啊？

sjhxs答复[2007-07-12 11:05]:
晕~~说得我好象不久于人世似的，阎王爷说了：正常情况下，十年内还不会考虑带我走的......

由于不少人询问程式改动的覆盖以及相同刀具分离问题，在此一并作答
1）程式覆盖：
   因为工序分割的默认名称的缘故，如果仅用TP命名，对于习惯只在一TP下编程方式，其命名可能将后者覆盖前者。对多TP则无碍，所以为了增加后处理的通用性，建议以“数字-TP-刀名.NC”命名。
  将原：
   print0 \j "for /L %%a in (1,1,35) do ";
  print0 "if not exist \nc\" part_name "\%%a-*.NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tl ".nc >nul " ;
  改为：
    print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if  exist \nc\" part_name "\%%a-" tp "-" tl ".NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;
   print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if not exist \nc\" part_name "\%%a-*.NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;

  大意是前一句)如果在指定的文件夹中(\NC\图档名\)存在"当前数-当前TP-当前刀具.NC"文件,且有待命名的代码文件,就移动该文件到指定文件夹覆盖之
  (后一句)如果在指定的文件夹中(\NC\图档名\)不存在"当前数-*.NC"文件,且有待命名的代码文件,就移动该文件到指定文件夹命名为"当前数-当前TP-当前刀具.NC"

其中%%a是按叠加方式从1-35变化,如果程式超过35只,则可修改35为更大.

2)相同刀具分离:
  目前暂时采用分开处理方式实现,例如有路径A、B、C、D、E、F，其中C、D的刀具一样，但前者作为粗加工使用，而后者在作光刀用，则需分两次群处理，即A、B、C一次，D、E、F再处理一次。

  由于技术问题，有些功能需要大家研究发掘而加以完善。所谓众人拾柴火焰高，这也是我公布源代码的原因所在！

[ 本帖最后由 sjhxs 于 2007-7-14 09:15 编辑 ]

"代码中 PRINT0 中的内容就是解决你所关心的问题的，当然还需把PRINT0文件改成批处理文件执行之，这就是为什么后处理还需要*.cmd文件的原因所在。"

楼主大哥:"把PRINT0文件改成批处理文件执行"怎么改啊？请指教要改成什么*.cmd

[ 本帖最后由 wszgr2006 于 2007-7-13 10:25 编辑 ]

原帖由 wszgr2006 于 2007-7-13 10:18 发表
楼主大哥:"把PRINT0文件改成批处理文件执行"怎么改啊？请指教要改成什么*.cmd

  兄弟还得认真地学习一下DOS命令啊....
  如果没有cmd文件，后处理出来的不但有代码文件(默认文件名），还有一系列的伴随文件 ，其中有print0.txt文件，里面的内容就是在源代码中写的一组dos命令，可print0.txt文件又不会自动执行，所以就得借cmd来实现，首先改print0.txt为print0.bat，再呼print0.bat执行之，即：

   @echo off
  ren print0.txt print0.bat
  call print0
  del print*.*

[ 本帖最后由 sjhxs 于 2007-7-13 10:47 编辑 ]

楼主大哥，谢谢你了！你实在太好了．

以“数字-TP-刀名.NC”命名。
  将原：
   print0 \j "for /L %%a in (1,1,35) do ";
  print0 "if not exist \nc\" part_name "\%%a-*.NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tl ".nc >nul " ;
  改为：
    print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if  exist \nc\" part_name "\%%a-" tp "-" tl ".NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;
   print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if not exist \nc\" part_name "\%%a-*.NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;

楼主大哥我现在想以“TP.NC”命名格式我应该怎么改啊
　print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if  exist \nc\" part_name "\%%a-" tp "-" tl ".NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;
   print0 \j "for /L %%a in (1,1,35) do ";
   print0 "if not exist \nc\" part_name "\%%a-*.NC if exist " part_name ".*." post_name "_" id ;
   print0  " move/y " part_name ".*." post_name "_" id " \nc\" part_name "\%%a-" tp "-" tl ".nc >nul " ;
这里看去有两部分，还是当一起用？
还有就是代码里面有好几段print0的代码我们主要改哪段啊？

[ 本帖最后由 wszgr2006 于 2007-7-13 11:01 编辑 ]