0

「MyHex.txt」というテキストファイルがあり、ファイルにはこれらの値が含まれています

F0 43 00 0A 00 4f 91

このように Sub を使用してファイルを開き、配列の最初のバイトが「F0」であるかどうかを確認してから、値を設定します。次の 3 バイトをグループ化し、次の 3 バイトなどをグループ化する必要があります。

 Dim strings As String() = IO.File.ReadAllText(C:\MyHex.txt).Split(" "c)


    Select Case strings((0))
        Case "F0"
            StatusType = "Sysex"
    End Select

更新: 3 バイトごとに値をグループ化する必要があります。デコードできるように

使用する

       Sn.xx.yy

       S=Status (8-e)
       n=CN (0-F)
       xx=FDB (00 -7F)
       yy=SDB (00-7F)

更新 2:

Sysex「ヘッダー」を削除した後、これが残っています

最初のダンプ:

08 0A 4C 4D 20 20 4E 53 45 51 31 20 46 30 30 30 30 31 46 38 45 30 43 30 36 30 32 34 36 34 30 32 37 46 46 35 46 32 60

2 番目のダンプ

08 0A 4C 4D 20 20 4E 53 45 51 31 20 46 30 30 30 30 31 46 38 45 30 43 30 36 30 32 36 36 34 30 32 37 46 46 35 46 32 5E

29 番目のバイトと最後のバイトだけが変更されます。

4

0 に答える 0