dev-136 update pressuretemp example class

Resources/newWriteHeadersToFile.m

@@ -0,0 +1,27 @@
+function firstTime = newWriteHeadersToFile(fileName, signalNameArray, signalFormatArray, signalUnitArray)
+
+    if iscell(signalNameArray)
+        signalNames = cellfun(@char, signalNameArray, 'UniformOutput', false);
+    end
+
+    if iscell(signalFormatArray)
+        signalFormats = cellfun(@char, signalFormatArray, 'UniformOutput', false);
+    end
+
+    if iscell(signalUnitArray)
+        signalUnits = cellfun(@char, signalUnitArray, 'UniformOutput', false);
+    end
+
+    signalNamesString = strjoin(signalNames, '\t');
+    signalFormatsString = strjoin(signalFormats, '\t');
+    signalUnitsString = strjoin(signalUnits, '\t');
+
+    fid = fopen(fileName, 'wt');
+    if fid == -1
+        error('Cannot open file: %s', fileName);
+    end
+    fprintf(fid, '%s\n%s\n%s\n', signalNamesString, signalFormatsString, signalUnitsString);
+    fclose(fid);
+
+    firstTime = false;
+end

ShimmerDeviceHandler.m

@@ -0,0 +1,52 @@
+classdef ShimmerDeviceHandler
+    properties
+        obj
+        shimmer
+        comPort
+        sensorClass
+    end
+
+    methods
+        function this = ShimmerDeviceHandler(comPort)
+            javaaddpath('ShimmerBiophysicalProcessingLibrary_Rev_0_10.jar');
+            javaaddpath('libs/ShimmerJavaClass.jar');
+            javaaddpath('libs/jssc-2.9.6.jar');
+            javaaddpath('libs/vecmath-1.3.1.jar');
+            javaaddpath('libs/commons-lang3-3.8.1.jar');
+
+            this.sensorClass = javaObjectEDT('com.shimmerresearch.driver.Configuration$Shimmer3$SENSOR_ID');
+            this.comPort = comPort;
+            this.obj = com.shimmerresearch.tools.matlab.ShimmerJavaClass();
+        end
+
+        function [success, this] = connect(this)
+            this.obj.mBluetoothManager.connectShimmerThroughCommPort(this.comPort);
+
+            timeout = 15;
+            startTime = tic;
+            this.shimmer = [];
+
+            while isempty(this.shimmer) && toc(startTime) < timeout
+                pause(1);
+                this.shimmer = this.obj.mBluetoothManager.getShimmerDeviceBtConnected(this.comPort);
+
+                if ~isempty(this.shimmer)
+                    disp(['Device connected... Elapsed time: ', num2str(toc(startTime)), ' seconds']);
+                    success = true;
+                    pause(10);
+                    return;
+                end
+            end
+            success = false;
+        end
+
+        function success = start(this)
+            this.shimmer = this.obj.mBluetoothManager.getShimmerDeviceBtConnected(this.comPort);
+            if isempty(this.shimmer)
+                error('Shimmer device is not connected.');
+            end
+            this.shimmer.startStreaming();
+            success = true;
+        end
+    end
+end

javaclasspath.txt

@@ -1,4 +1,4 @@
 <before>
 
-C:\Users\AbdullahHarithJamadi\Documents\MATLAB\libs\commons-math-2.2.jar
-C:\Users\AbdullahHarithJamadi\Documents\MATLAB\libs\commons-math3-3.6.jar
+C:\Users\AbdullahHarithJamadi\Documents\GitHub\Shimmer-MATLAB-ID\libs\commons-math-2.2.jar
+C:\Users\AbdullahHarithJamadi\Documents\GitHub\Shimmer-MATLAB-ID\libs\commons-math3-3.6.jar

newplotandwriteexample.m

@@ -0,0 +1,172 @@
+function void = newplotandwriteexample(comPort, captureDuration, fileName)
+%% definitions
+
+shimmer = ShimmerDeviceHandler(comPort);                                   % Define shimmer as a ShimmerDevice Handler instance with comPort
+
+firsttime = true;
+
+% Note: these constants are only relevant to this examplescript and are not used
+% by the ShimmerDevice Handler
+NO_SAMPLES_IN_PLOT = 500;                                                  % Number of samples that will be displayed in the plot at any one time
+DELAY_PERIOD = 0.2;                                                        % A delay period of time in seconds between data read operations
+numSamples = 0;
+
+addpath('./Resources/')                                                    % directory containing supporting functions
+
+%%
+
+[success, obj] = shimmer.connect();
+
+if success
+
+    shimmerClone = obj.shimmer.deepClone();
+    shimmerClone.setSamplingRateShimmer(51.2);
+
+    shimmerClone.disableAllSensors();                                      % Disables all currently enabled sensors
+    shimmerClone.setEnabledAndDerivedSensorsAndUpdateMaps(0, 0);           % Resets configuration on enabled and derived sensors
+
+    sensorIds = javaArray('java.lang.Integer', 3);
+    sensorIds(1) = java.lang.Integer(obj.sensorClass.SHIMMER_ANALOG_ACCEL);
+    sensorIds(2) = java.lang.Integer(obj.sensorClass.SHIMMER_MPU9X50_GYRO);
+    sensorIds(3) = java.lang.Integer(obj.sensorClass.SHIMMER_LSM303_MAG);
+
+    shimmerClone.setSensorIdsEnabled(sensorIds);
+
+    commType = javaMethod('valueOf', 'com.shimmerresearch.driver.Configuration$COMMUNICATION_TYPE', 'BLUETOOTH');
+    com.shimmerresearch.driverUtilities.AssembleShimmerConfig.generateSingleShimmerConfig(shimmerClone, commType);
+    obj.shimmer.configureFromClone(shimmerClone);
+
+    pause(20);
+
+    if shimmer.start()
+        plotData = [];                                               
+        timeStamp = [];
+
+        elapsedTime = 0;                                                             
+        tic;  
+
+        plotData = [];                                               
+        timeStamp = [];
+
+        h.figure1=figure('Name','Shimmer 1 signals' );                     % Create a handle to figure for plotting data from shimmer
+        set(h.figure1, 'Position', [100, 500, 800, 400]);
+
+        elapsedTime = 0;                                                   % Reset to 0    
+        tic;                                                               % Start timer
+
+        while (elapsedTime < captureDuration)            
+
+            pause(DELAY_PERIOD);                                           % Pause for this period of time on each iteration to allow data to arrive in the buffer
+
+            data = obj.obj.receiveData();                                  % Read the latest data from shimmer data buffer, signalFormatArray defines the format of the data and signalUnitArray the unit
+            newData = data(1);
+            signalNameArray = data(2);
+            signalFormatArray = data(3);
+            signalUnitArray = data(4);     
+
+            signalNameCellArray = cell(numel(signalNameArray), 1);     
+            for i = 1:numel(signalNameArray)
+                signalNameCellArray{i} = char(signalNameArray(i));         % Convert each Java string to a MATLAB char array
+            end
+
+            signalFormatCellArray = cell(numel(signalFormatArray), 1);     
+            for i = 1:numel(signalFormatArray)
+                signalFormatCellArray{i} = char(signalFormatArray(i));     % Convert each Java string to a MATLAB char array
+            end
+
+            signalUnitCellArray = cell(numel(signalUnitArray), 1);     
+            for i = 1:numel(signalUnitArray)
+                signalUnitCellArray{i} = char(signalUnitArray(i));         % Convert each Java string to a MATLAB char array
+            end
+
+            if(~isempty(signalNameCellArray))
+                chIndex(1) = find(ismember(signalNameCellArray, 'Timestamp')); % Get signal indices
+                chIndex(2) = find(ismember(signalNameCellArray, 'Accel_LN_X'));
+                chIndex(3) = find(ismember(signalNameCellArray, 'Accel_LN_Y'));
+                chIndex(4) = find(ismember(signalNameCellArray, 'Accel_LN_Z'));
+                chIndex(5) = find(ismember(signalNameCellArray, 'Gyro_X'));
+                chIndex(6) = find(ismember(signalNameCellArray, 'Gyro_Y'));
+                chIndex(7) = find(ismember(signalNameCellArray, 'Gyro_Z'));
+                chIndex(8) = find(ismember(signalNameCellArray, 'Mag_X'));
+                chIndex(9) = find(ismember(signalNameCellArray, 'Mag_Y'));
+                chIndex(10) = find(ismember(signalNameCellArray, 'Mag_Z'));
+            end
+
+            if (firsttime==true && isempty(newData)~=1)
+                firsttime = newWriteHeadersToFile(fileName,signalNameCellArray(chIndex),signalFormatCellArray(chIndex),signalUnitCellArray(chIndex));
+            end
+
+            if ~isempty(newData)                                           % TRUE if new data has arrived
+
+                filtredData = newData(:, chIndex);
+
+                dlmwrite(fileName, double(filtredData), '-append', 'delimiter', '\t', 'precision', 16);
+
+                plotData = [plotData; newData];                            % Update the plotDataBuffer with the new data
+                numPlotSamples = size(plotData,1);
+                numSamples = numSamples + size(newData,1);
+                timeStampNew = newData(:,11);                              % get timestamps
+                timeStamp = [timeStamp; timeStampNew];
+
+                if numSamples > NO_SAMPLES_IN_PLOT
+                    plotData = plotData(numPlotSamples-NO_SAMPLES_IN_PLOT+1:end,:);
+                end
+                sampleNumber = max(numSamples-NO_SAMPLES_IN_PLOT+1,1):numSamples;
+
+                set(0,'CurrentFigure',h.figure1);           
+                subplot(2,2,1);                                            % Create subplot
+                signalIndex = chIndex(1);
+                plot(sampleNumber, plotData(:,signalIndex));               % Plot the time stamp data
+                legend([char(signalFormatArray(signalIndex)) ' ' char(signalNameArray(signalIndex)) ' (' char(signalUnitArray(signalIndex)) ')']);  
+                xlim([sampleNumber(1) sampleNumber(end)]);
+
+                subplot(2,2,2);                                            % Create subplot
+                signalIndex1 = chIndex(2);
+                signalIndex2 = chIndex(3);
+                signalIndex3 = chIndex(4);
+                plot(sampleNumber, plotData(:,[signalIndex1 signalIndex2 signalIndex3]));                                 % Plot the accelerometer data
+                legendName1 = [char(signalFormatArray(signalIndex1)) ' ' char(signalNameArray(signalIndex1)) ' (' char(signalUnitArray(signalIndex1)) ')'];
+                legendName2 = [char(signalFormatArray(signalIndex2)) ' ' char(signalNameArray(signalIndex2)) ' (' char(signalUnitArray(signalIndex2)) ')'];
+                legendName3 = [char(signalFormatArray(signalIndex3)) ' ' char(signalNameArray(signalIndex3)) ' (' char(signalUnitArray(signalIndex3)) ')'];
+                legend(legendName1,legendName2,legendName3);               % Add legend to plot
+                xlim([sampleNumber(1) sampleNumber(end)]);
+
+                subplot(2,2,3);                                            % Create subplot
+                signalIndex1 = chIndex(5);
+                signalIndex2 = chIndex(6);
+                signalIndex3 = chIndex(7);
+                plot(sampleNumber, plotData(:,[signalIndex1 signalIndex2 signalIndex3]));                                 % Plot the gyroscope data
+                legendName1 = [char(signalFormatArray(signalIndex1)) ' ' char(signalNameArray(signalIndex1)) ' (' char(signalUnitArray(signalIndex1)) ')'];
+                legendName2 = [char(signalFormatArray(signalIndex2)) ' ' char(signalNameArray(signalIndex2)) ' (' char(signalUnitArray(signalIndex2)) ')'];
+                legendName3 = [char(signalFormatArray(signalIndex3)) ' ' char(signalNameArray(signalIndex3)) ' (' char(signalUnitArray(signalIndex3)) ')'];
+                legend(legendName1,legendName2,legendName3);               % Add legend to plot
+                xlim([sampleNumber(1) sampleNumber(end)]);
+
+                subplot(2,2,4);                                            % Create subplot
+                signalIndex1 = chIndex(8);
+                signalIndex2 = chIndex(9);
+                signalIndex3 = chIndex(10);
+                plot(sampleNumber, plotData(:,[signalIndex1 signalIndex2 signalIndex3]));                                 % Plot the magnetometer data
+                legendName1 = [char(signalFormatArray(signalIndex1)) ' ' char(signalNameArray(signalIndex1)) ' (' char(signalUnitArray(signalIndex1)) ')'];
+                legendName2 = [char(signalFormatArray(signalIndex2)) ' ' char(signalNameArray(signalIndex2)) ' (' char(signalUnitArray(signalIndex2)) ')'];
+                legendName3 = [char(signalFormatArray(signalIndex3)) ' ' char(signalNameArray(signalIndex3)) ' (' char(signalUnitArray(signalIndex3)) ')'];
+                legend(legendName1,legendName2,legendName3);               % Add legend to plot
+                xlim([sampleNumber(1) sampleNumber(end)]);
+            end
+
+            elapsedTime = elapsedTime + toc;                               % Stop timer and add to elapsed time
+            tic;                                                           % Start timer           
+
+        end  
+
+        elapsedTime = elapsedTime + toc;                                   % Stop timer
+        fprintf('The percentage of received packets: %d \n',obj.shimmer.getPacketReceptionRateCurrent()); % Detect loss packets
+        obj.shimmer.stopStreaming();                                       % Stop data streaming                                                       % Stop data streaming             
+
+    end
+    obj.shimmer.disconnect();
+
+end
+
+
+