$ordner = "C:\PDFs\"
$archiv = "C:\druck\"
$foxit = "C:\Programme\Foxit Software\Foxit Reader\Foxit Reader.exe"
$drucker1 = "Foxit Reader PDF Printer"
$drucker2 = "HP LaserJet 4000 Series PCL 5 (Kopie 2)"

While 1
  Sleep(1000)
  $file = FileFindFirstFile($ordner & "*.pdf")
  If $file <> -1 Then Print()
  FileClose($file)
WEnd

Func Print()
While 1
  $pdffile = FileFindNextFile($file)
  $neuname = @YEAR & @MON & @MDAY & @HOUR & @MIN & @SEC & @MSEC
  If @error Then ExitLoop
    FileMove($ordner & $pdffile, $archiv & $neuname & ".pdf")
    While 1
      Sleep(100)
      If FileExists($archiv & $neuname & ".pdf") Then
    ExitLoop
  EndIf
WEnd

RunWait('"' & $foxit & '" /t "' & $archiv & $neuname & '.pdf" $Foxit Reader PDF Printer')
RunWait('"' & $foxit & '" /t "' & $archiv & $neuname & '.pdf" $HP LaserJet 4000 Series PCL 5 (Kopie 2)')
WEnd
EndFunc ;==>Print