anchor.diff:  
   :log
   rem  .
  +rem %date%   ( )
  +rem %time%   ( )
   echo %date% >> %logfile%
   echo %time% >> %logfile%
   echo %result% >> %logfile%
   echo ... >> %logfile%
   
  -rem          
  +rem       
  +::     
   if exist %CurrentDisk%\%date%.rar (del %CurrentDisk%\%date%.rar /Q)
   
   rem   
   forfiles /P %backup% /M *.rar /D -%NumberArchives% /C "cmd /c del /q @path"
   
  +rem      
  +::    
  +::  
   chcp 866 >nul
  +
  +rem  
   rem exit
positive.code: rem echo off
  chcp 1251 >nul
  goto start
  --------------------------------------
     
  
negative.code: if not exist %archive% (goto NoArchive)
  
  rem 
  rem     rar.exe
  ::  a     -  
  :: -cfg-  -    
  ::            .
  :: -ma    -   RAR  5.0
  :: -htb   -   BLAKE2
  :: -m5    -   
  :: -rr10p - 10%   
  :: -ac    -   ""  
  :: -ow    -     
  :: -agDD.MM.YYYY -      
  :: -ep1   -     ,
  ::               
  :: -hp123 -      ( 123)
  :: -k     -   (  )
  :: --     -   
  %archive% a -cfg- -ma -htb -m5 -rr10p -ac -ow -agDD.MM.YYYY -ep1 -hp123 -k %CurrentDisk% %source% --
  
  rem  
  rem %ErrorLevel%   
  ::  rar.exe
  rem      
  ::         
  if %ErrorLevel%==0 (goto move) else (set result=" - %ErrorLevel%")
  goto log
  
  :move
  rem      
  rem %date%   ( )
  rem       
  move %CurrentDisk%\%date%.rar %backup%
  rem        
  if exist %backup%\%date%.rar (set result="  ") else (set result="  ")
  goto log
  
  