Sounds like you didn't get my e-mails...
Okay heres the functions in GetResource.DLL :
?ASCIIToWide@@YAKPAD@Z
?Constructor@@YAXXZ
?Destructor@@YAXXZ
?ReceiveCoreDataPtr@@YAXPAX@Z
?_ASCIIToWide@@YAPAGPAD@Z
?_GetComputerName@@YAKKK@Z
?_GetDiskFreeSpace@@YAKPADK@Z
?_GetDriveLetters@@YAKKK@Z
?_GetDriveType@@YAKPAD@Z
?_GetProgramVersion@@YAKKPAD@Z
?_GetSystemInfo@@YAKK@Z
?_GetTempFileName@@YAHPAD0KK@Z
?_GetTempPath@@YAKKK@Z
?_GetUserName@@YAKKK@Z
?__DECB@@YAXKH@Z
?__DECB@@YAXKHK@Z
?__DECL@@YAXKH@Z
?__DECL@@YAXKHH@Z
?__DECS@@YAXKH@Z
?__DECS@@YAXKHK@Z
?__INCB@@YAXKH@Z
?__INCB@@YAXKHK@Z
?__INCL@@YAXKH@Z
?__INCL@@YAXKHH@Z
?__INCS@@YAXKH@Z
?__INCS@@YAXKHK@Z
?__calloc@@YAKK@Z
?__peekB@@YAKKH@Z
?__peekD@@YAKKH@Z
?__peekDF@@YANKH@Z
?__peekDL@@YA_JKH@Z
?__peekL@@YAHKH@Z
?__peekS@@YAKKH@Z
?__peekString@@YAKKKKKH@Z
?__pokeB@@YAXKHK@Z
?__pokeD@@YAXKHM@Z
?__pokeDF@@YAXKHN@Z
?__pokeDL@@YAXKH_J@Z
?__pokeL@@YAXKHH@Z
?__pokeS@@YAXKHK@Z
?__pokeString@@YAXKHPADHH@Z
?getStringResource@@YAHKKPADH@Z
Speech :
?ASCIIToWide@@YAKPAD@Z
?Constructor@@YAXXZ
?DeInitSpeech@@YAKXZ
?Destructor@@YAXXZ
?InitSpeech@@YAKXZ
?ReceiveCoreDataPtr@@YAXPAX@Z
?_ASCIIToWide@@YAPAGPAD@Z
?__DECB@@YAXKH@Z
?__DECB@@YAXKHK@Z
?__DECL@@YAXKH@Z
?__DECL@@YAXKHH@Z
?__DECS@@YAXKH@Z
?__DECS@@YAXKHK@Z
?__INCB@@YAXKH@Z
?__INCB@@YAXKHK@Z
?__INCL@@YAXKH@Z
?__INCL@@YAXKHH@Z
?__INCS@@YAXKH@Z
?__INCS@@YAXKHK@Z
?__calloc@@YAKK@Z
?__peekB@@YAKKH@Z
?__peekD@@YAKKH@Z
?__peekDF@@YANKH@Z
?__peekDL@@YA_JKH@Z
?__peekL@@YAHKH@Z
?__peekS@@YAKKH@Z
?__peekString@@YAKKKKKH@Z
?__pokeB@@YAXKHK@Z
?__pokeD@@YAXKHM@Z
?__pokeDF@@YAXKHN@Z
?__pokeDL@@YAXKH_J@Z
?__pokeL@@YAXKHH@Z
?__pokeS@@YAXKHK@Z
?__pokeString@@YAXKHPADHH@Z
?getRate@@YAKK@Z
?getVoices@@YAKKK@Z
?getVolume@@YAKK@Z
?isSpeaking@@YAKK@Z
?pauseSpeech@@YAKXZ
?resumeSpeech@@YAKXZ
?say@@YAKPADH@Z
?setRate@@YAKJ@Z
?setVoice@@YAKK@Z
?setVoice@@YAKPAD@Z
?setVolume@@YAKH@Z
?textToWAV@@YAKPAD0H@Z
?waitUntilDone@@YAKJ@Z
To use these, you'll just need to modify parts of the following example :
load dll "i:\speech.dll",1:REM Change the i:\ or remove it if the DLL is in
the current directory
x=call dll (1,"?InitSpeech@@YAKXZ")
x=call dll (1,"?say@@YAKPADH@Z","Hello",0)
x=call dll (1,"?DeInitSpeech@@YAKXZ")
delete dll 1
wait key
end
