document.write('
Data hosted with ♥ by Pastebin.com - Download Raw - See Original
  1. object coffin "coffin"
  2. {
  3. article "a"
  4. noun "coffin"
  5. is openable open enterable container
  6. before
  7. {
  8. xobject DoPutIn
  9. {
  10. if player in self and self is not open
  11. {
  12. Perform(&DoDrop, object)
  13. }
  14. else
  15. return false
  16. }
  17. object DoLookIn
  18. {
  19. if player in self and self is not open
  20. {
  21. Perform(&DoLookAround)
  22. }
  23. else
  24. return false
  25. }
  26. }
  27. after
  28. {
  29. object DoOpen,DoClose
  30. {
  31. if player in self
  32. {
  33. if verbroutine = &DoClose and location = self
  34. return false ! so location.after doesn't run this again
  35. if self is not open
  36. {
  37. location = self
  38. if not FindLight(location)
  39. return false
  40. "Closed."
  41. }
  42. else
  43. {
  44. "Opened."
  45. location = parent(self)
  46. }
  47. if FindLight(location)
  48. Perform(&DoLookAround)
  49. return true
  50. }
  51. else
  52. return false
  53. }
  54. }
  55. in STARTLOCATION
  56. capacity 100
  57. }
');