重復程序的一部分，而其他部分保持不變

Question

我做了一個聊天程序，希望它自動刷新，這樣我就可以擺脫上面的刷新選項。 唯一的問題是我需要從:A到Echo -----....所有內容都可以重復，而下面的所有內容都不需要。 我不希望將其拆分為2個文件。

 :A
    cls
    Echo Server: %S%
    Echo Press Q to Quit Or Press R to refresh chat log.
    echo ---------------------------------------------------------
    type %S%.txt
    echo ---------------------------------------------------------
    set /p M=Enter Your Message:
    if "%M%"=="Q" goto B
    if "%M%"=="q" goto B
    if "%M%"=="R" goto A
    if "%M%"=="r" goto A
    echo %U%: %M% >>%S%.txt
    goto A

Answer 1

注意

• if /I 執行不區分大小寫的字符串比較 ；
• :eof 這個預定義的標簽將退出當前例程 ；
• call :label 跳轉到當前批處理腳本中的標簽（子例程） 。

下一個代碼段可能會有所幫助。

:A
    call :repeatHeader
    set /p "M=Enter Your Message: "
    if /I "%M%"=="Q" goto :B
    if /I "%M%"=="R" (
        call :refreshLog
        goto :A
    )
    echo %U%: %M% >>%S%.txt
    goto :A

:repeatHeader
    Echo Server: %S%
    Echo Press Q to Quit Or Press R to refresh chat log.
goto :eof

:refreshLog
    cls
    echo ---------------------------------------------------------
    type %S%.txt
    echo ---------------------------------------------------------
goto :eof

:B