重复部分的程序，而其他部分保持不变

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