anchor.diff:  rem @echo off
   setlocal
   rem    
  -::       866 
  +::        866.
   for /f "tokens=2 delims=:" %%i in ('chcp') do (
       set Prev_CP=%%i)
  -rem   
  +rem   .
   chcp 1251 > nul
  -rem  
  +rem  .
   goto Start
   --------------------------------------
      
  
positive.code:     !
  
  :Start
  rem "     1 "
  ::       , 
  ::      (  )
  set Source="D:\1C\Base"
  rem     
  set Number_Archives=1
  
negative.code: set Log_File=%Path_Script%backup.log
  
  rem  
  rem     .
  if not exist %Source% (goto No_SourceDir)
  rem     
  if not exist %Backup% (goto No_BackupDir)
  rem    WinRar.
  ::     .
  if exist "%PROGRAMFILES%\WinRAR\rar.exe" (set Archive_Program="%PROGRAMFILES%\WinRAR\rar.exe") else (if exist "%PROGRAMFILES(x86)%\WinRAR\rar.exe" (set Archive_Program="%PROGRAMFILES(x86)%\WinRAR\rar.exe") else (goto No_Archive_Program))
  rem      .
  ::  %DATE%   ( ).
  if exist %Backup%\%DATE%.rar (goto Exist_Backup)
  
  rem 
  