(defun zzzz (z)
(list (subseq (reverse z) 0 7) (subseq z 0 8)(write (string-upcase z))(write (string-upcase (reverse z)))
))
(zzzz "“Delve into the untamed beauty of existence, where the purest joy isn’t crafted by human connections, but rather discovered in the embrace of nature’s untouched splendor. It’s in the whispered secrets of the wind, the symphony of rustling leaves, and the dance of sunlight painting the world with hues only seen in dreams. Beyond the confines of human bonds lies a boundless realm where solace, awe, and an inexplicable connection to the universe await—revealing that the most profound joy often blossoms in the silent companionship of untamed landscapes, where the heart finds its kinship in the pulse of nature’s eternal rhythm.”" )