anchor.diff:  set Result="    "
   goto Log
   
  +rem   . 
   :Error
   set Error=1
   
  -:Log
   rem      .
   ::  %DATE%   ( ).
   ::  %TIME%   ( ).
  
positive.code:  )
  
  rem      
  ::     
  ::  /a /y    
  ::    
  copy /y %Log_File% %Backup%
  
  rem   .
  
negative.code: ::      
  ::    .
  set Email_To=sysadmin@yandex.ru
  rem --------------------------------------
  
  rem  
  
  rem  
  rem SMTP 
  set SMTP_Server=smtp.yandex.ru
  rem  
  set SMTP_Port=465
  rem    ( email  @yandex.ru).
  ::      ('echo %Email_Sender%')
  ::    (tokens=1).  (delims=@).
  for /f "tokens=1 delims=@" %%i in ('echo %Email_Sender%') do 
  	(set Email_Login=%%i)
  ::    ( )
  set Sender_Name=" %computername%"
  
  rem     
  ::  ().
  set Path_Script="%~dp0"
  rem   
  set Error=0
  rem   (   ).
  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)
  