There was a problem with your SQL connection - Please contact the administrator
Prototype
ConvertI32ToFloat (r, exp10)
Description
Inplace cast of int32 to a float. A scaling of 10^exp10 is applued to the produced value
Return
Nothing
Code Example
The following code example uses the ConvertI32ToFloat function.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 | /* Example Code * ConvertI32ToFloat * tools Converter: https://www.h-schmidt.net/FloatConverter/IEEE754.html * * get buffer index r and exp10 * set buffer in memory * convert buffer[r] from I32 to Float * if params used * return result of convert on 32 bits * else * return 0x00 (conv pas ok) or 0x01 (conv ok) * * example VMExecuteCmd: * cmd: |r |exp10 |buffer * 0xfb 0x0e 0x00 0x0c 0x00 0x0e [0x?? 0x?? 0x?? = macAdress] 0x00 0x00 0xff 0xff 0xf6 0xff 0xff 0xff * rsp: 0xfb 0x08 0x00 0x2d 0x00 0xe1 0x1e 0x00 0x00 0x80 0xbf */ #include "SMK900.evi" #define SENSORCODE 0x01 function exec_aircmd(){ local rxLen; local useParams; local idx,exp; local i; local result; rxLen=GetAirBuf(0, 0, 20); if (rxLen>=9){ // 1 byte for paketID + 8 bytes of payload (4 bytes for index + exp10 and minimum 4 bytes for buffer) useParams= true ; idx=GetBuffer_16(1); exp=GetBuffer_16(3); for (i=5;i<rxLen;i++){ SetBuffer(i-5,GetBuffer_S8(i),1); } } else { useParams= false ; idx=0; exp=-1; SetBuffer_16(0,0xfff6); SetBuffer_16(2,0xffff); } ConvertI32ToFloat(idx,exp); if (useParams){ SetBuffer_16(0,GetBuffer_16(idx)); SetBuffer_16(2,GetBuffer_16(idx+2)); Send(4); } else { if (GetBuffer_16(idx+2)==0xbf80&&GetBuffer_16(idx)==0x0000){ result = 1; } else { result = 0; } SetBuffer(0,result,1); Send(1); } } function main() { local execType; execType = GetExecType(); if (execType==MESHEXECTYPE_AIRCMD_bm){ exec_aircmd(); } } |