Tamagotchi emulator: Difference between revisions
Content added Content deleted
Cyril Nocton (talk | contribs) No edit summary |
Cyril Nocton (talk | contribs) |
||
| Line 48: | Line 48: | ||
This is a very simple implementation. |
This is a very simple implementation. |
||
<lang lisp> |
<lang lisp>; 22.07.16 |
||
; 22.07.16 |
|||
(defconstant +length-of-day+ 60) ; seconds |
(defconstant +length-of-day+ 60) ; seconds |
||
| Line 88: | Line 87: | ||
(need play +3)) |
(need play +3)) |
||
(sleep 1)) |
(sleep 1)) |
||
(format t "~%🎃 Rest in peace Yōkai ~a~%" end))) |
(format t "~%🎃 Rest in peace Yōkai ~a~%" end)))</lang> |
||
</lang> |
|||
4. Execution |
4. Execution |
||