anchor.diff:  set command=%~1
   call :outfile "%~2" "%projectpath%\xml\%pcode%-%count%-command2file.xml"
   set commandpath=%~3
  -set startdir=%cd%
  -set dive=
  +rem the following is used for the feed back but not for the actual command
   set curcommand=%command:'="% ^^^> "%outfile%"
   call :before
   set curcommand=%command:'="%
   if "%commandpath%" neq "" (
  +  set startdir=%cd%
     set drive=%commandpath:~0,2%
     %drive%
     cd "%commandpath%"
  
positive.code: 
  
  :appendtofile
  :: Description: Func to append text to a file
  :: Class: command
  :: Optional predefined variables:
  :: newfile
  
negative.code: goto :eof
  
  :echoon
  :: Description: turns on echo for debugging
  @echo on
  goto :eof
  
  :echooff
  :: Description: turns off echo after debugging
  @echo off
  goto :eof
  
  