(setup 'drkp) ;Value: ready (ask screen 'deity-mode #f) ;Value: #f (ask me 'look-around) You are in lobby-7 Your are not holding anything. There is no stuff in the room. There are no other people around you. The exits are in directions: west east ;Value: ok (ask me 'go 'east) drkp moves from lobby-7 to lobby-10 At lobby-10 grendel says -- Hi drkp At lobby-10 grendel says -- Prepare to suffer, drkp ! At lobby-10 drkp says -- Ouch! 3 hits is more than I want! At lobby-10 chuck-vest says -- Hi grendel drkp --- the-clock Tick 0 --- ;Value: #t (ask me 'go 'up) drkp moves from lobby-10 to 10-250 --- the-clock Tick 1 --- ;Value: #t (ask me 'look-around) You are in 10-250 Your are not holding anything. You see stuff in the room: recitation-problem problem-set blackboard There are no other people around you. The exits are in directions: up down ;Value: ok (ask me 'get 'problem-set) At 10-250 drkp says -- I take problem-set from 10-250 ;Value: #[unspecified-return-value] (ask me 'go 'up) drkp moves from 10-250 to barker-library --- the-clock Tick 2 --- ;Value: #t (ask me 'toss 'problem-set) At barker-library drkp says -- I drop problem-set at barker-library ;Value: #[compound-procedure 6] (ask me 'look-around) You are in barker-library Your are not holding anything. You see stuff in the room: problem-set engineering-book There are no other people around you. The exits are in directions: down ;Value: ok (run-clock 10) --- the-clock Tick 3 --- --- the-clock Tick 4 --- --- the-clock Tick 5 --- --- the-clock Tick 6 --- --- the-clock Tick 7 --- --- the-clock Tick 8 --- --- the-clock Tick 9 --- At barker-library course-6-frosh says -- Hi drkp course-6-frosh moves from barker-library to 10-250 --- the-clock Tick 10 --- --- the-clock Tick 11 --- --- the-clock Tick 12 --- ;Value: done (run-clock 10) --- the-clock Tick 13 --- --- the-clock Tick 14 --- --- the-clock Tick 15 --- --- the-clock Tick 16 --- --- the-clock Tick 17 --- At barker-library alyssa-hacker says -- Hi drkp alyssa-hacker moves from barker-library to 10-250 --- the-clock Tick 18 --- --- the-clock Tick 19 --- --- the-clock Tick 20 --- --- the-clock Tick 21 --- --- the-clock Tick 22 --- ;Value: done (run-clock 10) --- the-clock Tick 23 --- --- the-clock Tick 24 --- --- the-clock Tick 25 --- --- the-clock Tick 26 --- An earth-shattering, soul-piercing scream is heard... --- the-clock Tick 27 --- --- the-clock Tick 28 --- --- the-clock Tick 29 --- --- the-clock Tick 30 --- An earth-shattering, soul-piercing scream is heard... --- the-clock Tick 31 --- --- the-clock Tick 32 --- ;Value: done (map (lambda (x) (ask x 'name)) (ask heaven 'things)) ;Value: (course-6-frosh chuck-vest)