Quote:
Originally Posted by Dean
Sorry man, HtW should only be played on a teletype... And I hope you DID write your own missile guidance software based on that code, effectivly neutalizing your recently upgraded tank... 
|
We ran it on a terminal emulator on a Sun Sparc Station (the slow-ass orginal ones) cluster.
I happened to find my old website from school, so I'm uploading the write up here:
http://www.seccs.org/members/sperry/...480/index.html
Here's a snippet of code, just to show you how rediculous LISP is as a language:
Code:
;;-------------------------------
;; Function KILL
;;
;; Kills the specified agent
;;
(defun kill (agent-to-kill)
(format t "~%Trying to kill: ~A" agent-to-kill)
(cond
((eq agent-to-kill explorer-agent::explorer)
(setf *wumpus-goal-met* t)
)
((eq agent-to-kill wumpus-agent::wumpus)
(format t "~&The Wumpus has been killed!")
(setf wumpus-agent::wumpus-is-dead t)
)
)
)