[已解決]批處理如何刪除多個文本中的以指定字符串開頭的行最后由 pcl_test 于 -10-9 21:34我這里有一批文件需要用批處理刪除文本文件中指定的內容，請論壇里的前輩幫忙看看好嗎？有如下文件很多E10鑼頂2MM開粗.macE10外形開粗(挖槽).macR3光頂(曲面).mac

 
import TEMPLATE PROJECT FILEOPEN D:dcamAUTOPMILL6.0TOOL.ptf
ACTIVATE TOOL E10(開粗)
FORM BLOCK
EDIT BLOCKTYPE LIMITS
EDIT BLOCK ALL UNLOCK
EDIT BLOCK RESETLIMIT 1
EDIT BLOCK RESET
EDIT BLOCK ZMAX @{ZMAX}+0.5@
EDIT BLOCK ZMIN @{ZMAX}+0.12@
EDIT BLOCK ALL UNLOCK
BLOCK ACCEPT
FORM FEEDRATE
EDIT RSPEED 30000
EDIT PRATE 1000
EDIT FRATE 2000
EDIT RPM 2000
FEEDRATE ACCEPT
FORM TOOLAXIS
EDIT TOOLAXIS TYPE VERTICAL
TOOLAXIS ACCEPT
import TEMPLATE ENTITY TOOLPATH FavouritesOffset-AreaClear-Model.ptf FORM TOOLPATH
EDIT RTOLERANCE 0.05
FORM THICKNESS ROUGHING
EDIT RTHICKNESS AXIAL_RADIAL ON
EDIT RTHICKNESS @{THK}+0.45@
EDIT RTHICKNESS AXIAL 0.07
THICKNESS ACCEPT
EDIT OVER 6.5
EDIT ZHEIGHTS AUTOMATIC ON
EDIT ZHEIGHTS AUTOMATIC STEPDOWN 0.8
EDIT ACUTDIR ANY
ACTIVATE BOUNDARY  
EDIT FINALPROFILEPASS OFF
EDIT AREAFILTER ON
EDIT AREAFILTERVALUE 0.5
EDIT LMOVES RAMP
SET OUTSIDE
EDIT SLICEARCFIT ON
EDIT SMOOTHlinkS OFF
EDIT AREACLEAROFFSET SMOOTHING ON
EDIT AREACLEAROFFSET SMOOTHINGALLOWANCE 13
EDIT AREACLEAR REFERENCE ENABLED OFF
EDIT OFFSETDIRECTION OUTSIDEIN
SET AREACLEAREXPERT
EDIT ALLOWTOOLOUTSIDEBLOCK OFF
UNSET AREACLEAREXPERT
EDIT TOOLPATH ; CALCULATE
AREACLEAR CANCEL
FORM LEADlink
EDIT TOOLPATH LEADS PAGE ZHEIGHTS
EDIT TOOLPATH LEADS SKIMDIST 4
EDIT TOOLPATH LEADS PLUNGEDIST 2
EDIT TOOLPATH LEADS INCREMENT_FROM_STOCK Y
EDIT TOOLPATH LEADS GOUGECHECK Y
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS LEADIN RAMP
FORM PMLLEADINRAMP
EDIT TOOLPATH LEADS LEADIN RAMPOPT HEIGHT_INCREMENT 0.6
EDIT TOOLPATH LEADS LEADIN RAMPOPT ZIGANGLE 2
EDIT TOOLPATH LEADS LEADIN RAMPOPT FINITELENGTH N
LEADINRAMP ACCEPT
EDIT TOOLPATH LEADS MOVESTARTPOINTS Y
EDIT TOOLPATH LEADS LEADSonSHORTlinkS Y
EDIT TOOLPATH LEADS LEADIN2 NONE
EDIT TOOLPATH LEADS PAGE LEADSOUT
EDIT TOOLPATH LEADS LEADOUT NONE
EDIT TOOLPATH LEADS LEADOUT2 NONE
EDIT TOOLPATH LEADS PAGE LEADIN
EDIT TOOLPATH LEADS PAGE LEADEXTENSIONS
EDIT TOOLPATH LEADS EXTIN NONE
EDIT TOOLPATH LEADS EXTOUT NONE
EDIT TOOLPATH LEADS PAGE link
EDIT TOOLPATH LEADS link SKIM
EDIT TOOLPATH LEADS LonGlink SKIM
EDIT TOOLPATH LEADS SAFElink SAFEZ
EDIT TOOLPATH LEADS link THRESHOLD 20
PROCESS TPLEADS
LEADS ACCEPT
FORM TOOLZHEIGHTS
EDIT SAFZ RESET EDIT STAZ RESET
EDIT SAFZ @{ZMAX}+10@
EDIT STAZ @{ZMAX}+2@
EDIT RMOVES SKIM
EDIT ISAFZ 3
EDIT ISTAZ 1
RESET TOOLPATH RAPID
TOOLZHEIGHTS ACCEPT
FORM DATUM
EDIT DATUM AUTOMATIC
EDIT DATUM FIRST_SAFZ
EDIT DATUM DISTANCE @{ZMAX}+10@
DATUM ACCEPT
DELETE LEVEL ALL
nclick="copycode($('code0'));">復制代碼

如上，現要把文件中所有以“FORM 開頭到行尾的部分刪除” 如果 “FORM”前有內容則前面的內容不能刪除。上面的代碼紅色部分。但其它部分和原格式保持不變請教各位大哥大姐想想辦法。我本來用到第三方命令行工具用下面的代碼，但他把FORM以前的內容也刪除了sed /FORM/d 1.mac>a.mac[ 最后由 CZT 于 2009-7-10 21:25]