@method GOFProcessClass, MSG_GOF_PROCESS_FIND_GEODE {
/*
* acrGeodeName - Name of geode to find.
* cGeodeNameLength - Length of geode name.
* acrGeodeHandle - Geode handle as a string.
*/
DosDotFileName acrGeodeName;
word cGeodeNameLength;
char acrGeodeHandle[11];
cGeodeNameLength = @call GOFGeodeNameText::
MSG_VIS_TEXT_GET_ALL_PTR( acrGeodeName );
ghGeode_g = GeodeFind( acrGeodeName, cGeodeNameLength, 0, 0 );
UtilHex32ToAscii( acrGeodeHandle, ghGeode_g, UHTAF_NULL_TERMINATE );
@call GOFGeodeHandleText::MSG_VIS_TEXT_REPLACE_ALL_PTR(
acrGeodeHandle, 0 );
} /* MSG_GOF_PROCESS_FIND_GEODE */
The rest of the program is just UI.
Nathan