Nano 33 BLE Senseをデータ入力に使う<BLE>②温湿度センサ<BLEセントラル>
温湿度のBLEペリフェラルを受けるために、BLEのセントラルをmatlabで記述します。ドキュメントは、次のページから始まります。
●準備
最初、BLEスキャンをして、アドバタイジングしているBLEペリフェラルを探します。
clear
scan = blelist("Timeout", 30)
HTS221が接続するBLEペリフェラルです。address(88A2EDC9F60C)を使って接続に行きます。
bbのCharacteristicsの情報は、前回作ったプログラムの内容なので、特に解析する必要はありません。
clear
scan = blelist("Timeout", 30)
Nano33BLE_address="88A2EDC9F60C"; % scanで見つかったアドレスを代入
b = ble(Nano33BLE_address);
bb = b.Characteristics
●プログラム
10回測定します。
hex2numS()ファンクションは、IEEE754のフォーマットで送られてくるデータを実数に戻します。一度32ビットのビット文字列に直しています。そこから、符号、指数、仮数のビットを抜き出し、binary32のフォーマットのルールに従って計算しています。
clear
scan = blelist("Timeout", 20);
Nano33BLE_address="88A2EDC9F60C"; % scanで見つかったアドレスを代入
b = ble(Nano33BLE_address);
% bb = b.Characteristics
ServiceUUID = "F000AA30-0451-4000-B000-000000000000";
Temperature_UUID = "F000AA31-0451-4000-B000-000000000000";
Humidity_UUID = "F000AA32-0451-4000-B000-000000000000";
c11 = characteristic(b, ServiceUUID, Temperature_UUID); % 配列 4個の数値
subscribe(c11); % Notify
c12 = characteristic(b, ServiceUUID, Humidity_UUID);
subscribe(c12);
for i=1:10
Temperature = hex2numS(flip(read(c11))); % little endian->big endian
Humidity = hex2numS(flip(read(c12)));
fprintf('\nTemperature is %.2f`C Humidity is %.1f%%RH ', Temperature, Humidity);
pause(2)
end
unsubscribe(c11);
unsubscribe(c12);
clear b
function shortF = hex2numS(decimal4) % IEE754の単精度浮動小数点数の形式:binary32
dataBig = strcat(num2str(dec2bin( decimal4(1),8)),num2str(dec2bin( decimal4(2),8)) ...
,num2str(dec2bin( decimal4(3),8)),num2str(dec2bin( decimal4(1),8)));
sign = (-1)^str2num(dataBig(1)); % 符号
exponentBit = dataBig(2:1:9);
fractionBit = ("1" + dataBig(10:1:end));
fraction = bin2dec(fractionBit)/(2^23) ; % 仮数
exponent = 2 ^ (bin2dec(exponentBit) -127) ; % 指数
shortF = sign * fraction * exponent;
end
実行結果です。