procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Changed Dunnet so that if a lamp is in the room that would otherwise be dark, the player will not

Browse source 
be eaten by a grue.
This commit is contained in:
Ron Schnell 2014-06-14 16:57:34 -04:00
parent f9d80c5110
commit 799d2f3d87
2 changed files with 7 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
lisp/ChangeLog
View file

@ -1,3 +1,6 @@
2014-06-14 Ron Schnell <ronnie@driver-aces.com>
* play/dunnet.el If a lamp is in the room, you won't be eaten by a grue.
2014-06-13 Glenn Morris <rgm@gnu.org>
* Makefile.in ($(lisp)/cus-load.el, $(lisp)/finder-inf.el)

6
lisp/play/dunnet.el
View file

@ -100,7 +100,8 @@
(defun dun-describe-room (room)
(if (and (not (member (abs room) dun-light-rooms))
(not (member obj-lamp dun-inventory)))
(not (member obj-lamp dun-inventory))
(not (member obj-lamp (nth dun-current-room dun-room-objects))))
(dun-mprincl "It is pitch dark. You are likely to be eaten by a grue.")
(dun-mprincl (cadr (nth (abs room) dun-rooms)))
(if (and (and (or (member room dun-visited)
@ -615,7 +616,8 @@ just try dropping it.")
(defun dun-move (dir)
(if (and (not (member dun-current-room dun-light-rooms))
(not (member obj-lamp dun-inventory)))
(not (member obj-lamp dun-inventory))
(not (member obj-lamp (nth dun-current-room dun-room-objects))))
(progn
(dun-mprinc
"You trip over a grue and fall into a pit and break every bone in your