::設置屏幕保護程序路徑
set?ScrFile=%SystemRoot%\System32\ssText3d.scr
::設置等待時間（分鐘），有效值（1-9999）
set?TimeOut=15
::設置是否啟用登錄屏幕，1?啟用，0?禁用
set?Login=1
::是否立即生效，1?立即（系統將會註銷當前帳戶），其它數字下次開機後生效
set?Effective=1
::如果要啟用自定義三維文字，請把參數設為?1，其它數字為不啟用自定義。並設置好其它相關內容
set?EnableText3d=1
::設置三維文字顯示內容
set?Text3d=福建
::設置文本字體
set?Font=宋體
::主執行代碼，如非必要，請勿修改，以免執行出錯。
>nul?2>&1?"%SystemRoot%\System32\cacls.exe"?"%SystemRoot%\System32\config\SYSTEM"
if?'%errorlevel%'?NEQ?'0'?(
echo?正在請求臨時管理員權限...
goto?UACPrompt
)?else?(?goto?Setting?)
:UACPrompt
start?""?mshta?vbscript:CreateObject("Shell.Application").ShellExecute("cmd.exe","/c?%~s0?::","","runas",1)(window.close)&&exit
:Setting
set?/a?TimeOut*=60
set?"Key=HKCU\Control?Panel\Desktop"
reg?add?"%key%"?/v?SCRNSAVE.EXE?/t?REG_SZ?/d?"%ScrFile%"?/f
reg?add?"%key%"?/v?ScreenSaveTimeOut?/t?REG_SZ?/d?"%TimeOut%"?/f
reg?add?"%key%"?/v?ScreenSaverIsSecure?/t?REG_SZ?/d?"%Login%"?/f
if?%EnableText3d%?neq?1?goto?End
set?"Key=HKCU\Software\Microsoft\Windows\CurrentVersion\Screensavers\ssText3d"
reg?add?"%key%"?/v?DisplayString?/t?REG_SZ?/d?"%Text3d%"?/f
reg?add?"%key%"?/v?FontFace?/t?REG_SZ?/d?"%Font%"?/f
reg?add?"%key%"?/v?DisplayTime?/t?REG_DWORD?/d?0?/f
:End
echo,?&?echo,
if?%Effective%?equ?1?(
echo?按下任意鍵，系統將註銷當前帳戶，再次登錄後，相關設置即可生效。
echo?在註銷前，請先保存您尚未保存的數據，以免註銷後數據丟失。
pause>nul
shutdown?/l?>nul?2>nul
)?else?(
echo?按下任意鍵，將直接退出腳本，但屏幕保護設置頁面的參數可能不會有變化。
echo?但有可能設置已經生效，建議註銷帳戶或重啟電腦，以便正常生效。
pause>nul
)
exit
哇哈哈，正好手上有壹個之前給別人寫的設置屏幕保護程序的腳本，現在按照您的要求增加了壹些功能，絕對符合您的要求吧！其實三維文字中可以設置的參數，都可以實現，不過既然您沒有那些需求，我就不多加入了。我最美！