MASTERCAM數控車后處理，針對國產系統。

行中

MASTERCAM數控車后處理，針對國產系統。絕對原創！先看處理結果，有圖片為證

行中

風隨意 發表于 2012-8-29 14:06
頂。。。。。

@echo off
1 j% q' `1 \' k# x. ]& gsetlocal enabledelayedexpansion
  findstr /v /i /c:"g21" /c:"g97" /c:"g96" /c:"o0000" /c:"m01" /c:"g50" /c:"(" t.nc>>2.nc
- Q( a6 m0 t' H0 x# t( nfor /f "delims=" %%i in ( 2.nc) do (
; f( z8 d, v9 g/ H: g
* B$ }/ ?" O/ F4 A9 P8 M          echo %%i | find /i "g54" >nul
: C4 B6 P1 ^6 |' i  y( r9 j   if !errorlevel!==0  (
set str=%%i & set str=!str:g54 =! & echo !str!>>3.nc
) else (
4 Z  w/ K/ s8 V) _echo %%i>>3.nc
! @$ g+ B/ Q$ P) V. j- I. q)
- i) y* x) w' @( c)
for /f "delims=" %%i in (3.nc) do (
3 w% |  F! Y( q7 G. d' A0 y
          echo %%i | find /i "g28" >nul
  }5 X+ P6 p4 j9 P$ \/ G   if !errorlevel!==0  (
" P+ b# [5 R8 a! J+ [3 f             echo G0 Z100>>t1.nc
) else (
echo %%i>>t1.nc
)
  m* U9 T9 G- J5 i)
9 F9 _& U: t( m3 tdel /f /q 2.nc
+ v5 S' Y& ?& F2 F" g& `; `del /f /q 3.nc
% d+ m. }8 N0 a) w' G1 I              
pause


7 R) v  R2 b1 q- {
     這是另外一種方式的后處理，絕對原創。經過簡單修整     即可針對所有MC后處理。所有國產數控處理。本不沒想放上網。因為我手工刪除修改達五年之長，才發現利用批處理這方法。

行中

@echo off
setlocal enabledelayedexpansion
/ _& b' L9 S) G& w+ G' u  findstr /v /i /c:"g21" /c:"g97" /c:"g96" /c:"o0000" /c:"m01" /c:"g50" /c:"(" t.nc>>2.nc
for /f "delims=" %%i in ( 2.nc) do (

9 l7 I' o( Q- A# ]1 u          echo %%i | find /i "g54" >nul
   if !errorlevel!==0  (
set str=%%i & set str=!str:g54 =! & echo !str!>>3.nc
: g5 M" w" N( ]: \) else (
% V- E, M: U/ k% Secho %%i>>3.nc
)
)
( _( S8 i* R' T6 O$ z/ i( j4 ^6 N: Afor /f "delims=" %%i in (3.nc) do (
; ~5 A: V" s; S* M
7 R9 c0 [7 Z& c          echo %%i | find /i "g28" >nul
  u# N1 B- q0 r% ~   if !errorlevel!==0  (
$ U6 [1 O) b& Q# O0 t             echo G0 Z100>>t1.nc
4 x9 z/ N# v; E7 o0 {/ w/ i) else (
# o* E. z5 G+ v3 m$ Uecho %%i>>t1.nc
9 C$ z/ e: X4 p- e! S)
) [. o( x% w) {8 L4 m! t)
del /f /q 2.nc
del /f /q 3.nc
0 _8 E- Q4 C7 h: V* w* V" }: T$ A3 ]              
pause


( R+ R. l/ B, Z% w把以上文字復制到記事本，另存為.bat    你要處理的程序保存為T.NC。然后雙擊批處理，即產生一個T1的文件。

風隨意

@echo off
setlocal enabledelayedexpansion
for /f "tokens=*" %%i in ('type 1.txt') do (
9 o; `9 V( z7 x1 Q5 C& K* B    set text=%%i
$ o  Q/ n. u. t4 [    set size=0
    for %%a in (G21 G18 G50 G96) do (
. y" ?2 g5 t: K2 g8 N( r        if /i "!text:~0,3!" == "%%a" (
+ e" v' \$ \  w. r, s& q           set size=1
        )
" n* N) |; f* z- b- H- Y    )
1 q3 c6 A5 Q: O/ \3 |5 Y! Z& X    if "!text:~0,1!" == "(" (set size=1)
# I6 ~1 V, B$ F! ^    if !size! == 0 (
       echo %%i >>2.txt
0 K2 |1 m  B7 C2 h) Y    )
)
pause

wgh0718

搞不懂，處理后的文件和之前編的文件一樣啊

無名之水無痕

不明白，不過先留個記號

onelee

雖然搞不懂,但必需要頂,樓主無私奉獻精神可敬

hf2003@yahoo.cn

風隨意 發表于 2012-8-31 22:39
/ T, j% o3 i5 Y5 u* f@echo off
setlocal enabledelayedexpansion
$ G' H( W& c& j" a+ J8 {. o+ Rfor /f "tokens=*" %%i in ('type 1.txt') do (

5 O* f  j  R' s  e9 T) n' o后處理不完美

cj0203

你這沒意義 ，要開發出 GSK928  HNC-18  19 低端系統的后處理就OK了

黃海是我

哦，沒發現什么，不用電腦編程。