No modification of the library sources is necessary. Do something like
this:
[ PlayerParseName;
if (NextWord() == 'john') return 1;
return 0;
];
[ Initialise;
...
selfobj.parse_name = #r$PlayerParseName;
];
-- Gareth Rees