It looks like it could be a video from Xerox PARC in 1968. Well integrated and useful and current and old and clunky - what steampunk would look like if it was software.

(Why didn't he ' '.join(map(char-to-morse, string))? He had to download a string split library?)

(DEFUN COINCIDENCE-THAT-CL-STANDS-FOR-BOTH-COMMON-LISP-AND-CAPS-LOCKP (...))