發一個批處理清除系統變量和查看腳本變量的便捷方法

發一個批處理清除系統變量和查看腳本變量的便捷方法如題：發一個鄙人十幾年來查看腳本存在變量的便捷方法，，，，該方法是本人自創的，也一直是自己在用，前段時間指導員工腳本錯誤寫法的時候，在他面前展示過。想來也不是什么高明方法，自己卻藏私了那么久確實不該，，，，-----------廢話完，拋步驟---------------無論什么系統版本的WIN 系統，只要在CMD 窗口下打

SET > ClsWin.Bat
nclick="copycode($('code0'));">復制代碼

然后手動 ClsWin.Bat把每一行，，= 號后面的數據全部清除，，再每一行的前面加上 Set ，，USERDOMAIN_ROAMINGPROFILE=H027USERNAME=AdministratorUSERPROFILE=C:UsersAdministratorwindir=C:Windows，，，，，，，，，，，，，，，----------改成----------Set USERDOMAIN_ROAMINGPROFILE=Set USERNAME=Set USERPROFILE=Set windir=Set ，，，，Set ，，，，，Set ，，，，，，--------然后保存，，首行加不加 @Echo off 和尾行加不加 Goto,:Eof 無所謂，反正是調用的，，用法很簡單，，，在需要調試查看變量的腳本前先調用 Call,路徑ClsWin.Bat該腳本里存在的系統變量就會被清除干凈（該調用只適用當前腳本，不影響系統和其他腳本），，需要查看腳本變量是否出錯或存在多個未知變量無法確定的時候只需要適時加入，，，SetPause>Nul即可查看當前腳本的所有變量，快捷切方便，連 ECHO.%變量名稱% & Pause>Nul 都不用打，輸出變量為本文只要Set>本文.TXT即可，，，，，-----------------以下----獲取系統密匙.BAT---腳本為例-----

@echo off
SetLOCAL ENABLEDELAYEDEXPANSION
For /f tokens=3 %%i in ('reg query HKEY_LOCAL_MACHINESOFTWAREMicrosoftWindows NTCurrentVersion /v DigitalProductId 2^>nul') do set DigitalProductId=%%i
If !DigitalProductId!== ( Set Key=未獲取 )
Set Row=-1
For /l %%i in (0,2,327) do (
Set /a Row+=1
Set F=!DigitalProductId:~%%i,2!
Set /a Id!Row!=0X!F:~0,1!*16+0X!F:~1,1!
)
Set /a Win10=!Id66!/6^&1
Set /a Id66=(!Id66!^&0xF7)^|((!Win10!^&2)*4)
Set Maps=BCDFGHJKMPQRTVWXY2346789
For /l %%i in (24 -1 0) do (
Set Current=0
For /l %%j in (14 -1 0) do (
Set /a Current*=256
Set /a J=%%j+52
Set /a Current=Id!J!+!Current!
Set /a Id!J!=!Current!/24
Set /a Current=!Current!%%24
)
For /l %%k in (0,1,24) do (
If !Current!==%%k (
Set KeyTemp=!Maps:~%%k,1!!KeyTemp!
)
)
Set Last=!Current!
)
If !Win10!==1 (
For /l %%i in (0,1,24) do set keypart1=!KeyTemp:~1,%%i!
Set Insert=N
For /l %%i in (1,1,24) do (
Set L=!L!!KeyTemp:~%%i,1!
If %%i==!Last! Set L=!L!!Insert!
)
Set KeyTemp=!L!
If !Last!==0 Set KeyTemp=!Insert!!KeyTemp!
)
Set 系統密匙=!KeyTemp:~0,5!-!KeyTemp:~5,5!-!KeyTemp:~10,5!-!KeyTemp:~15,5!-!KeyTemp:~20,5!
:::--------這里是調用區----------------------------
Call,ClsWin.Bat
Set
Pause>Nul
nclick="copycode($('code1'));">復制代碼

---------------得出----------------Current=4DigitalProductId=A40000000300000030303333312D31303030302D30303030312D414131323900EF0C00005B54485D5831392D3938373935000000EF0C10000000343DC5394EBD6E2F090000000000225C9E68915B29CF03000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000BD25BB3F=B3Id0=164Id1=0Id10=51Id100=0Id101=0Id102=0Id103=0Id104=0Id105=0Id106=0Id107=0Id108=0Id109=0Id11=51Id110=0Id111=0Id112=0Id113=0Id114=0Id115=0Id116=0Id117=0Id118=0Id119=0Id12=49Id120=0Id121=0Id122=0Id123=0Id124=0Id125=0Id126=0Id127=0Id128=0Id129=0Id13=45Id130=0Id131=0Id132=0Id133=0Id134=0Id135=0Id136=0Id137=0Id138=0Id139=0Id14=49Id140=0Id141=0Id142=0Id143=0Id144=0Id145=0Id146=0Id147=0Id148=0Id149=0Id15=48Id150=0Id151=0Id152=0Id153=0Id154=0Id155=0Id156=0Id157=0Id158=0Id159=0Id16=48Id160=11Id161=210Id162=91Id163=179Id17=48Id18=48Id19=45Id2=0Id20=48Id21=48Id22=48Id23=48Id24=49Id25=45Id26=65Id27=65Id28=49Id29=50Id3=0Id30=57Id31=0Id32=239Id33=12Id34=0Id35=0Id36=91Id37=84Id38=72Id39=93Id4=3Id40=88Id41=49Id42=57Id43=45Id44=57Id45=56Id46=55Id47=57Id48=53Id49=0Id5=0Id50=0Id51=0Id52=0Id53=0Id54=0Id55=0Id56=0Id57=0Id58=0Id59=0Id6=0Id60=0Id61=0Id62=0Id63=0Id64=0Id65=0Id66=0Id67=0Id68=0Id69=0Id7=0Id70=0Id71=0Id72=34Id73=92Id74=158Id75=104Id76=145Id77=91Id78=41Id79=207Id8=48Id80=3Id81=0Id82=0Id83=0Id84=0Id85=0Id86=0Id87=0Id88=0Id89=0Id9=48Id90=0Id91=0Id92=0Id93=0Id94=0Id95=0Id96=0Id97=0Id98=0Id99=0Insert=NJ=52keypart1=W269WFGWXYVC9B4J6C9T83GXKeyTemp=W269NWFGWXYVC9B4J6C9T83GXL=W269NWFGWXYVC9B4J6C9T83GXLast=4Maps=BCDFGHJKMPQRTVWXY2346789Row=163Win10=1系統密匙=W269N-WFGWX-YVC9B-4J6C9-T83GX------------諸多變量存在------------這個方法適用很多腳本調試查看，，靈活運用希望能提升各位編寫腳本的水平吧！，呵，，，在各位大神面前獻丑了，小小取巧方式勿笑，，