set filepath to POSIX file "/Users/tjcarter/keytext.txt"
set contlines to paragraphs of (read (filepath as alias))
tell application "Keynote"
	launch
	-- activate
	set allthemes to name of appThemes
	-- Not sure how to select my theme directly
	set usetheme to choose from list allthemes
	if usetheme is false then return
	set usetheme to usetheme as Unicode text
	-- other slide size...
	-- {800, 600},{1024,768},{1280,720},{1680,1050},{1920,1080},custom...
	set themeprops to {theme:usetheme, slideSize:{1024, 768}}
	set newslideshow to make new slideshow at end of slideshows with data themeprops
	repeat with contline in contlines
		tell newslideshow
			set newslide to make new slide
			set master of current slide to master slide "Title Center"
			tell current slide
				set title to contline
			end tell
		end tell
	end repeat
end tell