找回密码
 注册
搜索
系统gho:最纯净好用系统下载站投放广告、加入VIP会员,请联系 微信:wuyouceo
楼主: mdyblog

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

   火... [复制链接]
发表于 2013-5-10 11:04:52 | 显示全部楼层
mdyblog 发表于 2013-5-10 10:56
MOUN    \
命令吗 ?
是不是 此时硬盘驱动 或 分区表驱动  还没 加载 ?

我也不知道啊 命令我已经放在最后了,还有为什么在虚拟机里log里面没有看到moun命令成功!怪了
回复

使用道具 举报

 楼主| 发表于 2013-5-10 11:12:16 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-10 11:13 编辑
可乐百分所有 发表于 2013-5-10 11:04
我也不知道啊 命令我已经放在最后了,还有为什么在虚拟机里log里面没有看到moun命令成功!怪了


用别人的 FBA 系统试试, 看看 是PECMD.EXE 还是系统的 问题。
你把 FBINST.EXE 打包上传一份, 我试试。 一时找不出来。
回复

使用道具 举报

发表于 2013-5-10 11:24:49 | 显示全部楼层
mdyblog 发表于 2013-5-10 11:12
用别人的 FBA 系统试试, 看看 是PECMD.EXE 还是系统的 问题。
你把 FBINST.EXE 打包上传一份, 我试 ...

论坛不是有这个工具吗!我在ud是这样的,首先从ud区tools.wim到x盘,然后再挂载! fbinst.zip (43.51 KB, 下载次数: 1)
回复

使用道具 举报

 楼主| 发表于 2013-5-10 14:21:56 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-10 14:41 编辑
527104427 发表于 2013-5-10 12:09
不知道用mpress压缩后怎么解压呢?


解压不了, 所以 一定yaoi留一份 原始的。

UPX 怎么还没有X64 版本(压缩X64的EXE)
回复

使用道具 举报

 楼主| 发表于 2013-5-10 22:42:46 | 显示全部楼层
527104427 发表于 2013-5-10 20:13
老大帮忙看一下,在WIN7下测试,退出程序后可以自动删除;
在XP下测试,退出不能自动删除,但是,进 ...

#!PECMD
LOGS **2 * HDTUNEPro_%&__PID%.LOG

FIND $**pecmd=%~1,
{
        MSTR &&cmd=<2->%*
        %&cmd%
        EXIT  
}

ENVI OK=0
MDIR %TEMP%
{
        LOCK ##LK_MKTEMP
        SET &t=%TEMP%\~tmp%RANDOM%.tmp
        LOOP #%OK%=0, TEAM ENVI TDIR=%&t%| IFEX %TDIR%,! ENVI OK=1| SET t=%TEMP%\~tmp%RANDOM%.tmp
        MDIR %TDIR%
}        //这里自动解锁

//SET &tmpfname=~tmp%RANDOM%
FNAM -ext &tmpfname=%MyName%.tmp
FNAM &tmpname=%MyName%

ENVI OLDIR=%CurDir%
PATH @%TDIR%\
EXEC*N &&ver=!CMD /C VER
SED &ver=0,[^0-9], ,%&ver%
MSTR &v1,&v2,&v3=<1*>%&ver%
IFEX $%&v1%%&v2%=62,PUTF* %TDIR%\%&tmpfname%,,#8!PUTF* %TDIR%\%&tmpfname%,,#7
PUTF*  %TDIR%\odbcbcp.dll,,#1
PUTF*  %TDIR%\pdh.dll,,#2
PUTF*  %TDIR%\shfolder.dll,,#3

SET &pide=0
SET &pidc=0
EXEC --exe:"%MyName%" --pid:&pidc PECMD **pecmd  WAIT * 10 -del %TDIR%

REGI HKCU\Software\EFD Software\%&tmpname%\!
REGI $HKCU\Software\EFD Software\%&tmpname%\Name=EFD Software
REGI $HKCU\Software\EFD Software\%&tmpname%\Company=www.hdtune.com
REGI $HKCU\Software\EFD Software\%&tmpname%\测试参数 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Test Parameters 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Save Filter=HDTunePro\T
REGI $HKCU\Software\EFD Software\%&tmpname%\保存过滤=HDTunePro\T

EXEC --exe:"%TDIR%\%&tmpfname%" --wd:"%TDIR%"  --pid:&pide =HDTunePro_exe
PATH @%OLDIR%
FILE  %TDIR%    //自己先删除一次
REGI HKCU\Software\EFD Software\%&tmpname%\!

//关键: 红色部分  %TDIR%  后面不要 接 \
回复

使用道具 举报

 楼主| 发表于 2013-5-11 12:17:39 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-11 13:10 编辑
527104427 发表于 2013-5-11 09:47
这样做出来的单文件比winrar、7zsfxtool制作的要强悍,
只是有点小瑕疵,会出现3个同样的进程,
一个是 ...

#!PECMD
LOGS **2 * HDTUNEPro_%&__PID%.LOG

FIND $**pecmd=%~1,
{
        MSTR &&cmd=<2->%*
        %&cmd%
        EXIT  
}

ENVI TDIR=
TEMP  *tmpdir   ,TDIR


//SET &tmpfname=~tmp%RANDOM%
FNAM -ext &tmpfname=%MyName%.tmp
FNAM &tmpname=%MyName%

ENVI OLDIR=%CurDir%
PATH @%TDIR%\
EXEC*N &&ver=!CMD /C VER
SED &ver=0,[^0-9], ,%&ver%
MSTR &v1,&v2,&v3=<1*>%&ver%
IFEX $%&v1%%&v2%=62,PUTF* %TDIR%\%&tmpfname%,,#8!PUTF* %TDIR%\%&tmpfname%,,#7
PUTF*  %TDIR%\odbcbcp.dll,,#1
PUTF*  %TDIR%\pdh.dll,,#2
PUTF*  %TDIR%\shfolder.dll,,#3

SET &pide=0
SET &pidc=0

REGI HKCU\Software\EFD Software\%&tmpname%\!
REGI $HKCU\Software\EFD Software\%&tmpname%\Name=EFD Software
REGI $HKCU\Software\EFD Software\%&tmpname%\Company=www.hdtune.com
REGI $HKCU\Software\EFD Software\%&tmpname%\测试参数 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Test Parameters 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Save Filter=HDTunePro\T
REGI $HKCU\Software\EFD Software\%&tmpname%\保存过滤=HDTunePro\T

EXEC --exe:"%TDIR%\%&tmpfname%" --wd:"%TDIR%"  --pid:&pide HDTunePro_exe   //没有=

EXEC --exe:"%MyName%" --wd:%SystemDrive%\ --pid:&pidc PECMD **pecmd  WAIT *%&pide% 100 -cmd TEAM REGI HKCU\Software\EFD Software\%&tmpname%\!| FILE %TDIR%

//886
//这样就只有2个进程 。
//X86下可以 隐藏进程。 如PECMD守护进程可以隐藏  
回复

使用道具 举报

 楼主| 发表于 2013-5-11 12:22:26 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-11 16:05 编辑
527104427 发表于 2013-5-11 09:47
这样做出来的单文件比winrar、7zsfxtool制作的要强悍,
只是有点小瑕疵,会出现3个同样的进程,
一个是 ...

#!PECMD
LOGS **2 * HDTUNEPro_%&__PID%.LOG

FIND $**pecmd=%~1,
{
        MSTR &&cmd=<2->%*
        %&cmd%
        EXIT  
}

ENVI TDIR=
TEMP  *tmpdir   ,TDIR


//SET &tmpfname=~tmp%RANDOM%
FNAM -ext &tmpfname=%MyName%.tmp
FNAM &tmpname=%MyName%

ENVI OLDIR=%CurDir%
PATH @%TDIR%\
EXEC*N &&ver=!CMD /C VER
SED &ver=0,[^0-9], ,%&ver%
MSTR &v1,&v2,&v3=<1*>%&ver%
IFEX $%&v1%%&v2%=62,PUTF* %TDIR%\%&tmpfname%,,#8!PUTF* %TDIR%\%&tmpfname%,,#7
PUTF*  %TDIR%\odbcbcp.dll,,#1
PUTF*  %TDIR%\pdh.dll,,#2
PUTF*  %TDIR%\shfolder.dll,,#3

SET &pide=0
SET &pidc=0
/////EXEC --exe:"%MyName%" --pid:&pidc PECMD **pecmd  WAIT * 10 -del %TDIR%  //可以去掉

REGI HKCU\Software\EFD Software\%&tmpname%\!
REGI $HKCU\Software\EFD Software\%&tmpname%\Name=EFD Software
REGI $HKCU\Software\EFD Software\%&tmpname%\Company=www.hdtune.com
REGI $HKCU\Software\EFD Software\%&tmpname%\测试参数 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Test Parameters 3=29 23 CB 52 7E 23 32 57 DA 13 7B 75 00 00 00 00
REGI $HKCU\Software\EFD Software\%&tmpname%\Save Filter=HDTunePro\T
REGI $HKCU\Software\EFD Software\%&tmpname%\保存过滤=HDTunePro\T

PATH @%SystemDrive%\
EXEC --exe:"%TDIR%\%&tmpfname%" --wd:"%TDIR%"  --pid:&pide =HDTunePro_exe
REGI HKCU\Software\EFD Software\%&tmpname%\!
FILE  --force  %TDIR%
IFEX  %TDIR% ,!!   EXEC --exe:"%MyName%" --pid:&pidc PECMD **pecmd    WAIT *0  100 -del  %TDIR%

//也是2个进程

回复

使用道具 举报

发表于 2013-5-11 18:28:48 | 显示全部楼层
回复

使用道具 举报

发表于 2013-5-12 20:16:30 | 显示全部楼层
WCS关联批处理有很多的错误,而且在运行时金山毒霸会提示注册表里面文件打开方式被修改,询问是否处理,而且会连续询问,不知道其他的杀毒软件有没有这种情况,现在修正错误和利用pecmd和cmd命令混合脚本进行文件关联,经过测试没有问题!
WCS关联.7z (878 Bytes, 下载次数: 7)
回复

使用道具 举报

发表于 2013-5-12 20:20:48 | 显示全部楼层
原来的wcs关联批处理会出现关联文件没有图标的问题,还有几个需要加引号的地方没有加,现在都已经解决
回复

使用道具 举报

发表于 2013-5-12 20:52:39 | 显示全部楼层
示例代码中的BCDTOOL.WCS是不是不起作用,点击选择文件后,界面中还是空空的什么内容也没有
回复

使用道具 举报

发表于 2013-5-12 22:20:41 | 显示全部楼层
感觉2012的比较好用,2013的搜索功能不强,嘻嘻!就如LOAD  加载u+隐藏区挂载出来的盘符 ,我一换2012就可以了!
回复

使用道具 举报

 楼主| 发表于 2013-5-13 06:03:56 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-13 06:07 编辑
可乐百分所有 发表于 2013-5-12 22:20
感觉2012的比较好用,2013的搜索功能不强,嘻嘻!就如LOAD  加载u+隐藏区挂载出来的盘符 ,我一换2012就可以 ...


>>就如LOAD  加载u+隐藏区挂载出来的盘符 ,我一换2012就可以了!

是U盘吗?
用 SHOW 挂载  u+隐藏区 吗, 还是 直接 LOAD  \ 挂载 ?  
回复

使用道具 举报

 楼主| 发表于 2013-5-13 06:05:46 | 显示全部楼层
freesoft00 发表于 2013-5-12 20:52
示例代码中的BCDTOOL.WCS是不是不起作用,点击选择文件后,界面中还是空空的什么内容也没有

哦, 你在PE中用的,而且没有BCDEdit.exe
BCDTOOL.WCS 需要 调用 BCDEdit.exe  。  用 BCDEdit.exe  来做了一个 界面。
回复

使用道具 举报

发表于 2013-5-13 08:03:10 | 显示全部楼层
7zip里面的7zg.exe是7zip的命令执行程序,GUI压缩和解压缩都是7zg执行的,可以将7zg当7z.exe使用
回复

使用道具 举报

发表于 2013-5-13 09:13:59 | 显示全部楼层
BCDEdit.exe

哦,估计是这个原因
回复

使用道具 举报

发表于 2013-5-13 11:16:51 | 显示全部楼层
可乐百分所有 发表于 2013-5-12 22:20
感觉2012的比较好用,2013的搜索功能不强,嘻嘻!就如LOAD  加载u+隐藏区挂载出来的盘符 ,我一换2012就可以 ...

2013?在哪里?不是只有2012的吗?
回复

使用道具 举报

发表于 2013-5-13 12:52:41 | 显示全部楼层
指南针 发表于 2013-5-13 11:16
2013?在哪里?不是只有2012的吗?

我看pecmd帮助的那里说的,现在新的写2013
回复

使用道具 举报

发表于 2013-5-13 12:59:57 | 显示全部楼层
load直接是无法加载u+隐藏区的吧!show是可写,不安全!我是用bootpart挂载u+区,在u+区有配置文件tools.ini,命令是挂载本配置文件所在目录tools.wim,虚拟机可以挂,一到物理机,死活挂不上,我正郁闷的!用老九又不怎么兼容win8pe,用这个又是这样的问题,为什么就我才有这问题,难我命令不对还是其他的几乎不是挂载wim外置程序,都是解开的?
回复

使用道具 举报

 楼主| 发表于 2013-5-13 13:28:59 | 显示全部楼层
可乐百分所有 发表于 2013-5-13 12:59
load直接是无法加载u+隐藏区的吧!show是可写,不安全!我是用bootpart挂载u+区,在u+区有配置文件tools.in ...

用 USM_8PE_x64_UEFI_v1.0.0.3.iso    Ton7PE_V5.0.iso
改改试试。
本坛子有下载 。
我下载了。  这样你说的问题,我这个可以复现,知道怎么调试。
回复

使用道具 举报

 楼主| 发表于 2013-5-13 13:30:43 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-13 13:32 编辑
可乐百分所有 发表于 2013-5-13 12:52
我看pecmd帮助的那里说的,现在新的写2013


发现 PECMD 这么大的根本原因是 就是些的代码多。
弄了半天, 也就减少100K   (压缩体50K)  


要缩小, 唯一的办法是 减少功能, 减少特性。
回复

使用道具 举报

发表于 2013-5-13 14:14:15 | 显示全部楼层
mdyblog 发表于 2013-5-13 13:30
发现 PECMD 这么大的根本原因是 就是些的代码多。
弄了半天, 也就减少100K   (压缩体50K)  

这样精简就没什么意义,干脆专心做好两个版本:稳定版和孵化版!
回复

使用道具 举报

发表于 2013-5-13 15:21:52 | 显示全部楼层
mdyblog 发表于 2013-5-13 13:28
用 USM_8PE_x64_UEFI_v1.0.0.3.iso    Ton7PE_V5.0.iso
改改试试。
本坛子有下载 。

TON8PE_V5.0.ISO都无法挂载u+隐藏区,7pe,没试,不想再试!iso虚拟机启动没问题,但到物理机就不行!我找找usm的下载试试!不行就只能换个方法了,你是在老九的基础上进行加强修改吗?
回复

使用道具 举报

 楼主| 发表于 2013-5-13 15:41:36 | 显示全部楼层
可乐百分所有 发表于 2013-5-13 15:21
TON8PE_V5.0.ISO都无法挂载u+隐藏区,7pe,没试,不想再试!iso虚拟机启动没问题,但到物理机就不行!我找 ...

你说的 TON8PE_V5.0.ISO   是那个链接?  贴上来, 我 下来 试试 。
回复

使用道具 举报

发表于 2013-5-13 17:09:55 | 显示全部楼层
mdyblog 发表于 2013-5-13 15:41
你说的 TON8PE_V5.0.ISO   是那个链接?  贴上来, 我 下来 试试 。

现在通用PE不好找,网上找了一个,看看别人上传的!看见大小一样!在我这里文件
文件名:Ton8PE_V5.0.exe
MD5     :E41983A89125A8C485B261B2ECB32C1D

下载地址http://www.vdisk.cn/down/index/12842674
回复

使用道具 举报

发表于 2013-5-13 17:46:49 | 显示全部楼层
mdyblog 发表于 2013-5-7 16:30
用  USM_8PE_x64_UEFI_v1.0.0.3.iso  测试: 正常。
需要在 PECMD.INI 中用,且在 SHEL 前执行。
不依赖 ...

问题解决了,谢谢!
回复

使用道具 举报

 楼主| 发表于 2013-5-13 21:54:07 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-13 22:07 编辑
可乐百分所有 发表于 2013-5-13 17:09
现在通用PE不好找,网上找了一个,看看别人上传的!看见大小一样!在我这里文件
文件名:Ton8PE_V5.0.ex ...

问题解决:
需要在 X:\WINDOWS\system32\winpeshl.exe 初始化系统之 MOUN  \ 加载 。

测试 :  PECMD.INI 中 ,  在其 前后个加载一次:
  1. //进行PE内核初始化操作
  2. LOAD E:\TOOLS\TEST_MOUN.WCS  31
  3. EXEC =!%SystemRoot%\system32\winpeshl.exe
  4. LOAD E:\TOOLS\TEST_MOUN.WCS  32
复制代码
PECMD.INI LOG:
708        20041657537.700        [set &=------------ TEST_MOUN  1 [31]-------------]        <0>        :操作成功完成。
708        20294475543.666        [EXEC* &X=!cmd  /c dir /s/b  E:\TEST\新建文件夹2*]        <0>        :操作成功完成。
708        20304949721.891        [EXEC* &V=!cmd  /c dir /s/b  E:\TEST\新建文件夹2\繁体测试.WCS]        <1>        :函数不正确。
708        20305045659.706        [SET &=[MOUN前] [] [E:\TEST\新建文件夹2
]]        <0>        :操作成功完成。
708        20305062169.934        {IFEX   E:\TEST\新建文件夹2\繁体测试.WCS, EXIT}
708        20305167478.419        [IFEX   E:\TEST\新建文件夹2\繁体测试.WCS, EXIT]        <0>        :操作成功完成。
MOUN  :  Drives=0x80003C  WIM DLL ver7=0
708        21007194889.861        [MOUN  \新建文件夹.WIM,E:\TEST\新建文件夹2]        <1>        :函数不正确。     
708        21018889932.553        [EXEC* &V=!cmd  /c dir /s/b  E:\TEST\新建文件夹2\繁体测试.WCS]        <1>        :函数不正确。
708        21018969360.139        [SET &=[MOUN后] []]        <0>        :操作成功完成。
708        21019036293.498        {LEAVE:E:\TOOLS\TEST_MOUN.WCS}
708        21019244679.355        [LOAD E:\TOOLS\TEST_MOUN.WCS  31]        <0>        :操作成功完成。
708        36617490579.129        [EXEC =!X:\WINDOWS\system32\winpeshl.exe]        <0>        :操作成功完成。  //《=====-注意这行   
708        36617585178.277        {LOAD E:\TOOLS\TEST_MOUN.WCS  32}
708        36617857373.936        {ENTER:E:\TOOLS\TEST_MOUN.WCS}
708        36620714982.139        [set &=------------ TEST_MOUN  2 [32]-------------]        <0>        :操作成功完成。
708        36639532626.665        [EXEC* &X=!cmd  /c dir /s/b  E:\TEST\新建文件夹2*]        <0>        :操作成功完成。
708        36650063475.135        [EXEC* &V=!cmd  /c dir /s/b  E:\TEST\新建文件夹2\繁体测试.WCS]        <1>        :函数不正确。
708        36650166998.730        [SET &=[MOUN前] [] [E:\TEST\新建文件夹2
]]        <0>        :操作成功完成。
708        36650183955.181        {IFEX   E:\TEST\新建文件夹2\繁体测试.WCS, EXIT}
708        36650339240.574        [IFEX   E:\TEST\新建文件夹2\繁体测试.WCS, EXIT]        <0>        :操作成功完成。
MOUN  :  Drives=0x8000FC  WIM DLL ver7=0
FOUND WIM [I:\新建文件夹.WIM],  mount to [E:\TEST\新建文件夹2] [(null)] =1
708        36715722869.120        [MOUN  \新建文件夹.WIM,E:\TEST\新建文件夹2]        <0>        :操作成功完成。
   
708        36728248331.686        [EXEC* &V=!cmd  /c dir /s/b  E:\TEST\新建文件夹2\繁体测试.WCS]        <0>        :操作成功完成。
708        36728342484.610        [SET &=[MOUN后] [E:\TEST\新建文件夹2\繁体测试.WCS
]]        <0>        :操作成功完成。

winpeshl.exe 记录文件:  wpeinit.log
Info      No unattend file was found; WPEINIT is using default settings to initialize WinPE
Info      Spent 14586ms initializing removable media before unattend search
Info      ==== 正在初始化显示设置 ====
Info      No display settings specified
Info      STATUS: SUCCESS (0x00000001)
Info      ==== 正在初始化计算机名称 ====
Info      Generating a random computer name
Info      No computer name specified, generating a random name.
Info      Renaming computer to MININT-8D3S41J.
Info      Acquired profiling mutex
Info      Service winmgmt disable: 0x00000000
Info      Service winmgmt stop: 0x00000000
Info      Service winmgmt enable: 0x00000000
Info      Released profiling mutex
Info      STATUS: SUCCESS (0x00000000)
Info      ==== 正在初始化虚拟内存分页文件 ====
Info      No WinPE page file setting specified
Info      STATUS: SUCCESS (0x00000001)
Info      ==== 正在初始化选项组件 ====
Info      WinPE optional component 'Microsoft-WinPE-Setup' is present
Info      WinPE optional component 'Microsoft-WinPE-Setup-Client' is present
Info      WinPE optional component 'Microsoft-WinPE-WMI' is present
Error     Unable to initialize optional component 'Microsoft-WinPE-WMI'; failed with status 0x80004005
Info      WinPE optional component 'Microsoft-WinPE-WSH' is present
Error     Unable to initialize optional component 'Microsoft-WinPE-WSH'; failed with status 0x80004005
Info      STATUS: FAILURE (0x80004005)
Info      ==== 正在初始化网络访问和应用配置 ====
Info      No EnableNetwork unattend setting was specified; the default action for this context is to enable networking support.
Info      Acquired profiling mutex
Info      Released profiling mutex
Info      Spent 0ms installing network components
Info      Spent 0ms installing network drivers
Info      STATUS: FAILURE (0x8007007e)
Info      ==== 正在应用防火墙设置 ====
Info      STATUS: SUCCESS (0x00000001)
Info      ==== 正在执行同步的用户提供的命令 ====
Info      STATUS: SUCCESS (0x00000001)
Info      ==== 正在执行异步的用户提供的命令 ====
Info      STATUS: SUCCESS (0x00000001)
Info      ==== 正在应用关机设置 ====
Info      No shutdown setting was specified
Info      STATUS: SUCCESS (0x00000001)
Warning   Applying WinPE unattend settings failed with status 0x80004005; ignoring shutdown settings
回复

使用道具 举报

 楼主| 发表于 2013-5-13 22:36:50 | 显示全部楼层
本帖最后由 mdyblog 于 2013-5-13 22:37 编辑
527104427 发表于 2013-5-13 17:00
有几个问题请教一下老大:
1.下图中第一处,怎么判断输入框中输入的是文件还是文件夹?
   如果没办法 ...


1:

    TIME &T1,100, CALL OnTimer1
    SET &bfile=0
_END
_SUB OnTimer1
   SET bfile=0
   FDIR --fullfile  &&F=%&NAME1%
   IFEX %&F%,  SET bfile=1  //文件或目录
   IFEX %&F%\, SET bfile=0  //目录
   FIND $""="%&NAME1", SET bfile=0
   FIND $""="%&F", SET bfile=0
   ENVI @&BUTSTART.Enable=%&bfile%    //不是文件 【开始解压】  变灰
_END

_SUB SearchFile
        ENVI &FILE1=%&NAME1%
        BROW &&FILE1,%&NAME1%,请选择压缩文件
        FIND $""="%&FILE1%",!ENVI @&NAME1=%&FILE1%
    CALL  OnTimer1  //检查
_END



2:
        EDIT-| E,L25T20W410H230,\n7-Zip (A) 9.20  Copyright (c) 1999-2010 Igor Pavlov  2010-11-18\n\n进度:,,0x44

3:
ENVI @&BUTSTOP.Enable=0
放在其后面,
或 ITEM 的状态字设定为慧

4:
文件中 该空间放在最前面, 指的是代码, 不是显示位置。
        ITEM &BUTSTART,L360T315W60H25,开始解压, TEAM CALL OnStart|,
  1. #!PECMD

  2. FIND $**pecmd=%~1,
  3. {
  4.         MSTR &&cmd=<2->%*
  5.         %&cmd%
  6.         EXIT FILE
  7. }

  8. TEAM ENVI OK=0|ENVI &NAME0=|ENVI &NAMEa=

  9. MDIR %TEMP%
  10. {
  11.         LOCK ##LK_MKTEMP
  12.         SET &t=%TEMP%\~tmp%RANDOM%.tmp
  13.         LOOP #%OK%=0, TEAM ENVI &NAME0=%&t%| IFEX %&NAME0%,! ENVI OK=1| SET t=%TEMP%\~tmp%RANDOM%.tmp
  14. }
  15. FNAM -ext &NAMEa=%&NAME0%

  16. WIN1 %*

  17. _SUB WIN1,W450H380,7-Zip 解压程序
  18.         ENVI @&BUTSTOP.Enable=0
  19.         ENVI &&NAME1=%~1
  20.         FIND $""="%&NAME1%", ENVI &NAME1=%CurDir%\AUTO.7Z
  21.         ITEM &BUTSTART,L360T315W60H25,开始解压, TEAM CALL OnStart|,
  22.         LABE -right ,L25T260W60H25,压缩文件:,,
  23.         ITEM &BUTFILE,L380T255W40H20,…,TEAM CALl SearchFile|,
  24.         EDIT &NAME1,L86T257W280H18,%&NAME1%,,

  25.         ENVI &&NAME2=%~2
  26.         FIND $""="%&NAME2%", ENVI &NAME2=%CurDir%\
  27.         LABE -right ,L25T290W60H25,解压目录:,,
  28.         ITEM &BUTDIR,L380T285W40H20,…,TEAM CALl SearchDir|,
  29.         EDIT &NAME2,L86T287W280H18,%&NAME2%,,

  30.         ITEM &BUTSTOP,L25T315W60H25,强制中止,KILL *force %&NAMEa%
  31.     ENVI @&BUTSTOP.Enable=0
  32.         EDIT-| E,L25T20W410H230,\n7-Zip (A) 9.20  Copyright (c) 1999-2010 Igor Pavlov  2010-11-18\n\n进度:,,0x44
  33.     TIME &T1,100, CALL OnTimer1
  34.     SET &bfile=0
  35. _END
  36. _SUB OnTimer1
  37.    SET bfile=0
  38.    FDIR --fullfile  &&F=%&NAME1%
  39.    IFEX %&F%,  SET bfile=1  //文件或目录
  40.    IFEX %&F%\, SET bfile=0  //目录
  41.    FIND $""="%&NAME1", SET bfile=0
  42.    FIND $""="%&F", SET bfile=0
  43.    ENVI @&BUTSTART.Enable=%&bfile%    //不是文件 【开始解压】  变灰
  44. _END

  45. _SUB OnStart
  46.         //TEAM EXEC* --pid:&pide 7Z_exe @E=!cmd /c dir /s/b  C:\TOOLS\*.*   //DEBUG
  47.     //EXIT
  48.    
  49.         IFEX "%&NAME1%" ,!TEAM MESS 找不到 "%&NAME1%" @错误| EXIT _SUB
  50.         IFEX "%&NAME2%" ,!TEAM MESS 找不到 "%&NAME2%" @错误| EXIT _SUB
  51.         ENVI @&BUTSTART.Enable=0
  52.         ENVI @&BUTFILE.Enable=0
  53.         ENVI @&BUTDIR.Enable=0
  54.         ENVI @&BUTSTOP.Enable=1

  55.         PUTF* %&NAME0%,,#1
  56.         SITE %&NAME0%,+H

  57.         SET &pide=0
  58.         SET &pidc=0

  59.         TEAM EXEC* --pid:&pide 7Z_exe @E=!"%&NAME0%" x "%&NAME1%" -y -aos -o"%&NAME2%"
  60.         FILE --force "%&NAME0%"
  61.         IFEX "%&NAME0%",!!EXEC --exe:"%MyName%" --pid:&pidc PECMD **pecmd WAIT *0 100 -del "%&NAME0%"
  62.         MESS 完成解压!@提示
  63.         KILL @
  64. _END

  65. _SUB SearchFile
  66.         ENVI &FILE1=%&NAME1%
  67.         BROW &&FILE1,%&NAME1%,请选择压缩文件
  68.         FIND $""="%&FILE1%",!ENVI @&NAME1=%&FILE1%
  69.     CALL  OnTimer1  //检查
  70. _END

  71. _SUB SearchDir
  72.         ENVI &DIR0=%&NAME2%
  73.         BROW &&DIR0,*%&NAME2%,请选择一个目录
  74.         FIND $""="%&DIR0%",!ENVI @&NAME2=%&DIR0%
  75. _END
复制代码
回复

使用道具 举报

发表于 2013-5-14 07:05:55 | 显示全部楼层
想问一下,精简版做得如何了?
回复

使用道具 举报

 楼主| 发表于 2013-5-14 08:12:10 | 显示全部楼层
hhh333 发表于 2013-5-14 07:05
想问一下,精简版做得如何了?


还在调试。  我想重新设计一下整个体系架构,可载少100K。
精简版 必须 减少 功能和特性, 才能根本缩小体积 。  大概4.0 一样, 小小修改一些。
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持|无忧启动 ( 闽ICP备05002490号-1|闽公网安备35020302032614号 )

GMT+8, 2026-9-11 14:23

Powered by Discuz! X5.0

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表