　東裏通

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

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

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

[0回]

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

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

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

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

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

roundrobin.zip

[0回]

自動ビットレート検出

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

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

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

autobitrate.zip

[0回]

きゅうり始めました

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 ファイルフォーマット」を参照ください。