Cycle Safari Windows

cycle.as

tell application "Safari"
	set theWindows to windows
	set win1 to item 1 of theWindows
	set win2 to item 2 of theWindows
	repeat
		tell win1
			set index to 1
			set visible to false
			set visible to true
		end tell
		delay 15
		tell win2
			set index to 1
			set visible to false
			set visible to true
		end tell
		delay 15
	end repeat
end tell