open "BB4WMAPM.DLL" for DLL as #mapm
struct MAPMerror, code as long
MAPMresult$ = SPACE$(65536) + CHR$(0)
A$ = "1234567890123456789012345678901234567890123456789012345678901234567890"
B$ = "255"
CALLDLL #mapm, "mapm_integer_divide", MAPMerror as struct, MAPMresult$ as ptr, _
A$ as ptr, B$ as ptr, -1 as long, res as long
CALLDLL #mapm, "mapm_to_integer_string", MAPMerror as struct, MAPMresult$ as ptr, _
MAPMresult$ as ptr, res as long
PRINT LEFT$(MAPMresult$, INSTR(MAPMresult$, CHR$(0)))
CLOSE #mapm