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

hhh333

我当心的问题终于出现了，有网友的系统中有很多硬盘，有20个以上的盘符要分配，有的差不多占用到了Y：盘，于是挂载都没有盘了，造成光板PE！能不给show加一个参数，如-WYZ，就表示保留WYZ供PE系统使用，即使有的硬盘占用了WYZ也要拿出来。

看到了有“-”参数，为卸载盘符，可不可以这样用，自然达成以上目的：
TEAM show -1:-1|show -WYZ
或者TEAM show -1:-1|subj -W -Y -Z

527104427

hhh333 发表于 2013-6-6 09:24
我当心的问题终于出现了，有网友的系统中有很多硬盘，有20个以上的盘符要分配，有的差不多占用到了Y：盘，于 ...

尝试在正常的WIN7_X86下测试:

SUBJ -E:

可以正常去掉E盘，但实际上，E这个盘符还是被占用的，无法分配给其它分区

再用系统自带的磁盘管理程序分配盘符，报参数错误，重启一下，盘符就恢复原样了

而且，用SHOW分配的盘符，在磁盘管理中是没有盘符的：

mdyblog

hhh333 发表于 2013-6-6 09:24
我当心的问题终于出现了，有网友的系统中有很多硬盘，有20个以上的盘符要分配，有的差不多占用到了Y：盘，于 ...

TEAM show *  -1:-1| SHOW *-  ,W:| SHOW *-  ,X:|   SHOW *-   ,Y:|  SHOW *-   ,Z:

mdyblog

527104427 发表于 2013-6-6 09:57
尝试在正常的WIN7_X86下测试:

SUBJ -E:

>>在磁盘管理中是没有盘符的：
要兼容 磁盘管理等其他软件， 需要持久 加载卸载开关*
TEAM show *  -1:-1| SHOW *-  ,W:| SHOW *-  ,X:|   SHOW *-   ,Y:|  SHOW *-   ,Z:

SBUJ  *-   E:

// 持久 加载卸载 要慢些， 干的事 比较多。

527104427

mdyblog 发表于 2013-6-6 10:09
>>在磁盘管理中是没有盘符的：
要兼容 磁盘管理等其他软件， 需要持久 加载卸载开关*
TEAM show *  -1: ...

多谢，又学到一招了

2012yws@

mdyblog 发表于 2013-6-5 12:16
动态进度条+文本：

1、建议楼主，这个进度条文本可否加一个开关，让它常驻显示，不要一闪一闪的刷新呢？
2、子窗口如何操作父窗口的控件？平行窗口如何进行控件互相通信以及变量互访和共享？

mdyblog

2012yws@ 发表于 2013-6-6 10:47
1、建议楼主，这个进度条文本可否加一个开关，让它常驻显示，不要一闪一闪的刷新呢？
2、子窗口如何操作 ...

1>> 试过， 还是会闪的， 只是好点。  加了代码 好像不是很值得。

2》》
ENVI  @父窗口名.SENDMSG= 消息号:....
或
ENVI  @@SENDMSG=父窗口名号:消息号: ....

平行窗口  也是如此。
共享： 访问他们的 共同祖先（父亲。爷爷。。。） 的共享变量。

全局PE变量  和环境变量 总是可共享的。

示例程序中 搜索 ”.SENDMSG=“   “@@SENDMSG=”  可找到

527104427

mdyblog 发表于 2013-6-6 11:22
1>> 试过， 还是会闪的， 只是好点。  加了代码 好像不是很值得。

2》》

1. CALL @WIN1
   
2. 
   
3. _SUB WIN1,W303H100,新窗口1,
   
4.         SET &p=20
   
5.         PBAR PBAR1,L12T13W70H16,20
   
6.         LABE -center -vcenter -trans -ncmd PBAR1_TEXT,L12T13W70H16,完成%&p%%%,EXEC =%CurDir%\7z.exe x "%CurDir%\RocketDock.7z" -y -aos -o"%CurDir%\1",0x0000FF
   
7.         TIME  ,1000, CALL OnTimer1
   
8. _END
   
9. 
   
10. _SUB OnTimer1
    
11.         CALC #&p=%&p% + 5
    
12.         IFEX $%&p%>100, SET p=0
    
13.         envi @PBAR1_TEXT=完成%&p%%%   //文本
    
14.         envi @PBAR1=%&p%        //进度
    
15.         ENVI @this.InvalidateRect=12;13;82;33;0  //重绘   
    
16. _END  

复制代码

保存为WCS文件后，双击无反应，其它WCS都可以运行的。

拖到PECMD上也无反应，在PECMD窗口中输入则可以，内置到PECMD里面也可以。

以上代码如何捕获7Z.EXE的进度？另外，我要去掉那一闪一闪的文字提示，要怎么改？

mdyblog

527104427 发表于 2013-6-6 11:48
保存为WCS文件后，双击无反应，其它WCS都可以运行的。

拖到PECMD上也无反应，在PECMD窗口中输入则可以， ...

CALL @WIN1

_SUB WIN1,W303H100,新窗口1,
    SET &p=0
    SET &dat=  //解压的数据
    PBAR PBAR1,L12T13W70H16,0
    //LABE -center -vcenter -trans -ncmd PBAR1_TEXT,L12T13W70H16,完成%&p%%%,,0x0000FF
    ITEM ITEM1,L24T34W60H30,解压,THREAD* CALL OnJieYa,
_END

_SUB SetJinDu
        envi @PBAR1=%1        //进度
        //envi @PBAR1_TEXT=%2  //文本
       //NVI @this.InvalidateRect=12;13;82;33;0  //重绘   
_END  
_SUB OnJieYa
    MDIR  "%CurDir%\1"
//    EXEC* --cmd::1000:OnCheck  &dat=!%CurDir%\7z.exe x "RocketDock.7z" -y -aos -o"%CurDir%\1\"
    EXEC* --cmd::1000:OnCheck  &dat=PECMD wait 10000    //模拟 ，运行 10秒
    SetJinDu   100  //完成
_END

_SUB OnCheck  //分析  解压数据 &dat  ，推进进度
    //太复杂， 写个模拟的吧，自动加10
    CALC #&p=%&p% + 10
    IFEX $%&p%>100, SET p=100
    SetJinDu  %&p%
_END  
//分析 7z.exe 的输出， 先要 输出 列表， 再根据 实际进度，判断 进度%，
//由于7z.exe 本身的原因（带有输出C缓冲）， 输出 是一段一段的拉出来的， 二不是 实时流出来的。 小的文件，直到最后才一下子显示最终结果：100%，没有中间结果。

527104427

mdyblog 发表于 2013-6-6 12:16
CALL @WIN1

_SUB WIN1,W303H100,新窗口1,

这实际上并没有捕获7Z.EXE的进程，进度条结束了有7－8秒，才提示解压成功




CALL @WIN1

_SUB WIN1,W303H100,新窗口1,
         SET &p=0
        SET &dat=  //解压的数据
        PBAR PBAR1,L12T13W70H16,0
        //LABE -center -vcenter -trans -ncmd PBAR1_TEXT,L12T13W70H16,完成%&p%%%,,0x0000FF
        ITEM ITEM1,L24T34W60H30,解压,THREAD* CALL OnJieYa,
_END

_SUB SetJinDu
        envi @PBAR1=%1        //进度
        //envi @PBAR1_TEXT=%2  //文本
        //NVI @this.InvalidateRect=12;13;82;33;0  //重绘   
_END  
_SUB OnJieYa
        MDIR  "%CurDir%\1"
        EXEC* --cmd::1000:OnCheck  &dat=!%CurDir%\7z.exe x "auto.7z" -y -aos -o"%CurDir%\1\"
        //EXEC* --cmd::1000:OnCheck  &dat=PECMD wait 10000    //模拟 ，运行 10秒
        SetJinDu   100  //完成
       TEAM MESS 解压完成|kill @
_END

_SUB OnCheck  //分析  解压数据 &dat  ，推进进度
        //太复杂， 写个模拟的吧，自动加10
        CALC #&p=%&p% + 10
        IFEX $%&p%>100, SET p=100
        SetJinDu  %&p%
_END  
//分析 7z.exe 的输出， 先要 输出 列表， 再根据 实际进度，判断 进度%，
//由于7z.exe 本身的原因（带有输出C缓冲）， 输出 是一段一段的拉出来的， 二不是 实时流出来的。 小的文件，直到最后才一下子显示最终结果：100%，没有中间结果。

527104427

mdyblog 发表于 2013-6-6 12:16
CALL @WIN1

_SUB WIN1,W303H100,新窗口1,

原来要自己分析 &dat  ，呵呵，无能为力了

mdyblog

527104427 发表于 2013-6-6 12:52
原来要自己分析 &dat  ，呵呵，无能为力了

输出 &dat 的是 文件名。
先LIST 出每个文件名的 长度。
再根据 实时 输出解压的文件名&dat， 累加其长度， 就 可知道 进度% 了
比如 a=1M  B=2M  C=3M
输出 完成a b
则 进度% =  100*（1+2） / (1+2+3)=50

527104427

mdyblog 发表于 2013-6-6 13:09
输出 &dat 的是 文件名。
先LIST 出每个文件名的 长度。
再根据 实时 输出解压的文件名&dat， 累加其 ...

算了，搞不清楚。

这句怎么搞错了：FIND $0=%&::bX64%,mess 32!mess 64
用的新设计版，WIN7_X86，提示为64


不是新设计版的正常

peterpanheaven

mdyblog 发表于 2013-6-6 10:05
TEAM show *  -1:-1| SHOW *-  ,W:| SHOW *-  ,X:|   SHOW *-   ,Y:|  SHOW *-   ,Z:

老師您好.向您報告...

我就是那個當事者^^
依您的改法.我先動手改了pecmd.ini如下

啟動後...
還是出現drvtype 於ram address .... read only狀況


進PE後...空空的!
貼個磁碟分配代號圖如下...


尚未解決...

hhh333

上一下图：

点桌面那个装载外置，没有任何反映，也即找不到，快捷方式已经在图上了，用的是最新6月3日的版本。

mdyblog

peterpanheaven 发表于 2013-6-6 15:04
老師您好.向您報告...

我就是那個當事者^^

哦， X:  不要卸载了。 那是PE！

mdyblog

hhh333 发表于 2013-6-6 15:40
上一下图：

点桌面那个装载外置，没有任何反映，也即找不到，快捷方式已经在图上了，用的是最新6月3日的 ...

我试了， 我这可以。
WINPE.INI:
MESS %CurFile% %PECMDVER% @#OK

快捷键：
PECMD.EXE LOAD \H3PE\WINPE.INI
结果提示 :
【E:\H3PE\WINPE.INI 201201790000】

hhh333

mdyblog 发表于 2013-6-6 16:07
我试了， 我这可以。
WINPE.INI:
MESS %CurFile% %PECMDVER% @#OK

我说老大，盘符少时肯定没有问题，我用虚拟机做了20个盘，盘符会从C－＞V，外置光盘是W，就找不到了。
进系统时是逆序找的，没找到，快捷方式是load \XXX\XXX.INI的形式，应该是顺序找的也没反应。

mdyblog

527104427 发表于 2013-6-6 14:21
算了，搞不清楚。

这句怎么搞错了：FIND $0=%&::bX64%,mess 32!mess 64

-20  修正了

mdyblog

527104427 发表于 2013-6-6 14:21
算了，搞不清楚。

这句怎么搞错了：FIND $0=%&::bX64%,mess 32!mess 64

-20 PBAR 支持 文本设定：
进度条加文本2.WCS：

CALL @WIN1
_SUB WIN1,W303H100,新窗口1,
    SET &p=20
    PBAR PBAR1,L12T13W70H16,20,完成%&p%%%
    TIME  ,1000, CALL OnTimer1
_END
_SUB OnTimer1
    CALC #&p=%&p% + 5
    IFEX $%&p%>100, SET p=0
    envi @PBAR1=%&p%;完成%&p%%%        //进度
_END
  
见 HELP PBAR
删除文本： 文本为空（分号还是要的，否则为不修改文本）

hhh333

mdyblog 发表于 2013-6-6 16:07
我试了， 我这可以。
WINPE.INI:
MESS %CurFile% %PECMDVER% @#OK

难道搜索不管后面的盘吗？

mdyblog

hhh333 发表于 2013-6-6 16:19
我说老大，盘符少时肯定没有问题，我用虚拟机做了20个盘，盘符会从C－＞V，外置光盘是W，就找不到了。
...

-21 已修正。
真亏了 你。 否则 还真发现不这么隐秘的BUG。

hhh333

mdyblog 发表于 2013-6-6 16:48
-21 已修正。
真亏了 你。 否则 还真发现不这么隐秘的BUG。

我刚才测试了，可能是查找计数的问题，往前面删几个盘就找到了。前面有19盘就找不到。

hhh333

mdyblog 发表于 2013-6-6 16:48
-21 已修正。
真亏了 你。 否则 还真发现不这么隐秘的BUG。

这个不是我发现的，而是一个网友的变态机器有20个盘发现的。

mdyblog

hhh333 发表于 2013-6-6 17:04
我刚才测试了，可能是查找计数的问题，往前面删几个盘就找到了。前面有19盘就找不到。

原来 最多19个盘符。

hhh333

mdyblog 发表于 2013-6-6 17:08
原来 最多19个盘符。

哈哈，LZ这个19不知怎么来的，感觉到LZ编程的随意性很大啊。

peterpanheaven

感謝兩位大師的辛勞!!

Orz!! Orz!! Orz!!

hhh333

mdyblog 发表于 2013-6-6 17:08
原来 最多19个盘符。

感觉到DRVTYPE这个工具也是19个盘，怎么回事？

mdyblog

hhh333 发表于 2013-6-6 17:16
哈哈，LZ这个19不知怎么来的，感觉到LZ编程的随意性很大啊。

19是我 算出来的。 我当然 没有 设定什么个数限制。 这是一个曲折的 逻辑 链。 是别的地方传递过来的限制，很隐晦的限制。
编出的程序，总有个确定的形态（相态）。 又由于资源部能无限。 从而实际处处都有个不是很大的限制。
而每个限制， 都在向外扩展（辐射）。 最终的限制是 其总效果。

mdyblog

hhh333 发表于 2013-6-6 17:51
感觉到DRVTYPE这个工具也是19个盘，怎么回事？

FORM DriveType=W:


FORM  V1=*
FDRV   V2=*：
MESS W:%DriveType% \n%V1% \n%V2%
结果：
W:DRIVE_FIXED
C:|D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|U:|V:|W:
C: D: E: F: G: H: I: J: K: L: M: N: O: P: Q: R: S: T: U: V: W:

你是最新的吗？ 要不再下载吧。我上传了2次。
http://pan.baidu.com/share/link? ... &uk=3962464512#