東裏通

マンナンヒカリ

数年ぶりに書く記事がこんな話題。

GWで時間があるので毎日米たいてる。
で、せっかくならダイエットを、ということで

これ100%のお米（こんにゃく）を食べているわけ。
本来は2/3～1/2は普通のお米で炊くもの。

https://netank.net/1492.html
ここだと100%はNGと書いているけれど、単に水が多すぎただけだと思う。
http://www.cssking.net/diet/73.html
ここにはダイエットに向かないと書いているけれど、2倍に膨れることを計算に入れてない。

で、100%の場合、とりあえずバラけすぎ。もうちょいなんとかならないものか。
片栗粉とか寒天つっこめば何とかなるか？

カロリーは1合分75gあたり187kcal。お米1合はサイトによってばらつきあるけど500kcal前後か？
大体半分くらい。

何も考えずに毎食３～４合食べてたら太るな。。。
15kg2万円として、1合で75g使うとすると、200合。
1食あたり2合食べるから（計量カップ1合分そのまま使ってるので）、
ご飯だけで1食200円。
まぁダイエット食と考えるとこんなものか？

問題は腹の調子だな。。。食物繊維豊富すぎてトイレとお友達になってしまう。

ファイル管理ソフト

ファイルをタグで管理するソフトが欲しいな～、と。
Gmailみたいな感じ。

で、vectorで探してみた。
まともに使えそうなのは３つ。

Drag-and-Drop File Tag Adder ＋ TagListerLight
http://www.vector.co.jp/soft/winnt/util/se482475.html
http://www.vector.co.jp/soft/winnt/util/se475786.html
Drag-and-Drop File Tag Adderは単純にファイル名を先頭タグ付きの物に変える。
TagListerLightは規則的なタグを持つファイルを管理するファイラ。
ちょっと名前を変更するのはためらうな～。

TagMaster
http://www.vector.co.jp/soft/winnt/util/se426821.html
各ディレクトリに専用ファイルを置いてタグ付けする。
結構いい感じ。☆ひとつなのが不思議。
これが複数ディレクトリにわたって検索できるとかだといいんだけど。。。

カツラノブンルイダ
http://www.vector.co.jp/soft/winnt/util/se490162.html
複数ディレクトリに対するタグ付け可能。
ただし大量のフォルダに対してのタグ付けは非推奨らしい。
その場合exe自体を分離することになる。でもそうすると横断検索ができない。
うーん、惜しい。なかなかいいんだけどな。
この中では一番よさげ。

どれも惜しい。
やっぱ検索専用ディレクトリに各タグのディレクトリを作って
ファイルへのショートカットでもおいた方がいいのかねぇ。

追記：
FenrirFS
http://www.fenrir-inc.com/jp/fenrirfs/
これいいな。エイリアスモードなら特に問題ない。
無駄にカラフルなのが気に入らないが、許容範囲だ。
しばらく使ってみよう。

A/D変換結果の平均回数

A/D変換結果を何回平均すればいいか。

調べてみると標準誤差がこの判断によさげ。
標本誤差＝標準偏差／√標本数
だそうな。

エクセルで計算してみる。
A/D変換誤差が±3LSBとする。
標準偏差の計算を正規分布する乱数で行う。
=NORMINV(RAND(),0,1)
これで大体±3の正規分布する乱数ができる（99.73%が±3に入る）。
3σだからわかりやすい。

標本数を2,4,8,16,32,64,128,256とする。
各標本に対して標準偏差を求めて標本数のルートで割る。
=STDEV(N個の乱数範囲)/SQRT(N個)

乱数を変えて50回分平均してみた。
0.586236917 0.461962255 0.343433668 0.244178051 0.17491674 0.12441633 0.089293353 0.062873792

信頼区間は平均値±3×標準誤差で99.73%になるので3を掛ける。
1.758710751 1.385886765 1.030301005 0.732534153 0.524750219 0.37324899 0.267880058 0.188621376

図にするとこんな感じ。

つまり1回だと±3LSBの誤差が、2回平均で±1.8LSB、8回平均で±1LSBになる。
なので精度が±3LSBじゃ足りないよ、±1LSB以下じゃないとだめだよ･･･ってときは
大体±0.7LSBの16回くらい平均すればいいかな～と。

問題は誤差が偶然誤差じゃなくてA/D変換器固有の誤差だった場合だな。。。
正規分布してないならこの計算使いもんにならんぞ。

R8CのA/D変換器は内部でノイズ除去やってるっぽいから
平均の意味ないんだよな～。
精度上げるなら外部からホワイトノイズ与えるしかないな。。。

参考文献：
統計解析道具箱
標準偏差（SD）と標準誤差（SE）
シリウス先生の心理統計学
標準偏差と標準誤差
National Semiconductor
A/D, D/Aコンバータ日本語アプリケーション・ノート
ディザ信号付加による A/D コンバータの性能改善

R8Cでフラッシュ書き込み中に電源が落ちた場合

どうやっても中途半端な値にならない。
１バイト書き込んでる最中に電源が落ちたらどうなるのか確認したかったのに。。。
0x00を書き込んでる最中に電源落ちたら0x80とか0x01とかになると思いきや、
ちゃんと1バイト書き込んでから終了してる。
うーん、1バイト書いてる最中に電源が落ちることは考えなくても大丈夫ってことなのかなぁ。

~~あと、どうやら一度書き込んだアドレスに再度書き込むと0x00になってしまうみたい。~~

0を上書きできるだけらしい。

で、かふぇルネのスタッフによると2回書き込んじゃだめなんだってさ。
電源落ちたらそのデータは信用しちゃいけないみたい。
劣化してくると書けたり書けなかったりが発生するらしい。

うむ、勉強になった。
フラッシュ書き込みはBGOがないと辛いなぁ。
というかBGOがないと3x系以降はEW0モード無意味じゃね？
2x系はEW1モードの制限があったけど3x系でなくなったし。

電流検出回路

電流検出回路を考えた。
オペアンプ使うの初めてでかなりかかったけどどうやらうまくいったみたい。

連休中にユニバーサル基板に組んでマイコンでAD変換したかったんだけど時間切れ。

別スレッドからのコントロールへのアクセス２

前に書いたシリアルポートのデータ表示。
もっと簡単な方法があった。

SerialPortのBytesToReadをBackgroundWorkerのDoWork内でポーリング。
表示させたいときはReportProgressで元スレッドにデータを渡せばいい。
DataReceived？なにそれおいしいの？


Public Class Form1
    Private WithEvents BackgroundWorker1 As New System.ComponentModel.BackgroundWorker
    Private SerialPort1 As New System.IO.Ports.SerialPort

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) _
                                                                   Handles MyBase.Load
        If SerialPort1.IsOpen = False Then
            SerialPort1.PortName = System.IO.Ports.SerialPort.GetPortNames()(0)
            SerialPort1.BaudRate = 9600
            SerialPort1.DataBits = 8
            SerialPort1.Parity = System.IO.Ports.Parity.None
            SerialPort1.StopBits = System.IO.Ports.StopBits.One
            SerialPort1.Open()
        End If
        BackgroundWorker1.WorkerReportsProgress = True
        BackgroundWorker1.RunWorkerAsync()
    End Sub

    Private Sub BackgroundWorker1_DoWork(ByVal sender As System.Object, _
                                         ByVal e As System.ComponentModel.DoWorkEventArgs) _
                                        Handles BackgroundWorker1.DoWork
        Try
            Static rxcnt As Integer = 0
            Static rxbuf(1024) As Byte
            While True
                If SerialPort1.BytesToRead <> 0 Then
                    rxcnt = SerialPort1.Read(rxbuf, rxcnt, SerialPort1.BytesToRead)
                    BackgroundWorker1.ReportProgress(0, rxbuf)
                End If
            End While
        Catch ex As Exception
        End Try
    End Sub

    Private Sub BackgroundWorker1_ProgressChanged(ByVal sender As System.Object, _
                       ByVal e As System.ComponentModel.ProgressChangedEventArgs) _
                                          Handles BackgroundWorker1.ProgressChanged
        Dim rxbuf() As Byte = e.UserState
        TextBox1.Text = rxbuf(0)
    End Sub
End Class

動くんじゃないかな？試してないけど。

ラウンドロビンスケジューラ

作ってみた。
R8C/M12Aはとっても小さいのであまり意味ない気もするけど。

タイマ割り込みでスタックを入れ替えることでコンテキストスイッチ。
RTOSがどんな実装してるか知らないけど、これくらいしか浮かばなかったので。

なんか専用命令もあるけどよくわからないし。

というわけでどんどん使ってくれたまへ。

roundrobin.zip

自動ビットレート検出

R8C/M12Aで自動でビットレートを検出して通信するようにプログラムしてみました。
ヘッダを0xFFとしてスタートビットの幅をタイマRJ2で測定しています。

0xFF,0x01,0x00,0xFFと送信すると、
0xFF,0x02,0x03,0x01,0x02,0x03,0xF5と返信してきます。

とりあえず56kbpsまでは使えるみたいです。
何かのプログラムの参考にどうぞ。

autobitrate.zip

きゅうり始めました

きゅうりを育て始めました。
昨年はトマトとイチゴをやったのですが、イチゴは灰カビ病？でやられちゃいました。
今度こそちゃんと育てたいと思います。

R8C/M11A、R8C/M12AのI/Oファイル

HEWでR8C/M12Aのプログラム適当に作ってたら動かなかったのでSFRの状態を見ようと思った。
でも表示->CPU->IOでウインドウ開いても表示されない。。。

よく調べて見るとR8C E8aエミュレータデバッガ V.1.04.00 リリースノートにこんなことが…

4.6 I/O ファイルに関する注意事項

本製品では、以下の I/O ファイルは添付していません。- R8C/3xE グループ、R8C/3xF グループ、R8C/3xG グループ、R8C/3xH グループ、R8C/Mx グループ、R8C/LxC グループ用 I/O ファイルこれらの I/O ファイルについては、ハードウェアマニュアル Rev.1.00 公開後に提供予定です。

I/O ウィンドウの表示内容に誤りがある場合、I/O ファイルの修正によって解決する場合があります。

I/O ファイルの作成・修正・カスタマイズは、お客様にて実施いただくことが可能です。その方法は、High-performance Embedded Workshop ヘルプの「I/O ファイルフォーマット」を参照ください。

orz

すでにRev.1.00は出てるのに。。。ひどい。。
仕方ないので自分で作った。

R8CM12A.io

M11A/M12Aのどっちでも使えるはず。
ルネサスさん、いくらR8Cが開発停止したからって中途半端で放っておかないでくださいよ。。