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

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 /IDo a case Insensitive string comparison;
• :eofThis predefined label will exit the current routine;
• call :labelJump to a label (subroutine) in the current batch script。

下一個代碼片段可以提供幫助。

: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