Mark,
Here's a set of routines I use to handle calls in and out of various API functions:
function ToWord( pnNumber )
nMSB = int( pnNumber / 256 )
nLSB = pnNumber % 256
return chr( nLSB ) + chr( nMSB )
function ToLong( pnNumber )
nMSW = int( pnNumber / 65536 )
nLSW = pnNumber % 65536
return ToWord( nLSW ) + ToWord( nMSW )
function FromWord( pcBuffer )
return asc( substr( pcBuffer, 2, 1 ) ) * 256 + asc( left( pcBuffer, 1 ) )
function FromLong( pcBuffer )
return FromWord( substr( pcBuffer, 3, 2 ) ) * 65536 + FromWord( left( pcBuffer, 2 ) )
If you are using the Long functions a lot (thousands of times in a loop), significant perfomance can be gained by "inlining" the Word functions.
>The real problem is how would I convert numbers to 4-byte integers. An example is converting a value of 22030 to be 00 00 56 0E.
