SOGO論壇
  登入   註冊   找回密碼
查看: 1347|回覆: 0
列印 上一主題 下一主題

[Windows] [心得分享] Windows 7 x64 免第三方工具 檢視4K對齊 Cmd+vbs [複製連結]

Rank: 2

狀態︰ 離線
跳轉到指定樓層
1
發表於 2017-1-17 12:37:05 |只看該作者 |倒序瀏覽
本帖最後由 kitty1017 於 2017-5-3 12:42 編輯
  1. @ECHO OFF&& SETLOCAL&& PUSHD "%~dp0"&& SETLOCAL ENABLEDELAYEDEXPANSION&& SETLOCAL ENABLEEXTENSIONS&& SET _V=5&& IF NOT "!_V!"=="5" (Echo DelayedExpansion Failed&& GOTO :EOF)



  2. @Echo Off&& Title 4K對齊-SSD&& Color 9F&& Mode Con: Cols=80 Lines=30&& Cls



  3. >"%temp%\tmp.vbs" Echo Wscript.Echo round(wscript.arguments(0)/wscript.arguments(1),2)
  4. for /f "skip=1" %%i in ('wmic path Win32_LogicalDiskToPartition get StartingAddress') do (Set /a n+=1 & Set StartingAddress_!n!=%%i)
  5. for %%i in (3,2) do (
  6.   for /f "tokens=1,2,3 delims= " %%a in ('wmic logicaldisk where "drivetype=%%i" get deviceid^,size^,freespace 2^>nul^|find ":"') do (
  7.     if %%i equ 3 (Echo.&& Echo.Disk   %%a) Else (Echo.&& Echo.Usb Disk   %%a)
  8.     Set /a n_2+=1
  9.     Call :calculate %%b 1073741824 availableGB
  10.     Call :calculate %%c 1073741824 allGB
  11.     for %%z in (!n_2!) do (Set StartingAddress=!StartingAddress_%%z!)
  12.     Call :calculate !StartingAddress! 4096 4K
  13.     if "!4k!"=="!4k:.=!" (Set 4k=是) Else (Set 4k=否)
  14.     Call :calculate !StartingAddress! 1048576 1M
  15.     if "!1m!"=="!1M:.=!" (Set 1m=是) Else (Set 1m=否)
  16.     Call :calculate !StartingAddress! 2097152 2M
  17.     if "!2m!"=="!2M:.=!" (Set 2m=是) Else (Set 2m=否)
  18.     Call :calculate !StartingAddress! 3145728 3M
  19.     if "!3m!"=="!3M:.=!" (Set 3m=是) Else (Set 3m=否)
  20.     Call :calculate !StartingAddress! 4194304 4M
  21.     if "!4m!"=="!4M:.=!" (Set 4m=是) Else (Set 4m=否)
  22.     Set availableGB=       !availableGB!
  23.     Set allGB=       !allGB!
  24.     Echo.總 空 間:!allGB:~-7!GB  可用:!availableGB:~-7!GB  4K(!4K!^)  1M(!1M!^)  2M(!2M!^)  3M(!3M!^)  4M(!4M!^)
  25.     Echo.
  26.   )
  27. )



  28. Del /F /A "%temp%\tmp.vbs">nul 2>&1 & Echo.&& Echo 完    成:按任意鍵退出... & Pause>nul & Exit



  29. :Calculate
  30. for /f "Delims=" %%i in ('cscript //nologo %temp%\tmp.vbs %1 %2') do (Set %3=%%i)
  31. Exit /b



  32. Goto :Eof
  33. REM ::::::::::::::::::::::::::::::::::::::::: REM
  34. REM ::  記 事 本  建議字型 : Consolas      :: REM
  35. REM ::  文書編輯  推薦軟體 : NotePad++     :: REM
  36. REM ::  副 檔 名  建    議 : FileName.Cmd  :: REM
  37. REM ::::::::::::::::::::::::::::::::::::::::: REM

  38. :: 開啟記事本(NotePad)存入內容  "_任意名稱.Cmd"  副檔名為 .Cmd

  39. :: 檔案名稱+下橫線 "_" 避免執行路徑上(%Path%)調用出錯  建議...

  40. :: 若使用NotePad++  編輯批次檔  設定 > 喜好設定 > 開新文件 > 編碼 > 請更換為 ANSI

  41. :: 若使用NotePad    儲存檔案 > 另存新檔 : 雙引號 "_YourFileName.Cmd" > 存檔類型 : 所有檔案

  42. :: !!! [提醒 : 微軟 .bat(不推薦) 或 .Cmd(命令指令碼) 編碼始終為 : ANSI ] !!!

  43. :: 個人使用環境為 Windows 7 64位元 其他環境未測試 請斟酌使用...
複製代碼
:::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
若取名 "4K.Cmd" 並存放在可執行文件路徑
在命令提示字元中 輸入4K 即可調用檢視是否4K對齊 ; 或任何你您偏愛的檔案名稱
以上若有問題  請回覆  謝謝!
喜歡嗎?分享這篇文章給親朋好友︰
               感謝作者     

請注意︰利用多帳號發表自問自答的業配文置入性行銷廣告者,將直接禁訪或刪除帳號及全部文章!
您需要登錄後才可以回覆 登入 | 註冊


本論壇為非營利自由討論平台,所有個人言論不代表本站立場。文章內容如有涉及侵權,請通知管理人員,將立即刪除相關文章資料。侵權申訴或移除要求:abuse@oursogo.com

GMT+8, 2024-11-8 18:46

© 2004-2024 SOGO論壇 OURSOGO.COM
回頂部