on startUp
	put listFolderDeep("file:///Late Show/Programming/Projekte/Joker/scr/")
end startUp

function listFolderDeep fPath
	put the files of url fPath into fileList
	repeat with x = 1 to the number of lines of fileList
		put line x of fileList into currLine
		put fPath & currLine into line x of fileList
		if char length(currLine) of currLine = "/" then
			put fileList &cr& listFolderDeep(fPath & currLine) into fileList
		end if
	end repeat
	return fileList
end listFolderDeep