-- with everyone's help (including Claude), this works
-- Change the display names to conform to your configuration of coures.
---
tell application "System Settings"
activate
delay 1
reveal pane id "com.apple.Wallpaper-Settings.extension"
delay 2
end tell
tell application "System Events"
tell process "System Settings"
-- Click the Shuffle popup button
click pop up button "Shuffle" of group 1 of scroll area 1 of group 1 of group 3 of splitter group 1 of group 1 of window 1
delay 0.5
-- Select your desired interval (change this line to your preference)
click menu item "Every 15 Minutes" of menu 1 of pop up button "Shuffle" of group 1 of scroll area 1 of group 1 of group 3 of splitter group 1 of group 1 of window 1
--
delay 0.5
click pop up button 1 of group 1 of group 3 of splitter group 1 of group 1 of window 1
delay 0.5
keystroke "DELL S3225QS"
delay 0.5
key code 36 -- return
delay 0.5
click pop up button 1 of group 1 of group 3 of splitter group 1 of group 1 of window 1
delay 0.5
keystroke "SE2717H/HX"
delay 0.5
key code 36 -- return
delay 0.5
end tell
end tell
delay 1
tell application "System Settings" to quit
```