version 1.18, 1998/04/12 21:49:12
|
version 1.19, 1998/07/08 16:47:31
|
Line 96 create description-buffer 4096 chars all
|
Line 96 create description-buffer 4096 chars all
|
create |
create |
last @ name>string skip-prefix 2, \ name |
last @ name>string skip-prefix 2, \ name |
[char] ) parse save-mem 2, \ stack-effect |
[char] ) parse save-mem 2, \ stack-effect |
bl parse-word condition-wordset 2, \ wordset |
bl sword condition-wordset 2, \ wordset |
bl parse-word dup \ pronounciation |
bl sword dup \ pronounciation |
if |
if |
condition-pronounciation |
condition-pronounciation |
else |
else |