Mindboards

Code: Select all

#define __sendResponseNumber(_queue, _val, _result) \
  acquire __MWMutex \
  add __MWArgs.QueueID, _queue, 10 \
  mov __SRNTmpVal, _val \
  flatten __MWArgs.Message, __SRNTmpVal \
  syscall MessageWrite, __MWArgs \
  mov _result, __MWArgs.Result \
  release __MWMutex

#define __sendResponseString(_queue, _msg, _result) \
  acquire __MWMutex \
  add __MWArgs.QueueID, _queue, 10 \
  mov __MWArgs.Message, _msg \
  syscall MessageWrite, __MWArgs \
  mov _result, __MWArgs.Result \
  release __MWMutex

Code: Select all

#define SendResponseFloat(_queue, _val) \
  asm { \
  acquire __MWMutex \
  add __MWArgs.QueueID, _queue, 10 \
  flatten __MWArgs.Message, _val \
  syscall MessageWrite, __MWArgs \
  mov __RETVAL__, __MWArgs.Result \
  release __MWMutex \
}

Code: Select all

inline char SendResponseFloat(byte queue, float val)
{
  string tmp = FlattenVar(val);
  return SendResponseString(queue, tmp);
}

Code: Select all

char SendResponseFloat(byte queue, float val)
{
     byte _local_buffer[5];
     byte _local_queue = queue + 10;

     asm
     {
        flatten _local_buffer, val
     }
     _local_buffer[4] = 0;
     return(SendMessage (_local_queue, _local_buffer));
}

char ReceiveRemoteFloat(byte queue, bool clear, float & val)
{
     byte _local_buffer[5];
     bool bErr;
     float _local_default = 5;
     char cError;

     cError = ReceiveMessage (queue, clear, _local_buffer);
     asm
     {
        unflatten val, bErr, _local_buffer, _local_default
     }
     return(cError);
}