Mystery "routine"

Any help on actually how to achieve this is welcome!