set Downloads to "Macintosh HD:Users:[User]:Downloads" 
set Downloads_AnzahlObjekte to (count (list folder Downloads)) 
set Schreibtisch to "Macintosh HD:Users:[User]:Desktop" 
if Downloads_AnzahlObjekte is not 2 then 
  tell application "Finder" 
    move (every file of folder Downloads whose name extension does not contain "download") to folder Schreibtisch 
  end tell 
  if Downloads_AnzahlObjekte = 2 then 
    beep 2 
    display dialog "Safari-Downloads wurden bewegt." buttons {"OK"} default button {"OK"} with icon ¬ 
POSIX file "Users/[User]/Library/Mobile Documents/com~apple~CloudDocs/Icon_Downloads bewegen-3.png" 
  end if 
else 
  tell application "System Events" 
    quit script 
  end tell 
end if 

if Downloads_AnzahlObjekte is not 2 then 

set sourceFolder to (choose folder) as Unicode text 
 
tell application "System Events" 
  set allNames to name of every file of folder sourceFolder 
end tell 

set Downloads to "Macintosh HD:Users:[User]:Downloads" as Unicode text 
tell application "System Events" 
	set Downloads_AnzahlObjekte to name of every item in folder Downloads whose name does not start with "." and name extension does not contain "download" 
end tell 

if Downloads_AnzahlObjekte is not {} then 
	tell application "Finder" 
		move every item of Downloads_AnzahlObjekte to folder Schreibtisch 
	end tell 
... 
end if 

set Downloads to ((path to "cusr") as Unicode text) & "Downloads" 
set Schreibtisch to ((path to "cusr") as Unicode text) & "Desktop" 

set Downloads to ((path to "cusr") as Unicode text) & "Downloads" 
set Schreibtisch to ((path to "cusr") as Unicode text) & "Desktop" 
 
tell application "Finder" 
  try 
    move (every file of folder Downloads whose name extension ¬ 
      does not contain "download") to Schreibtisch with replacing 
  end try 
end tell 

set Downloads to path to downloads folder 

set Schreibtisch to (path to desktop folder as Unicode text) & "Test" 

set Downloads to ((path to "cusr") as Unicode text) & "Downloads" 
tell application "System Events" 
	set Downloads_AnzahlObjekte to name of every item in folder Downloads whose name does not start with "." and name extension does not contain "download" 
end tell 
set Schreibtisch to ((path to "cusr") as Unicode text) & "Desktop" 
if Downloads_AnzahlObjekte is not {} then 
	move (every item of Downloads_AnzahlObjekte) to Schreibtisch with replacing 
	beep 2 
	display dialog "Ihre Safari-Downloads sind abgeschlossen und werden auf Ihren Schreibtisch bewegt." buttons {"OK"} default button {"OK"} 
else 
	tell application "System Events" 
		quit script 
	end tell 
end if 

set Zielordner to (path to desktop folder as Unicode text) & "alpha" 

set Zielordner to (path to desktop folder as Unicode text) & "A" & "B" & "C" 

... & "A" & ":B" & ":C" 

... & "A:B:C"