Mercurial > emacs
comparison lisp/play/animate.el @ 38708:456acc0ad1ee
Re-insert a reference to re-inserted function animate-birthday-present.
author | Pavel Janík <Pavel@Janik.cz> |
---|---|
date | Mon, 06 Aug 2001 21:29:16 +0000 |
parents | dc644b0090f2 |
children | 255503bac5c2 |
comparison
equal
deleted
inserted
replaced
38707:de39c1d96123 | 38708:456acc0ad1ee |
---|---|
25 ;;; Commentary: | 25 ;;; Commentary: |
26 | 26 |
27 ;; (animate-string STRING VPOS &optional HPOS) | 27 ;; (animate-string STRING VPOS &optional HPOS) |
28 ;; makes the string STRING appear starting at VPOS, HPOS | 28 ;; makes the string STRING appear starting at VPOS, HPOS |
29 ;; by having each letter swoop into place from random starting position. | 29 ;; by having each letter swoop into place from random starting position. |
30 | |
31 ;; animate-birthday-present was the first application of this program. | |
30 | 32 |
31 ;;; Code: | 33 ;;; Code: |
32 | 34 |
33 ;;; STRING is the string to be displayed, | 35 ;;; STRING is the string to be displayed, |
34 ;;; and DEST-X, DEST-Y say where on the screen | 36 ;;; and DEST-X, DEST-Y say where on the screen |
163 (animate-string "Please bring back" 17 30) | 165 (animate-string "Please bring back" 17 30) |
164 (animate-string "my sunshine" 18 34) | 166 (animate-string "my sunshine" 18 34) |
165 (animate-string "to stay!" 19 34)) | 167 (animate-string "to stay!" 19 34)) |
166 | 168 |
167 ;;; animate.el ends here | 169 ;;; animate.el ends here |
168 |