[更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线程.裸机系统2.3.3.1+18M酷M...

Anson4 · 发表于 2019-7-18 21:39:16

datbik189 发表于 2019-7-18 21:14
不要点评，直接回复多好。

SED命令中\要转换成\\，使用Load #999则不需要，我已经把他傻爪化，当然， ...

明白了，谢谢！

527104427 · 发表于 2019-7-18 22:28:20

本帖最后由 527104427 于 2019-7-18 22:29 编辑

Anson4 发表于 2019-7-18 19:10
查看PECMD的帮助，没找到“®”号，这个表示什么意思呢？
替换成“&”貌似也不起作用。
实际上我 ...

1.我用手机编辑过，可能是这个原因，自动将“&”变成“®”了。
2.其实要学到东西，还是要自己搞懂原理，把\变成\\，也是非常简单的。
3.你用的PECMD太旧了，建议下载最新版，否则很多功能都用不成。最新版：http://bbs.wuyou.net/forum.php?m ... &extra=page%3D1
怕你下载不来，我上传吧：

PECMD2012.1.88.05.82Stable-180148测试.part06.rar (2.9 MB, 下载次数: 0)

PECMD2012.1.88.05.82Stable-180148测试.part05.rar (4 MB, 下载次数: 0)

PECMD2012.1.88.05.82Stable-180148测试.part04.rar (4 MB, 下载次数: 0)

PECMD2012.1.88.05.82Stable-180148测试.part03.rar (4 MB, 下载次数: 0)

PECMD2012.1.88.05.82Stable-180148测试.part02.rar (4 MB, 下载次数: 0)

PECMD2012.1.88.05.82Stable-180148测试.part01.rar (4 MB, 下载次数: 0)

4.你要的效果如下：

SET  &FILE=%CurDir%\PECMD_Test.reg
SET-raw  &String=C:\\Program Files\\Adobe Photoshop CC 2018.1.8
SET-raw  &ReplaceString=D:\\Design\\Adobe Photoshop CC 2018.1.8
READ %&FILE%,**,&STR
SED  &String2=0,\\,\\\\,%&String%
SED  &ReplaceString2=0,\\,\\\\,%&ReplaceString%
SED  &Results=0,%&String2%,%&ReplaceString2%,%&STR%
WRIT-UNICODE *c *fv %&FILE%,$0,&Results //注意，用了*fv，&Results就不要加百分号了。

dos时代菜鸟 · 发表于 2019-7-18 22:31:08

本帖最后由 dos时代菜鸟于 2019-7-19 06:48 编辑

diskpart 可以在 win7下驻留。

1.不用第二线程
2.利用 cmd /k 运行 diskpart 并将 diskpart 的结果传给一个文件
3.通过定时读取结果文件的行数变化判断命令是否运行完了
4.从结果文件中提取指定部分显示到 edit 控件。

diskpart5.txt (1.54 KB, 下载次数: 2)

无标题.png

代码如下：
--------------------------------------------------

//logs --2 * xx.log
envi^ envimode=1
envi result="%temp%\result.txt" //定义临时文件
envi enter=0x0D 0x00 0x0A 0x00 //定义变量记录回车符对应的宽码
exec -pid:cmdpid cmd.exe /k "diskpart.exe >%result% & exit" //方便调试没有隐藏运行
//exec -pid:cmdpid *cmd.exe /k "diskpart.exe >%result% & exit" //隐藏运行
loop #0=0,
{
team envi lx=|envi pidx=|envi wid=
wait 200
find --forpid:%cmdpid% --wid*@. &lx
mstr pidx,wid=<6><2>%lx%
find #%pidx%=%cmdpid%,
{
calc -base=16 wid=%wid%
exit loop
}
}
call @cmd_win
_Sub cmd_win,h410 w600 ,diskpart,call exit9
edit-| cmd_edit, L10 T10 H280 w580,,,76
edit cmd_edit1,L10 T295 h70 w520,,,0x20
item cmd_but, L530 t329 h20 w50,Run,call send_diskpart
_end
_sub exit9
code *,exit ,*-unicode,&lx
forx * %&lx% %enter%,&xltr,ENVI @@SENDMSG=%WID%;0x102;%&xltr% //退出 diskpart
kill *%cmdpid%
file %result%
_end
_sub send_diskpart
envi. &cmd_x=%cmd_edit1%
read %result%,-1,&ln_0
forx *NL cmd_x,&lx,
{
code *,%&lx% ,*-unicode,&lx
read %result%,-1,&ln0
forx * %&lx% %enter%,&xltr,ENVI @@SENDMSG=%WID%;0x102;%&xltr%
loop #1=1,
{
wait 200
read %result%,-1,&ln2
find #%&ln2%>%&ln0%,exit loop
}
}
read %result%,%&ln_0%+0,&result_x
envi @cmd_edit=%&result_x%
_end

复制代码

--------------------------------------------------------------------

Anson4 · 发表于 2019-7-18 22:38:25

527104427 发表于 2019-7-18 22:28
1.我用手机编辑过，可能是这个原因，自动将“&”变成“®”了。
2.其实要学到东西，还是要自己搞 ...

谢谢！
明天我研究一下怎样才能最简单地套到CMD脚本中使用。

datbik189 · 发表于 2019-7-18 22:48:48

dos时代菜鸟发表于 2019-7-18 22:31
diskpart 可以在 win7下驻留。

1.不用第二线程

好消息，改天我找个WIN7电脑测试下。

527104427 · 发表于 2019-7-18 22:50:13

dos时代菜鸟发表于 2019-7-18 22:31
diskpart 可以在 win7下驻留。

1.不用第二线程

恭喜恭喜，又攻破一难题，代码更上一层楼了。

527104427 · 发表于 2019-7-18 22:53:27

Anson4 发表于 2019-7-18 22:38
谢谢！
明天我研究一下怎样才能最简单地套到CMD脚本中使用。

还用什么CMD脚本，多LOW啊，直接改用PECMD脚本，高大上，而且效率又高！

dos时代菜鸟 · 发表于 2019-7-18 22:56:46

本帖最后由 dos时代菜鸟于 2019-7-18 22:58 编辑

527104427 发表于 2019-7-18 22:50
恭喜恭喜，又攻破一难题，代码更上一层楼了。

我甚至想如果 cmd 能够驻留就行，可以把 diskpart传递给 cmd 窗口，不就相当于运行 diskpart 了吗。现在看，不用了。哈哈。

这下很多 cmd 脚本命令都可以通过这个方式 “暗箱” 完成了。

527104427 · 发表于 2019-7-18 23:03:08

dos时代菜鸟发表于 2019-7-18 22:56
我甚至想如果 cmd 能够驻留就行，可以把 diskpart传递给 cmd 窗口，不就相当于运行 diskpart 了吗。现 ...

cmd我也试过了，也是不行的。
一个diskpart能从开始一直保留到结束，也是够牛的了，哈

Anson4 · 发表于 2019-7-18 23:14:48

527104427 发表于 2019-7-18 22:53
还用什么CMD脚本，多LOW啊，直接改用PECMD脚本，高大上，而且效率又高！

可是还有很多其他的操作需要处理，用PECMD写不来，主要是PECMD的帮助看起来比较吃力，没有CMD的帮助那么容易理解。

dos时代菜鸟 · 发表于 2019-7-18 23:37:56

527104427 发表于 2019-7-18 23:03
cmd我也试过了，也是不行的。
一个diskpart能从开始一直保留到结束，也是够牛的了，哈

cmd 是可以驻留的，只是我们以前习惯用 “cmd /c call” 调用批处理指令，其实用 cmd /k 就可以了，也不用 = ，那个cmd 就在那里，一直等着你录入命令。只是不自动关闭而已，exec 时就记录下他的进程号，然后手动关了他。

dos时代菜鸟 · 发表于 2019-7-18 23:40:16

datbik189 发表于 2019-7-18 22:48
好消息，改天我找个WIN7电脑测试下。

code 和 sendmsg 用的摸不着头脑，也不知有没有更详细的解说

红毛樱木 · 发表于 2019-7-19 07:48:32

其实直接
exec diskpart.exe就行了啊，不需要cmd的，所以才有你们说的不能驻留进程的问题吧

dos时代菜鸟 · 发表于 2019-7-19 08:05:52

红毛樱木发表于 2019-7-19 07:48
其实直接
exec diskpart.exe就行了啊，不需要cmd的，所以才有你们说的不能驻留进程的问题吧

主要是想获取命令的输出结果并且可以向 diskpart 窗口输入指令。

exec* 控件=diskpart 这样的方法在 win7 下不能实现，就要考虑通过中间文件的办法，而 diskpart 本身不具备输出文件能力，需要借助 cmd 的 ">" 才行。

datbik189 · 发表于 2019-7-19 12:39:53

dos时代菜鸟发表于 2019-7-18 23:40
code 和 sendmsg 用的摸不着头脑，也不知有没有更详细的解说

这个没有哦。

PECMD2012由M大一人开发，为兼容PECMD4.0,新版本兼容旧版本，新功能兼容旧功能，语法难免不规范，有些功能在说明中阐述不清。唯一权威的资料就是这个网页里面的附件和示范脚本。

5大和红毛大跟M大混的时间比较长，你问他们看看。

红毛樱木 · 发表于 2019-7-19 15:22:40

dos时代菜鸟发表于 2019-7-19 08:05
主要是想获取命令的输出结果并且可以向 diskpart 窗口输入指令。

exec* 控件=diskpart 这样的方 ...

那个输出结果的txt文件，不能删除，一直被占用

红毛樱木 · 发表于 2019-7-19 15:43:24

本帖最后由红毛樱木于 2019-7-19 15:45 编辑

ENVI &&WM_CHAR=0x0102
ENVI &&DiskPartResult="%temp%\DiskPartResult.txt"
IFEX %&DiskPartResult%,FILE %&DiskPartResult%
CALL @WIN
_SUB WIN,W800H600,,KILL *%&DiskPartPid%
^EXEC -hide -pid:&CmdPid cmd.exe /k "diskpart.exe >%&DiskPartResult% & exit"
LOOP #1=1,
{*
FIND --class:ConsoleWindowClass --forpid:%&CmdPid% --wid*@ &DiskPartWidInfos
FIND $%&DiskPartWidInfos%<>,
{*
MSTR* * &DiskPartWid,&FixDiskPartWid=<2><8>&DiskPartWidInfos
//注意这里的%&FixDiskPartWid%信息是在win7中获取得到的，其他系统中可能不一样，自己适配一下
^IFEX '%&FixDiskPartWid%'='%SystemROOT%\system32\cmd.exe - diskpart.exe ',
{*
FIND --pid*.#%&CmdPid% &DiskPartPid,diskpart.exe
EXIT LOOP
}
}
}
CALL FixDone
LABE ,L10T15W90H48,待输入的命令：
EDIT &DiskPartCommandLines,L100T10W680H24,,
ITEM ,L10T60W300H54,执行命令,CALL DoDiskPart,
EDIT-| &DiskPartCallBack,L10T120W780H400,,,0xC
_END
//判断最后一行为'DISKPART> '则说明命令执行完成 //如果还有别的信息，在这里补上
_SUB FixDone
LOOP #1=1,
{*
ENVI &LastLine=
READ %&DiskPartResult%,0,&LastLine
IFEX '%&LastLine%'='DISKPART> ',
{*
EXIT LOOP
}
}
_END
_SUB DoDiskPart
READ %&DiskPartResult%,-1,&DiskPartResultLines
CODE *,%&DiskPartCommandLines%,*UNI,&DiskPartCommandLinesHexs
FORX * %&DiskPartCommandLinesHexs%,&DiskPartCommandLinesHex,
{*
ENVI @@SENDMSG=%&DiskPartWid%;%&WM_CHAR%;%&DiskPartCommandLinesHex%
}
ENVI @@SENDMSG=%&DiskPartWid%;%&WM_CHAR%;0x0D //实际发送一个0x0D就行了
//ENVI @@SENDMSG=%&DiskPartWid%;%&WM_CHAR%;0x0A
LOOP #1=1,
{*
ENVI &TheLines=0
READ %&DiskPartResult%,-1,&TheLines
IFEX $%&TheLines%>0,
{*
IFEX $%&TheLines%>%&DiskPartResultLines%,
{*
CALL FixDone
EXIT LOOP
}
}
}
//这里还可以根据&TheLines和&DiskPartResultLines的差值来截取每次的输出信息
READ %&DiskPartResult%,**,&DiskPartResultInfos
ENVI @&DiskPartCallBack=%&DiskPartResultInfos%
_END

复制代码

以上代码在Win7中调试的，其他系统不知道是否一样，理论应该差不多吧。

datbik189 · 发表于 2019-7-19 17:00:47

本帖最后由 datbik189 于 2019-7-22 15:53 编辑

看到你们show脚本,我也发一下,

使用临时文件的:

ENVI^ ENVIMODE=1
TEAM SET$ &NL=D A|SET$ &TAB=9|MSTR &FILE=1,8,%RANDOM%|SET &FILE="%TEMP%\%&FILE%.TXT"|SET &END=DISKPART> %&NL%DISKPART> |STRL &END_LEN=%&END%
TEAM DATE &T1 UPTIME|EXEC -PID:&PID *CMD.EXE /K DISKPART.EXE>%&FILE%&DEL %&FILE%&EXIT
THREAD* -HERE -TID:&TID LOOP #1=1,TEAM FIND --WID*@. &V|SET &V1=%&TAB%%&PID%%&TAB%|LOAD #999*命令_FIND.EXE &V "" &V1|MSTR * &WID=<2>&V|CALC -BASE=16 &WID=%&WID%|SET-RET &WID=%&WID%|IFEX $%&WID%>0,EXIT LOOP
WAIT 1500 *=%&TID%
IFEX $%&WID%>0,ENVI @@SENDMSG=%&WID%;0X102;0XD!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错|EXIT FILE
CALL @CMD_WIN

_SUB CMD_WIN,H410W600,DISKPART,CALL RUN EXIT
EDIT-| &CMD_EDIT1,L10T295H70W520,,,0X20
EDIT-| &CMD_EDIT,L10T10H280W580,,,0X864
ENVI @&CMD_EDIT.READONLY=1
LOOP #1=1,TEAM IFEX %&FILE%,!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错||KILL \||EXIT FILE|READ %&FILE%,**,&RET|MSTR * &V=-1,%&END_LEN%,&RET|IFEX*C '%&END%'='%&V%',TEAM SED -EX &V=0,(%&NL%DISKPART> )+,%&NL%DISKPART> ,&RET||DATE &T2 UPTIME||CALC &T3=%&T2%-%&T1%||ENVI @&CMD_EDIT=%&V% ( 启动耗时 %&T3% ms )%&NL%%&NL%DISKPART> ||EXIT LOOP
SET-RAW &CMD=TEAM SET &RET_NEW=|DATE &T4 UPTIME|FORX *NL &CMD_EDIT1,&COMMAND,FIND $%&COMMAND%=,!TEAM DATE &T1 UPTIME||CALL RUN &COMMAND||DATE &T2 UPTIME||CALC &T3=%&T2%-%&T1%||ENVI @&CMD_EDIT=%&CMD_EDIT%%&COMMAND% ( 耗时 %&T3% ms )%&NL%%&RET_NEW%|FIND $%&RET_NEW%=,!TEAM CALC &T5=%&T2%-%&T4%||ENVI @&CMD_EDIT=%&CMD_EDIT% ( 总耗时 %&T5% ms )%&NL%%&NL%DISKPART> |IFEX %&FILE%,!KILL \
ITEM &CMD_BUT,L530T329H20W50,RUN,TEAM ENVI @&CMD_BUT.ENABLE=0|%&CMD%|ENVI @&CMD_BUT.ENABLE=1
_END

_SUB RUN
FIND $%1=,EXIT _SUB
FIND $%1=EXIT,TEAM SET &CHAR=EXIT%&NL%|LOAD #999*命令_宽字符 &CHAR|FORX * %&CHAR%,&CHAR1,ENVI @@SENDMSG=%&WID%;0X102;0X%&CHAR1%|EXIT _SUB
TEAM READ %&FILE%,**,&RET|SET &RET_=%RET%|^SET &CHAR=%%%~1%%%&NL%%&NL%|IFEX*C '%&CHAR%'='%&NL%%&NL%',EXIT _SUB
TEAM LOAD #999*命令_宽字符 &CHAR|FORX * %&CHAR%,&CHAR1,ENVI @@SENDMSG=%&WID%;0X102;0X%&CHAR1%
LOOP #1=1,TEAM IFEX %&FILE%,!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错||EXIT _SUB|READ %&FILE%,**,&RET|MSTR * &CHAR=-1,%&END_LEN%,&RET|IFEX*C ['%&END%'='%&CHAR%' & '%&RET%'<>'%&RET_%'],EXIT LOOP
TEAM READ -*,-1,&LINE,&RET_|CALC &LINE=%&LINE%+1|READ -*,%&LINE%+0,&RET_NEW,&RET|SED -EX &RET_NEW=0,(%&NL%DISKPART> )+,%&NL%DISKPART> ,&RET_NEW|SET-RET &RET_NEW=%&RET_NEW%
_END

不使用临时文件的:

ENVI^ ENVIMODE=1
TEAM SET$ &NL=D A|SET$ &TAB=9|SET &END=DISKPART> %&NL%DISKPART> |STRL &END_LEN=%&END%
TEAM DATE &T1 UPTIME|THREAD* -HERE CALL @START
THREAD* -HERE -TID:&TID LOOP #1=1,TEAM FIND --WID*@. &V|SET &V1=%&TAB%%&PID%%&TAB%|LOAD #999*命令_FIND.EXE &V "" &V1|MSTR * &WID=<2>&V|CALC -BASE=16 &WID=%&WID%|SET-RET &WID=%&WID%|IFEX $%&WID%>0,EXIT LOOP!WAIT 100
WAIT 1500 *=%&TID%
IFEX $%&WID%>0,ENVI @@SENDMSG=%&WID%;0X102;0XD!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错|EXIT FILE
CALL @CMD_WIN

_SUB CMD_WIN,H410W600,DISKPART,CALL RUN EXIT
EDIT-| &CMD_EDIT1,L10T295H70W520,,,0X20
EDIT-| &CMD_EDIT,L10T10H280W580,,,0X864
ENVI @&CMD_EDIT.READONLY=1
LOOP #1=1,TEAM FIND $%PROCEED%=,!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错||KILL \||EXIT LOOP|MSTR * &V=-1,%&END_LEN%,&RET|IFEX*C '%&END%'='%&V%',TEAM SED -EX &V=0,(%&NL%DISKPART> )+,%&NL%DISKPART> ,&RET||DATE &T2 UPTIME||CALC &T3=%&T2%-%&T1%||ENVI @&CMD_EDIT=%&V% ( 启动耗时 %&T3% ms )%&NL%%&NL%DISKPART> ||EXIT LOOP
SET-RAW &CMD=TEAM SET &RET_NEW=|DATE &T4 UPTIME|FORX *NL &CMD_EDIT1,&COMMAND,FIND $%&COMMAND%=,!TEAM DATE &T1 UPTIME||CALL RUN &COMMAND||DATE &T2 UPTIME||CALC &T3=%&T2%-%&T1%||ENVI @&CMD_EDIT=%&CMD_EDIT%%&COMMAND% ( 耗时 %&T3% ms )%&NL%%&RET_NEW%|FIND $%&RET_NEW%=,!TEAM CALC &T5=%&T2%-%&T4%||ENVI @&CMD_EDIT=%&CMD_EDIT% ( 总耗时 %&T5% ms )%&NL%%&NL%DISKPART> |FIND $%PROCEED%=,!KILL \
ITEM &CMD_BUT,L530T329H20W50,RUN,TEAM ENVI @&CMD_BUT.ENABLE=0|%&CMD%|ENVI @&CMD_BUT.ENABLE=1
_END

_SUB START,#,CATCH,
TIME -T:1 &TIMER1,100,TEAM EXEC* -PID:&PID @&RET=*DISKPART.EXE|ENVI PROCEED=0|KILL \
TIME &TIMER2,50,@TEAM @SET-RET2 &PID=%&PID%|@SET-RET2 &RET=%&RET%
EDIT-| &RET,L10T10H180W380
_END

_SUB RUN
FIND $%1=,EXIT _SUB
FIND $%1=EXIT,TEAM SET &CHAR=EXIT%&NL%|LOAD #999*命令_宽字符 &CHAR|FORX * %&CHAR%,&CHAR1,ENVI @@SENDMSG=%&WID%;0X102;0X%&CHAR1%|EXIT _SUB
TEAM SET &RET_=%RET%|^SET &CHAR=%%%~1%%%&NL%%&NL%|IFEX*C '%&CHAR%'='%&NL%%&NL%',EXIT _SUB
TEAM LOAD #999*命令_宽字符 &CHAR|FORX * %&CHAR%,&CHAR1,ENVI @@SENDMSG=%&WID%;0X102;0X%&CHAR1%
LOOP #1=1,TEAM FIND $%PROCEED%=,!TEAM MESS.+ICON0 DISKPART.EXE 未启动！@出错||EXIT LOOP|MSTR * &CHAR=-1,%&END_LEN%,&RET|IFEX*C ['%&END%'='%&CHAR%' & '%&RET%'<>'%&RET_%'],EXIT LOOP
TEAM READ -*,-1,&LINE,&RET_|CALC &LINE=%&LINE%+1|READ -*,%&LINE%+0,&RET_NEW,&RET|SED -EX &RET_NEW=0,(%&NL%DISKPART> )+,%&NL%DISKPART> ,&RET_NEW|SET-RET &RET_NEW=%&RET_NEW%
_END

527104427 · 发表于 2019-7-19 17:04:25

m大好几年不出现，你们这是要疯的节奏啊，哈哈哈

datbik189 · 发表于 2019-7-19 21:08:39

dos时代菜鸟发表于 2019-7-18 23:40
code 和 sendmsg 用的摸不着头脑，也不知有没有更详细的解说

测试了WIN7系统，貌似只有你那个方法让diskpart一直后台挂着，再使用临时文件获取回显。EXE* 用不了。

dos时代菜鸟 · 发表于 2019-7-19 22:13:17

红毛樱木发表于 2019-7-19 15:22
那个输出结果的txt文件，不能删除，一直被占用

确实，应该等待 diskpart 进程 Exit 了以后再删除。

dos时代菜鸟 · 发表于 2019-7-19 22:14:58

datbik189 发表于 2019-7-19 21:08
测试了WIN7系统，貌似只有你那个方法让diskpart一直后台挂着，再使用临时文件获取回显。EXE* 用不了。

因为如果用 exec* 直接把结果传递给控件的，就要用 = ，强制等待，而这个在 win7 下失灵。

dos时代菜鸟 · 发表于 2019-7-19 22:20:24

红毛樱木发表于 2019-7-19 15:22
那个输出结果的txt文件，不能删除，一直被占用

http://bbs.wuyou.net/forum.php?m ... 8MTE5OHw0MTUzOTI%3D

http://bbs.wuyou.net/forum.php?m ... 92&fromuid=1198

这个不会有不能删除的问题。

红毛樱木 · 发表于 2019-7-20 00:46:17

527104427 发表于 2019-7-19 17:04
m大好几年不出现，你们这是要疯的节奏啊，哈哈哈

还没到一年哎

Anson4 · 发表于 2019-7-20 08:43:20

527104427 发表于 2019-7-18 22:28
1.我用手机编辑过，可能是这个原因，自动将“&”变成“®”了。
2.其实要学到东西，还是要自己搞 ...

代码测试很成功，感谢回复！

然而我希望将这段代码通用化，当我将这段代码保存到文件，然后通过PECMD带参数LOAD的时候，就得不到相应的效果了，请指正！

保存到文件的代码（_Script.txt）：

SET &FILE=%~1
SET-raw &String=%~2
SET-raw &ReplaceString=%~3
READ %&FILE%,**,&STR
SED &String2=0,\\,\\\\,%&String%
SED &ReplaceString2=0,\\,\\\\,%&ReplaceString%
SED &Results=0,%&String2%,%&ReplaceString2%,%&STR%
WRIT-UNICODE *c *fv %&FILE%,$0,&Results
_END
Replace "%~1" "%~2" "%~3"

复制代码

通过该命令LOAD：

PECMD.exe load "C:\A4\_Script.txt" "C:\A4\PECMD_Test.reg" "C:\\Program Files\\Adobe Photoshop CC 2018.1.8" "D:\\Design\\Adobe Photoshop CC 2018.1.8"

复制代码

527104427 · 发表于 2019-7-20 09:01:43

本帖最后由 527104427 于 2019-7-20 09:14 编辑

Anson4 发表于 2019-7-20 08:43
代码测试很成功，感谢回复！

然而我希望将这段代码通用化，当我将这段代码保存到文件，然后通过PECM ...

少了一个_SUB吧

_SUB Replace
SET  &FILE=%1
SET-raw  &String=%~2
SET-raw  &ReplaceString=%~3
READ %&FILE%,**,&STR
SED  &String2=0,\\,\\\\,%&String%
SED  &ReplaceString2=0,\\,\\\\,%&ReplaceString%
SED  &Results=0,%&String2%,%&ReplaceString2%,%&STR%
WRIT-UNICODE *c *fv %&FILE%,$0,&Results
_END
Replace "%~1" "%~2" "%~3"

Anson4 · 发表于 2019-7-20 09:24:56

本帖最后由 Anson4 于 2019-7-20 09:32 编辑

527104427 发表于 2019-7-20 09:01
少了一个_SUB吧

_SUB Replace

惭愧

加上_SUB Replace也没有效果：

_SUB Replace
SET &FILE=%~1
SET-raw &String=%~2
SET-raw &ReplaceString=%~3
READ %&FILE%,**,&STR
SED &String2=0,\\,\\\\,%&String%
SED &ReplaceString2=0,\\,\\\\,%&ReplaceString%
SED &Results=0,%&String2%,%&ReplaceString2%,%&STR%
WRIT-UNICODE *c *fv %&FILE%,$0,&Results
_END
Replace "%~1" "%~2" "%~3"

复制代码

527104427 · 发表于 2019-7-20 09:39:28

Anson4 发表于 2019-7-20 09:24
惭愧

加上_SUB Replace也没有效果：

你把全套文件发上来

Anson4 · 发表于 2019-7-20 09:41:58

527104427 发表于 2019-7-20 09:39
你把全套文件发上来

好的，请看附件：

PECMD_Script_Test.zip (979.77 KB, 下载次数: 9)

527104427 · 发表于 2019-7-20 10:42:42

Anson4 发表于 2019-7-20 09:41
好的，请看附件：

PECMD_Script.7z (468 Bytes, 下载次数: 7)

		自动登录	找回密码
密码			注册

[更新376#2825]PECMD2012.1.80.13_Win32_64.多窗口多线程.裸机系统2.3.3.1+18M酷M...

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

浏览过的版块