无忧启动论坛

标题: 基于永远的wing 做的WIN81PE ,DIY了一下,分享一些工具包 [打印本页]
作者: 天涯行    时间: 2015-1-11 19:35
标题: 基于永远的wing 做的WIN81PE ,DIY了一下,分享一些工具包
本帖最后由 天涯行 于 2015-1-11 20:15 编辑

系统取自 永远的wing 64位winpe5.1修正版1(wingwy-pe5.1-v1f1)
感谢 永远的wing 无私分享！
下载地址：
wingwy-pe5.1-v1f1.iso MD5：7f931189d41fe2b65fa07be1b970f3a8
下载： http://pan.baidu.com/s/1o6JRPiE

自已也从互联网上整理收集了一些软件.http://pan.baidu.com/s/1i35nrPN 密码:ycvt
感谢我所收集工具软件包中各位原创作者，制作者，分享者，谢谢！
如我无意中侵犯了您们的权利，请PM我，我将删除分享包中的相应软件。

最后，感谢 无忧论坛 提供学习及交流的平台，各位管理团队的成员，你们辛苦了！因年已40有余，再也没有力气去折腾这些了。这是最后一次折腾了。

我用WINPE的历程：WINXP PE，WIN7 PE，WIN 8.1 的PE，这三包平台我分别用的是 逆天使 静庵 永远的WING 三位大侠制作的，在此感谢他们三位，祝他们身体健康，生活幸福。还有一位 超版 dgxhls ，是他指点我合盘的，也表示十分感谢。

还有那些为制作WINPE系统付出辛勤劳动的各位朋友，也一并表示感谢。








又因为不懂DOS的FOR之类的高级应用,只好很笨拙的写了段代码完成自己想要实现的一个超级简单的功能.(就是查找工具软件所在目录,并复制到内存盘中)
主要是因为我也不懂编程，E文更是菜鸟，看了半天的帮助文档，才搞出下面这段代码，唉，OUT，不服老不行啊。汗水~~~

  2. old_path$ = GetCurrentDirectory()
  3. tools_path$ = "gltianya"
  4. error_path$ = "gltianya"
  5. petools_dir$ = "X:\gltianya"


  8. CreateDirectory(petools_dir$)

  10.   result1 = RunProgram("fsutil.exe"," fsinfo drives","", #PB_Program_Open | #PB_Program_Read)
  11.   Output$ = ""
  12.   If result1
  13.     While ProgramRunning(result1)
  14.       If AvailableProgramOutput(result1)
  15.         Output$ + ReadProgramString(result1,#PB_Ascii)
  16.       EndIf
  17.     Wend
  18.     Output$  + Chr(13)
  19.     CloseProgram(result1) ; 关闭程序连接
  20.   EndIf
  21.   
  22.   Output$=RemoveString(Output$,"驱动器:")
  23.   Output$=(LTrim(RTrim(Output$)))
  24.   For k=1 To Len(output$)-1 Step 4
  25.     output1$=Mid(output$,k,4)
  26.     new_path$ = RTrim(output1$)+tools_path$

  28.     If SetCurrentDirectory(new_path$)
  29.        Directory1$ = GetCurrentDirectory()

  31.        If ExamineDirectory(0, Directory1$, "*.*") And (Mid(Directory1$,1,1) <> Mid(petools_dir$,1,1))

  33.         If CopyDirectory(Directory1$,petools_dir$,"",#PB_FileSystem_Recursive | #PB_FileSystem_Force)
  34.          
  35.          If OpenWindow(0, 350, 350, 330, 90, "友情提示")

  37.             Repeat
  38.               Event = WaitWindowEvent()
  39.               Text_0 = TextGadget(0, 10, 25,400, 50, "搜索到外置工具软件，已经将工具软件复制到 "+ petools_dir$ +Chr(13)+Chr(10)+Chr(13)+Chr(10)+"文件夹！")

  41.               If Event = #PB_Event_CloseWindow  ; 手动关闭窗口
  42.                  Quit = 1
  43.               Else
  44.                  ;Delay(5000)
  45.                  Quit = 1
  46.               EndIf
  47.             Until Quit = 1
  48.             CloseWindow(0)
  49.           EndIf

  51.        Else
  52.           MessageRequester("提示","在启动盘根目录中未能找到 "+error_path$+ " 文件夹，无法加载外置软件工具！" )
  53.        EndIf
  54.      EndIf
  55.     EndIf
  56.    Next
  57.    SetCurrentDirectory(old_path$)
  58. End
复制代码




作者: 天涯行    时间: 2015-1-11 19:39
补充一句,我自己用的那段代码,我把提示那部分删除了,因为实际效果似乎未达到我想要的.

如果想改为别的目录名,用WINHEX之类的工具直接查找替换' gltianya ' 为自己喜欢的就OK了.

movesoft.7z

7.16 KB, 下载次数: 35, 下载积分: 无忧币 -2

作者: 白马探哥    时间: 2015-1-11 20:15
大神，幸苦啦！
作者: shan    时间: 2015-1-11 20:41
启动管理器好有特点，放出合盘给大家研究一下可否？
作者: 天涯行    时间: 2015-1-11 21:02
楼上的大侠,不是我不愿意上传合盘,体积近1.3G,我的ADSL上网,下载400K左右,上传则30-40K的速度.实在是心有余而力不足啊.
作者: WAIGO    时间: 2015-1-11 21:51
我70岁都不服老，您40多岁算什么老，再加把劲吧！
作者: 天涯行    时间: 2015-1-11 22:13
有朋友要BCD文件,贴上来

1.7z

8.15 KB, 下载次数: 42, 下载积分: 无忧币 -2

两个BCD文件,BIOS及UEFI的
作者: 天涯行    时间: 2015-1-11 22:13
有朋友要BCD文件,贴上来 1.7z (8.15 KB, 下载次数: 41)

作者: 泰立信    时间: 2015-1-12 08:58
看来大家都是有一定年纪的了
作者: 2011npwjm    时间: 2015-1-12 09:07
人老了，不服不行，感谢楼主分享
作者: 靠边站#傻瓜    时间: 2015-1-12 13:12
2010WAIGO 发表于 2015-1-11 21:51
我70岁都不服老，您40多岁算什么老，再加把劲吧！

看到40多的大叔辈和70多的爷爷辈人物，我这个20出头的小孩子吓哭了
作者: renchmin    时间: 2015-1-12 15:29
非常不错的PE了，这个必须要支持一下的啊。
作者: thfgw    时间: 2015-1-19 10:06
天涯行 发表于 2015-1-11 19:39
补充一句,我自己用的那段代码,我把提示那部分删除了,因为实际效果似乎未达到我想要的.

如果想改为别的目 ...



    movesoft.7z 放在哪里?怎么用
作者: 天涯行    时间: 2015-1-20 02:38
这个东东其实就一个功能，查代所有可见磁盘根目录下的 gltianya ，找到后，复制到X的根目录下，这个文件我是放在了system32里，你可以按自己需要放在想放的地方，然后调用它就行了。如果不想要 gltianya 这个名字为目录名，用WINHEX 修改它，或者 用 PB 重新编译一个。
提醒一下：我提供的这个是X64版的，不是32位版的。
PS：当时我写这个小玩意的时候，很直观的想到把软件工具移动到X盘去，实际是复拷贝过去，或许改为 copysoft 更好记，不过当时懒得去改了，反正达到自己的目的就行。

觉觉去了。
作者: lnyyj    时间: 2015-1-22 15:11
感谢楼主分享。请问在PE中 做程序的开机自启动 怎么做？
作者: 2012ryw    时间: 2015-5-15 00:24
楼主能放出下载吗？谢谢



欢迎光临 无忧启动论坛 (http://wuyou.net./) Powered by Discuz! X3.3