// 必要条件：PECMD 2012

// 移动设备依次按照UVZABTSRQPONMLKJIHGFEDC的顺序分配盘符。

// 本地硬盘依次CDEFGHIJKLMNOPQRSTUVWYZ的顺序分配盘符。

// 应当在各式虚拟盘、挂载盘诞生之前运行本程序，亦应当在搜索外置程序之前运行本程序！
//C大作品


ENVI^ ForceLocal=1
TEAM SET &ULIST=| SET &DISKX=| SET  &PART_INFO=| SET &LETTER=| SET &PR=| SET &V=| SET &BUSNAME=| SET &I=| SET &J=| SET &HD=| SET &U=
ENVI ULIST=
PART LIST DISK,DISKX
FORX * %DISKX%,HD,TEAM FORM V,BUSNAME=\\.\PHYSICALDRIVE%HD%|FIND $%BUSNAME%=7,CALL FREEUSB
REGI HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\!
ENVI I=1
STRL J=UVZABTSRQPONMLKJIHGFEDC
FORX * %ULIST%,U,
{
	LOOP #%I%<=%J%,TEAM MSTR LETTER=%I%,1,UVZABTSRQPONMLKJIHGFEDC|CALC #I=%I%+1|IFEX %LETTER%:,! EXIT LOOP
	IFEX %LETTER%:,! SHOW * %U%,%LETTER%
}
IFEX $%&PECDMVER%>=201201880562, DISK  ,,,1,,2! DISK  ,,,1,,2 

_SUB FREEUSB
	PART -ADMIN LIST PART %HD%,PART_INFO	
	FORX * %PART_INFO%,PR,
    {	
        PART -ADMIN LIST PART %HD%#%PR%,PARTI
        MSTR LETTER=<8>%PARTI%
        FIND $%LETTER%=,! TEAM SUBJ *%LETTER%|ENVI ULIST=%ULIST% %HD%:%PR%
    }	
_END

//说明 新版也可：
//REGI HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\MountPoints2\!
//DISK  ,,,1,,2
//DISK  ,,,3,U:,2







