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

527104427 · 发表于 2019-7-18 11:33:25

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

Anson4 发表于 2019-7-18 09:45
请教老司机：PECMD有什么指令能用来处理文本文件的字符串（查找和替换）？

我查看了帮助，WIRT 可以 ...

这个简单：

SET  &FILE=%CurDir%\abc.reg
SET  &String=da撒4235Dew
SET  &ReplaceString=听说你想替换我是吗  //替换为空就删掉这赋值
READ %&FILE%,**,&STR
SED  &Results=0,%&String%,%&ReplaceString%,%&STR% //SED 变量名[;次名]=[替换次数][:跳过次数][标志],正则,替换,原串
WRIT-UNICODE *c *fv %&FILE%,$0,&Results

getf命令是另一种方法，不用读取到内存，直接查找文件，方法有点复杂。没有read那么简单粗暴。

datbik189 · 发表于 2019-7-18 11:36:12

Anson4 发表于 2019-7-18 09:45
请教老司机：PECMD有什么指令能用来处理文本文件的字符串（查找和替换）？

我查看了帮助，WIRT 可以 ...

sed-替换命令 writ-修改文本命令

logs *xx.log
envi^ envimode=1
read 123.reg,**,&V
set-raw &V1=da撒4235Dew
set-raw &V2=
sed -ex &V=0:0,%&V1%,%&V2%,&V
//load #999*命令_字符替换 &V 正向 0:0,&V1,&V2
writ-uni *-nl *c 123.reg,$+0,%&V%
mess. %&V%

201287zr · 发表于 2019-7-18 12:41:37

请教大神EDIT命令参数问题，我想在编辑框中实现点击就停止TIME的定时器，但[编辑框事件]中定义为回车和双击，似乎不太方便，而且我发现双击编辑框也没有反应，能不能自己更改成单击编辑框就停止定时器功能呢。我的代码是这样的：

EDIT *Edit1,L110T62W110H18,%var%,TEAM ENVI @Timer1=0|ENVI @Edit1.Val=?ip,0
TIME *Timer1,1000,CALL next

复制代码

我想实现单击编辑框中内容就停止计时，并自动由谋个变量接收更改的内容，不知道是不是我的代码不问题或是有没有其它实现方法呢？求大神指点下

datbik189 · 发表于 2019-7-18 16:17:25

201287zr 发表于 2019-7-18 12:41
请教大神EDIT命令参数问题，我想在编辑框中实现点击就停止TIME的定时器，但[编辑框事件]中定义为回车和双击 ...

自己修改红色命令

envi^ envimode=1
call @win
_SUB WIN,H280W400,CMD,
EDIT *Edit1,L110T62W110H18,123,,,,,
ENVI @EDIT1.MSG=_0X201::&WP,&LP,ENVI @EDIT1=456
_END

dos时代菜鸟 · 发表于 2019-7-18 16:45:22

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

刚测试 win7 下确实不能让 diskpart 常驻。

但是 cmd 下 diskpart >x.txt ，然后在 pecmd 里随时获取 x.txt 的内容到 @cmd_edit 中是否可行呢？

datbik189 · 发表于 2019-7-18 17:15:43

dos时代菜鸟发表于 2019-7-18 16:45
刚测试 win7 下确实不能让 diskpart 常驻。

但是 cmd 下 diskpart >x.txt ，然后在 pecmd 里随时获 ...

既然DISKPART在WIN7中不能挂起, 脚本就没有通用性. 不玩了.

你的要求应该可以通过计时器实现,

SET-RAW &CMD=TEAM READ 123.TXT,**,&V|ENVI @CMD_EDIT=%&V%
TIME Timer1,100,%&CMD% //100毫秒刷新一次

527104427 · 发表于 2019-7-18 17:30:24

201287zr 发表于 2019-7-18 12:41
请教大神EDIT命令参数问题，我想在编辑框中实现点击就停止TIME的定时器，但[编辑框事件]中定义为回车和双击 ...

拿去，不谢：

SET &::EN_CHANGE=0x0300
SET &::WM_KEYDOWN=0x0100
SET &::WM_LBUTTONDOWN=0x0201
SET &::WM_RBUTTONDOWN=0x0204

CALL @WIN

_SUB WIN,W254H168,CMD,
EDIT &Edit1,L24T25W110H18,123,
LABE &LABE1,L23T59W146H30,
LABE &LABE2,L24T100W168H30,输入框内容为：%&Edit1%,
ENVI &time=1
TIME &Timer1,1000,CALL next
CALL next
ENVI @&Edit1.MSG=_%&WM_RBUTTONDOWN%: TEAM ENVI @&Timer1=0| ENVI @&LABE1=已停止计时
ENVI @&Edit1.MSG=_%&WM_LBUTTONDOWN%: TEAM ENVI @&Timer1=0| ENVI @&LABE1=已停止计时
ENVI @&Edit1.MSG=+%&WM_KEYDOWN%: TEAM ENVI @&Timer1=0| ENVI @&LABE1=已停止计时
ENVI @&Edit1.ID=?;&Edit1_ID
ENVI @this.MSG=_COMMAND#%&Edit1_ID%#%&EN_CHANGE%: ENVI @&LABE2=输入框内容为：%&Edit1%

_END

_SUB next
ENVI @&LABE1=计时：%&time% 秒
CALC #&time=%&time%+1
_END

Anson4 · 发表于 2019-7-18 19:10:13

本帖最后由 Anson4 于 2019-7-18 19:34 编辑

527104427 发表于 2019-7-18 11:33
这个简单：

SET ®FILE=%CurDir%\abc.reg

查看PECMD的帮助，没找到“®”号，这个表示什么意思呢？
替换成“&”貌似也不起作用。
实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，请进一步指导一下！

PECMD_Test_02.zip (549.91 KB, 下载次数: 4)

Anson4 · 发表于 2019-7-18 19:12:15

datbik189 发表于 2019-7-18 11:36
sed-替换命令 writ-修改文本命令

logs *xx.log

实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，查找替换的字符串改成了多种测试，结果都不行，请进一步指导一下！

PECMD_Test_01.zip (549.94 KB, 下载次数: 4)

datbik189 · 发表于 2019-7-18 19:23:11

Anson4 发表于 2019-7-18 19:12
实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，查找替换的字符串改成了多种测试，结果 ...

你用14309楼的PECMD试试，脚本中去掉//LOad#999前面的//。

对SED中的正则还是不太精通。

|

datbik189 · 发表于 2019-7-18 19:43:09

Anson4 发表于 2019-7-18 19:12
实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，查找替换的字符串改成了多种测试，结果 ...

使用14309楼的PECMD。

&V1和&V2的赋值是直接的，不用转义和修改

datbik189 · 发表于 2019-7-18 19:51:03

本帖最后由 datbik189 于 2019-7-18 20:11 编辑

Anson4 发表于 2019-7-18 19:12
实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，查找替换的字符串改成了多种测试，结果 ...

不在电脑旁，测试不方便，我估计你是想把下面的字符串替换，对吧？
set-raw &V1=C:\\Program Files\\Adobe Photoshop CC 2018.1.8

logs *xx.log
envi^ envimode=1
read PECMD_Test.reg,**,&V
set-raw &V1=C:\\Program Files\\Adobe Photoshop CC 2018.1.8
set-raw &V2=D:\\Design\\Adobe Photoshop CC 2018.1.8
//sed -ex &V=0:0,%&V1%,%&V2%,&V
load #999*命令_字符替换 &V 正向 0:0,&V1,&V2
writ-uni *-nl *c PECMD_Test.reg,$+0,%&V%
mess %&V%
mess %&V1%
mess %&V2%

datbik189 · 发表于 2019-7-18 21:14:42

Anson4 发表于 2019-7-18 19:12
实际上我还遇到了“\"两个变成一个的问题。
附件是我测试的文档，查找替换的字符串改成了多种测试，结果 ...

不要点评，直接回复多好。

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

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)

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

//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中调试的，其他系统不知道是否一样，理论应该差不多吧。

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

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

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

点评

浏览过的版块