|
Routines |
| Prev: 36600 | Up: Map | Next: 36769 |
|
Describe the object named in the command.
|
||||
| ActionExamine | 36627 | CALL Parser_ValidateDirectObject | Return if the command does not name an object. Jump to ActionExamine_Step1 when exactly one noun was named. | |
| 36630 | RET C | |||
| 36631 | CP 1 | |||
| 36633 | JR Z,ActionExamine_Step1 | |||
| 36635 | LD HL,30922 | Print "You can only examine one object at a time." and start a new line. | ||
| 36638 | JR ActionExamine_Loop2 | |||
| ActionExamine_Loop1 | 36640 | LD HL,30908 | Print "Don't bother." and start a new line. | |
| ActionExamine_Loop2 | 36643 | CALL PrintStringAndANewline | ||
| 36646 | RET | Return. | ||
| ActionExamine_Step1 | 36647 | LD HL,35136 | Jump to ActionExamine_Step2 unless the command matches the phrase at Table_PhraseLists. | |
| 36650 | CALL Parser_AdvanceToSeparator | |||
| 36653 | JR NZ,ActionExamine_Step2 | |||
| 36655 | LD HL,30965 | Print "There is a button on the unit. It is capable of transmitting a short range signal." and start a new line. | ||
| 36658 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step2 | 36660 | LD HL,35138 | Jump to ActionExamine_Step3 unless the command matches the phrase at 35138. | |
| 36663 | CALL Parser_AdvanceToSeparator | |||
| 36666 | JR NZ,ActionExamine_Step3 | |||
| 36668 | LD HL,31048 | Print "This is highly poisonous, even to the touch." and start a new line. | ||
| 36671 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step3 | 36673 | LD HL,35143 | Jump to ActionExamine_Step4 unless the command matches the phrase at 35143. | |
| 36676 | CALL Parser_AdvanceToSeparator | |||
| 36679 | JR NZ,ActionExamine_Step4 | |||
| 36681 | LD HL,31093 | Print "The charge has an electronic receiver fitted." and start a new line. | ||
| 36684 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step4 | 36686 | LD HL,35145 | Jump to ActionExamine_Step5 unless the command matches the phrase at 35145 (A pile of rocks. (56)). | |
| 36689 | CALL Parser_AdvanceToSeparator | |||
| 36692 | JR NZ,ActionExamine_Step5 | |||
| 36694 | LD A,56 | |||
| 36696 | CALL IsObjectInCurrentRoom | |||
| 36699 | JR NZ,ActionExamine_Step5 | |||
| 36701 | LD HL,31139 | Print "There appears to be an exit behind the rocks." and start a new line. | ||
| 36704 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step5 | 36706 | LD HL,35145 | Jump to ActionExamine_Step6 unless the command matches the phrase at 35145 (A pile of rocks at the eastern end. (25)). | |
| 36709 | CALL Parser_AdvanceToSeparator | |||
| 36712 | JR NZ,ActionExamine_Step6 | |||
| 36714 | LD A,25 | |||
| 36716 | CALL IsObjectInCurrentRoom | |||
| 36719 | JR NZ,ActionExamine_Step6 | |||
| 36721 | LD HL,31298 | Print "They are too far away." and start a new line. | ||
| 36724 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step6 | 36726 | LD HL,35147 | Jump to ActionExamine_Step7 unless the command matches the phrase at 35147. | |
| 36729 | CALL Parser_AdvanceToSeparator | |||
| 36732 | JR NZ,ActionExamine_Step7 | |||
| 36734 | LD HL,31185 | Print "This appears to be a teleport." and start a new line. | ||
| 36737 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step7 | 36739 | LD HL,35159 | Jump to ActionExamine_Step8 unless the command matches the phrase at 35159. | |
| 36742 | CALL Parser_AdvanceToSeparator | |||
| 36745 | JR NZ,ActionExamine_Step8 | |||
| 36747 | LD HL,31216 | Print "The word 'OLD' has been scratched on the wall." and start a new line. | ||
| 36750 | JR ActionExamine_Loop2 | |||
| ActionExamine_Step8 | 36752 | LD HL,35182 | Jump to ActionExamine_Step9 unless the command matches the phrase at 35182. | |
| 36755 | CALL Parser_AdvanceToSeparator | |||
| 36758 | JR NZ,ActionExamine_Step9 | |||
| 36760 | LD HL,33933 | Print "It appears to be an ultrasonic key." and start a new line. | ||
| 36763 | JP ActionExamine_Loop2 | |||
| ActionExamine_Step9 | 36766 | JP ActionExamine_Loop1 | Continue at ActionExamine_Loop1 to say there is nothing worth a closer look. | |
| Prev: 36600 | Up: Map | Next: 36769 |