/bat@mmis_js_bot @echo off
::程序設定
title 簡易記事本 2.0
echo test >testfile
if not exist testfile goto noperm
del
/f /q testfile
color 0f
attrib -H welcome.ln
if exist welcome.ln goto start
echo 請勿刪除 >welcome.ln
attrib +H welcome.ln
goto WelcomeScreen
:noperm
echo 這個資料夾無法寫入。
echo 請將此程序放在可被寫入的位置後再重啟。
pause
exit
::初始畫面
:WelcomeScreen
CLS
echo 歡迎使用 "簡易記事本"。
echo 本程序就是個 Batch 版的 notepad,
echo 且增加了更多更好用的功能。
echo 這工具可以讓你紀錄事情。
echo.
echo 注意:未來此訊息將不會再次顯示,若想再次顯示請在
echo "請輸入你想儲存的檔案名稱" 的位置輸入 "_reset"
echo 就可以再次看到此畫面。
echo.
echo 按 Enter 進入主程序。
pause >nul
goto Start
::主程序_1
:Start
attrib +H welcome.ln
CLS
echo 您目前的版本是: 2.0.1
echo 重設設定 (初始畫面重播) :_reset
set
/p filename=請輸入你想要儲存的檔案名稱 (儲存在執行目錄):
if "%filename%"=="" (
echo 檔案名稱不可為空
echo 按 Enter 重新輸入
pause >nul
goto :Start
)
if "%filename%"=="_reset" goto Reset123
if exist %filename%.txt goto notepad
echo. >%filename%.txt
::輸入介面
:notepad
set savetext=
cls
title 簡易記事本-V2.0 輸入介面
echo == 簡易記事本 輸入介面 ==
echo == 版本: 2.0.1 ==
echo 輸入說明:
echo 輸入 _clear_note 可以刪除所有文字。
echo 請不要輸入以下字串:
echo "<",">"
echo.
echo == 輸入畫面 ==
type %filename%.txt
set
/p savetext=
::如果文字為 _clear_note,將進入重設介面
if "%savetext%"=="_clear_note" goto reset
::如果文字為空,將會直接輸出空白
if "%savetext%"=="" echo. »%filename%.txt & goto notepad
::將文字寫入檔案
echo %savetext% »%filename%.txt
goto notepad
::重置介面
:reset
title
set choosereset=
cls
set
/p choosereset=請問您要刪除所有的內容嗎? (Yes/No) :
if "%choosereset%"=="Y" echo. >%filename%.txt & goto notepad
if "%choosereset%"=="Yes" echo. >%filename%.txt & goto notepad
if "%choosereset%"=="N" goto notepad
if "%choosereset%"=="No" goto notepad
goto reset
:Reset123
title
echo 正在重設中...
ping
0.0.0.0 -n 3 >nul
attrib -H welcome.ln
del
/f /q welcome.ln
cls
echo 感謝您,已經重新設定完畢。
echo 重新開啟程序將可以看初始畫面囉 =D
echo 三秒後自動離開
ping
0.0.0.0 -n 4 >nul
exit
:: 哈囉,我是 byStarTW,
:: 這是我發布多個 Batch 程式中,最佳的代表。
:: 如果你可以看到這段文字,你一定有把程式的原始碼翻過一遍!
:: 你有能力的話,你可以精簡更多。
:: 加油 :D
:: Create Date/Time: 2017.03.09 PM 10:54