Error
There was a problem with your SQL connection - Please contact the administrator
There was a problem with your SQL connection - Please contact the administrator
Prototype
CopyBuffer(r1, r2, len)
Description
Copy buffer address r2 to r1, len bytes (max of 256)
Return
Nothing
Code Example
The following code example uses the CopyBuffer function.
The SMK900.evi file used for this example can be downloaded at the bottom of this page.
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 75 76 | /* Example Code* CopyBuffer** get buffer indexes r1, r2 and len* set buffer in memory* copy len bytes from buffer started index r2 to buffer[r1]* if params used * return result of copy on len*8 bits* else* return 0x00 (conv pas ok) or 0x01 (conv ok)** example VMExecuteCmd:* cmd: |r1 |r2 |len |buffer* 0xfb 0x0e 0x00 0x0c 0x00 0x0e [0x?? 0x?? 0x?? = macAdress] 0x00 0x00 0x02 0x00 0x03 0x90 0x78 0x56 0x34 0x12* rsp: 0xfb 0x08 0x00 0x2d 0x00 0xe1 0x1e 0x56 0x34 0x12*/#include "SMK900.evi"#define SENSORCODE 0x01function exec_aircmd(){ local rxLen; local useParams; local idx1,idx2,len; local i; local result; rxLen=GetAirBuf(0, 0, 20); if(rxLen>=10){ // 1 byte for paketID + 9 bytes of payload (5 bytes for indexes + len and minimum 4 bytes for buffer) useParams=true; idx1=GetBuffer_16(1); idx2=GetBuffer_16(3); len=GetBuffer_U8(5); for(i=6;i<rxLen;i++){ SetBuffer(i-6,GetBuffer_S8(i),1); } }else{ useParams=false; idx1=0; idx2=2; len=2; SetBuffer_16(0,0x5678); SetBuffer_16(2,0x1234); } CopyBuffer(idx1,idx2,len); if(useParams){ for(i=0;i<len;i++){ SetBuffer(i,GetBuffer_S8(idx1+i),1); } Send(len); }else{ if(GetBuffer_16(idx1)==0x1234){ result = 1; }else{ result = 0; } SetBuffer(0,result,1); Send(1); } }function main() { local execType; execType = GetExecType(); if(execType==MESHEXECTYPE_AIRCMD_bm){ exec_aircmd(); }} |