I'm trying to make a Matrix-style code scroll. I use a half screen text window (for the command line) and I'd like to make it look like the Matrix code when I walk away from my desk (either by a manual start or an idle reactor).
Here's what I have so far as a test (proof of concept, the characters I used are just placeholders for now):
(defun c:Matrix ()
(setq Line1 "\n ,< ^>~ #\|~~ * * *")
(setq Line2 "\n ~~ * * * 8? @!")
(setq Line3 "\n 8? @! ,< ^>~ #\|")
(repeat 5000
(princ Line1)
(princ Line2)
(princ Line3)
)
(princ)
)
Problems: Runs too fast and is over in 2 seconds.
Ready...
Set...
Go!!!