22 lines
429 B
C
22 lines
429 B
C
Global thing_to_examine;
|
|
|
|
[ UnknownVerb word thing n i;
|
|
objectloop ( thing provides name) {
|
|
if (TestScope(thing, player)) {
|
|
n = thing.#name / WORDSIZE;
|
|
for(i = 0 : i < n : i++)
|
|
if (thing.&name-->i == word) {
|
|
thing_to_examine = thing;
|
|
return 'unknown';
|
|
}
|
|
};
|
|
};
|
|
rfalse;
|
|
];
|
|
|
|
[ ExamineObjectSub;
|
|
<< Examine (thing_to_examine) >>;
|
|
];
|
|
|
|
verb 'unknown' * -> ExamineObject;
|