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

dvd008 · 发表于 2012-2-22 09:51:40

根据你的WCS,做的, 还没完.

[ 本帖最后由 dvd008 于 2012-2-22 10:25 编辑 ]

dvd008 · 发表于 2012-2-22 10:25:45

#!PECMD

ENVI fun=-auto
ENVI gui=no

_SUB F1
#!PECMD
ENVI &&&EnviMode=1  //避免意外错误，空变量，外部变量，
ENVI &FORCELOCAL=1  //可以处理大变量. 不影响外部变量

//定义局部变量，不影响外部变量
ENVI &&信息=
ENVI &&全部磁盘=
ENVI &&磁盘=
ENVI &&磁盘信息=
ENVI &&分区=
ENVI &&分区信息=
ENVI &&首字=
ENVI &&T=
PART list disk,全部磁盘
//ENVI 信息=全部磁盘: %全部磁盘%\n
forx * %全部磁盘%,磁盘,
{
ENVI 信息=%信息%磁盘:%磁盘% \n
PART list disk %磁盘%,磁盘信息
ENVI 信息=%信息%  磁盘信息磁盘号大小(字节)       柱面数磁头数扇数扇区媒体    签名\n
ENVI 信息=%信息%          %磁盘信息% \n
TEAM GETF \\.\PhysicalDrive%磁盘%,446#16,T|  ENVI 信息=%信息%  主分区1: %T% \n
TEAM GETF \\.\PhysicalDrive%磁盘%,462#16,T|  ENVI 信息=%信息%  主分区2: %T% \n
TEAM GETF \\.\PhysicalDrive%磁盘%,478#16,T|  ENVI 信息=%信息%  主分区3: %T% \n
TEAM GETF \\.\PhysicalDrive%磁盘%,494#16,T|  ENVI 信息=%信息%  主分区4: %T% \n
TEAM GETF \\.\PhysicalDrive%磁盘%,510#2,T |  ENVI 信息=%信息%  标志 : %T% \n
PART list part %磁盘%,全部分区
ENVI 信息=%信息%  全部分区: %全部分区% \n
ENVI 信息=%信息%  分区  类型可启起始(字节)    长度(字节) 隐藏扇区    结尾(字节)\n
forx * %全部分区%,分区,
{
PART  -hextp list part %磁盘%#%分区%,分区信息
ENVI 信息=%信息% %分区信息% \n
}
}

MESS  %信息% @磁盘分区信息#OK

_END
_SUB F2
   SHOW
_END
_SUB F3
   pecmd PUTF \\.\PhysicalDrive0,1S,*62S 0x00
_END
_SUB F4
   pecmd PUTF \\.\PhysicalDrive1,1S,*62S 0x00
_END
_SUB F5
   pecmd PUTF \\.\PhysicalDrive2,1S,*62S 0x00
_END
_SUB FA
   TEAM FILE  %OUT%|CALL F1
   TEAM ENVI @ED1=%ED1%%NL%编辑中...
   EXEC --exe:%ETOOL%  =ResEdit %TMP_OUT%
   TEAM ENVI @ED1=%ED1%%NL%恢复中...
   CALL F3
   WAIT 100
   CALL F4
_END

_SUB SELSRC
      TEAM BROW SRC,%ESRC%,请选择源文件,EXE| ENVI  @ESRC=%SRC%
_END
_SUB SELTMP
      TEAM BROW TMP_OUT,&%ETMP%,请选择临时文件,EXE| ENVI  @ETMP=%TMP_OUT%
_END
_SUB SELOUT
      TEAM BROW OUT,&%EOUT%,请选择目标文件,EXE| ENVI  @EOUT=%OUT%
_END

_SUB  EditRes, W600H400,磁盘分区信息
   ITEM EX, L20T20W165H20,1:显示磁盘分区信息, CALL F1
   ITEM ED, L20T50W165H20,2:显示全部隐藏分区, CALL F2
   ITEM RS, L20T80W165H20,3:写第1磁盘HD--0MBR,  part /mbr
   ITEM RR, L20T110W165H20,4:写第2磁盘HD--1MBR,  PART /mbr 1
   ITEM RB, L20T140W165H20,5:写第3磁盘HD--2MBR,  PART /mbr 2
   ITEM RA, L20T170W165H20,6:清除HD--0保留扇区, CALL F3
   ITEM RA, L20T200W165H20,7:清除HD--0保留扇区, CALL F4
   ITEM RA, L20T230W165H20,8:清除HD--0保留扇区, CALL F5
_END

FIND $%fun%=-auto, CALL EditRes

dvd008 · 发表于 2012-2-22 10:26:52

ITEM RA, L20T170W165H20,6:清除HD--0保留扇区, CALL F3
ITEM RA, L20T200W165H20,7:清除HD--0保留扇区, CALL F4
ITEM RA, L20T230W165H20,8:清除HD--0保留扇区, CALL F5

都是 RA ,会有什么影响?

dvd008 · 发表于 2012-2-22 13:07:37

由于没有看见过类似的例子,不知道有没有可能实现下面功能:

也是图形界面
第一行: 注释说明内容重
对齐 0号磁盘1分区激活类型起始大小

第二行: 多个输入框 ,分别对应上面 ,可以输入字符
2m 0#1 a 07 131m 35m

第三行: 执行按钮 ( 将第二行数据,对应加入下面命令) 并执行
pecmd part -super -align=2m 0#1 a 07 131m 35m

如果不行,就算了.命令行执行,也非常方便.

[ 本帖最后由 dvd008 于 2012-2-22 13:17 编辑 ]

dvd008 · 发表于 2012-2-22 18:38:58

测试成功! 太感谢了

问一下,下面为什么 IPART=1 有效, PART=1 无效(默认显示1) , 多"I",其它却不用?

ENVI DISK=0
ENVI IPART=1
ENVI ACKTIVE=-a

dvd008 · 发表于 2012-2-22 19:06:42

先改改.............

dvd008 · 发表于 2012-2-22 19:20:25

PART不重启就生效,这个好, 和系统的磁盘管理一样了

dvd008 · 发表于 2012-2-23 08:15:49

我修改如下,不知道WAIT 5000 是否多余?担心执行太快

这样,分区,更新,分配盘符,就都自动完成了, 9#9 是防止误操作,通常没有9个硬盘,9个分区.

   ITEM ,  L100T120W100H20,校验参数, CALL check
   ITEM ,  L100T150W100H20,创建分区, CALL OnDoit
   ITEM ,  L100T180W100H20,关闭(取消), KILL \%EditDisk%
_END
_SUB check
  //校验参数...
  MESS  part -super -align=1024k  %EDISK%#%EPART% %EACKTIVE% %ETYPE% %ESTAR% %ELEN%  @校验参数#OK //下面才是执行。
  //part -super -align=1024k  %EDISK%#%EPART% %EACKTIVE% %ETYPE% %ESTAR% %ELEN%
_END
_SUB OnDoit
  //校验参数...
//MESS  part -super -align=1024k  %EDISK%#%EPART% %EACKTIVE% %ETYPE% %ESTAR% %ELEN%  @调试#OK //下面才是执行。
  part -super -align=1024k  %EDISK%#%EPART% %EACKTIVE% %ETYPE% %ESTAR% %ELEN%
  WAIT 5000
  PART update %EDISK%
  WAIT 5000
  SHOW %EDISK%:-1
_END
// 初始化变量 DISK ...

dvd008 · 发表于 2012-2-23 09:26:59

我在你的里面加了一个删除分区,

但是,不知道那些变量会不会乱套.?和其它冲突?(执行分区,
是不是只使用分区那些,不会使用DEL的变量? )

两个方案:
1.全部磁盘功能,做在一个界面
2.几个单独的功能界面(新建分区,删除分区,激活分区,...)
需要哪个执行哪个.

   LABE , L245T20W80H20, 大小
   EDIT ELEN, L245T40W80H20,%LEN%,

   LABE , L20T60W80H20, del号
   EDIT edel, L20T80W80H20,%del%,

   LABE , L20T60W80H20, del号p
   EDIT edelp, L20T80W80H20,%delp%,

   ITEM ,  L100T120W100H20,校验参数, CALL check
   ITEM ,  L100T150W100H20,创建分区, CALL OnDoit
   ITEM ,  L100T180W100H20,关闭(取消), KILL \%EditDisk%
   ITEM ,  L100T210W100H20,删除分区, CALL del
_END
_SUB del
  PART -super DEL %edel%#%edelp%

_END
_SUB check
  //校验参数...

dvd008 · 发表于 2012-2-23 13:32:56

temp setting
配合下面代码,不能创建TEMP目录,不知道错在哪里?

_SUB Setemp
FDRV PT=%TEMP%
ENVI PT=%PT%\temp
PATH %PT%
exec !cmd.exe /c "ECHO file %PT%\*">%windir%\deltemp.ini
REGI HKCU\Environment\TEMP=%PT%
REGI HKCU\Environment\TMP=%PT%
REGI HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\TEMP=%PT%
REGI HKLM\SYSTEM\CurrentControlSet\Control\Session Manager\Environment\TMP=%PT%
REGI HKU\S-1-5-18\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Cookies=%PT%\Cookies
REGI HKU\S-1-5-18\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders\Cache=%PT%\Temporary Internet Files
REGI HKU\S-1-5-18\Software\Microsoft\Windows\CurrentVersion\Internet Settings\5.0\Cache\Content\CacheLimit=#0x0004b000
REGI HKU\S-1-5-18\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Cache\Content\CacheLimit=#0x0004b000
ENVI
_END

dvd008 · 发表于 2012-2-23 17:31:37

03正常

TEMP,还是不能创建
用以前那个PECMD(比较新的版本)就可以,好像选择的磁盘目录信息没有传达到变量

如图,这个选择是不是应该产生" C:\TEMP" 这个信息,提供给%PT% ?

不过,我那个好用.不行就不用TEMP命令了

[ 本帖最后由 dvd008 于 2012-2-23 17:36 编辑 ]

dvd008 · 发表于 2012-2-23 17:53:11

这个说明部分是怎么实现的?
加个文字说明挺好

dvd008 · 发表于 2012-2-24 08:03:10

ok !

dvd008 · 发表于 2012-2-24 09:13:24

这些功能差不多够用了

[ 本帖最后由 dvd008 于 2012-2-24 09:15 编辑 ]

dvd008 · 发表于 2012-2-24 09:40:28

50版
可能部分功能无效了
如:
PART /MBR 1
PART /MBR 2

PART /MBR=NT6 1 有效
PART /MBR=WIN 1 有效

[ 本帖最后由 dvd008 于 2012-2-24 09:48 编辑 ]

dvd008 · 发表于 2012-2-24 13:29:56

以前某些版本没问题

50,52,都是无效, 即默认没有任何代码.
PART /MBR (上图)
PART /MBR 1
PART /MBR 2

PART /MBR=NT6 有效(下图)

PART /MBR=NT6 1 有效
PART /MBR=WIN 1 有效

[ 本帖最后由 dvd008 于 2012-2-24 13:43 编辑 ]

dvd008 · 发表于 2012-2-24 13:52:32

指定MBR=NT6,WIN,NT5,DOS等,都有效

dvd008 · 发表于 2012-2-24 14:35:41

新进展..............

dvd008 · 发表于 2012-2-24 17:51:12

U53
part /mbr
part /mbr 0
还是无效

dvd008 · 发表于 2012-2-25 19:38:24

54
MBR ---ok

dvd008 · 发表于 2012-2-25 21:59:10

这个差不多了!............
后面整理简单说明,加入文字框,就大功告成了

[ 本帖最后由 dvd008 于 2012-2-25 22:00 编辑 ]

dvd008 · 发表于 2012-2-26 09:25:34

GROU 分一下组?我其实本外行,还不知道如何使用.

先把这个搞定再说. 分享是自然的了,都是楼主的PECMD+他提供的代码,我组合一下.

又加一个对其选项.(原来默认使用1024K),现在可以任意指定.

[ 本帖最后由 dvd008 于 2012-2-26 09:26 编辑 ]

dvd008 · 发表于 2012-2-26 09:39:23

原帖由 blithewind 于 2012-2-26 00:33 发表
看磁盘功能很强大,赶紧把骨头版PE更新了吧.

可以自己直接更换PECMD.EXE 即可

这个界面只是代码或者WCS文件,弄完后分享

磁盘功能确实很强,可以创建兼容WIN7磁盘管理创建的分区(4K对齐的分区,数据和WIN7的一样)

其它几个支持4K的分区工具,分区数据和WIN7的还是有点全部的.

关键这个更小,可以完成基本磁盘操作.

dvd008 · 发表于 2012-2-26 09:43:16

原帖由 2012abc19701 于 2012-2-26 09:35 发表
大家认为还有什么最需要加的功能。

等分区弄完了,我再测试其它功能,如网络,驱动安装等

dvd008 · 发表于 2012-2-26 10:16:35

如:
pecmd part -super -align=2m 0#1 a 07 131m 35m

改为
pecmd part -super -align=2m LIST 0#1 a 07 -131m 35m
不清楚这两个参数意思? 是自动接前面分区而不用考虑起始位置?
那么,到底起始是前面分区结尾,还是131M

还是这样?
pecmd part -super -align=2m LIST 0#1 a 07 -START 35m

[ 本帖最后由 dvd008 于 2012-2-26 10:18 编辑 ]

dvd008 · 发表于 2012-2-26 10:27:26

原帖由 2012abc19701 于 2012-2-26 09:59 发表

GRUP 分组，比你程序简单多了。下面示例（红色） .就是画一个框。考过来，调整一下位置和大小即可。
蓝色部分加了文字说明，对齐。

#!PECMD
ENVI &&&EnviMode=1 //避免意外错误，空变量，外部变量， ...

GRUP 分组,就是画一个框?给各功能

使看起来,方便些?

dvd008 · 发表于 2012-2-26 12:12:57

再修改一下,
方便单独更改--激活类型,分区类型

dvd008 · 发表于 2012-2-26 18:47:49

不知道是我使用不对,还是没理解,
我加到里面,但是没有效果.

一般只需要修改分区类型,为隐藏类型即可, 通常对应更改(0X07--0X17)这样

下面代码修改,是怎么改? 改回,有怎么改?
也就是说,
CALC  &ntype=%&type% | 0x10  //隐藏  将原来的ID 修改为???
CALC  &ntype=%&type% & 0xEF  //反隐藏  将原来的ID 修改为???

//隐藏分区的算法

// 1  0x16 0    0 137363456 0    137363456
// 参数1 : 磁盘#分区号如0#1
// 参数2 : 无或1 为隐藏，否则为反隐藏
_SUB  HIDEPART
SET  &dev=%1
SET  &func=%2
FIND $%2=, SET func=1
PART list part %&dev% ,&data
MSTR &type=%&data%<2>  //获取 type
FIND $%&func%=1, CALC  &ntype=%&type% | 0x10  //隐藏
FIND $%&func%=1,!  CALC  &ntype=%&type% & 0xEF  //反隐藏
PART %&dev%  %&ntype%  //设置新的类型
_END
//调用示例
HIDEPART  0#1       //隐藏
HIDEPART  0#1  反 //反隐藏

[ 本帖最后由 dvd008 于 2012-2-26 18:57 编辑 ]

dvd008 · 发表于 2012-2-26 19:27:52

我差不多是这样做,但是没有效果

CALC &ntype=%&type% | 0x10 //隐藏将原来的ID 修改为???

CALC &ntype=%&type% & 0xEF //反隐藏将原来的ID 修改为???

分区表里面ID没有变化.

dvd008 · 发表于 2012-2-26 19:31:15

好了,加-SUPER后好了

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