DCC同人誌に記事が掲載されました

DesktopStationさんが発行されているDCC同人誌3号に「サウンドボックスをDCCで操作する」という記事を書かせていただきました。

こちらからダウンロードできます。

是非ダウンロードしてお読みください。

蒸機のDCCデコーダー

別記事へのコメントで、サウンドデコーダーへの質問いただきましたので書いておきます。

テンダー機はこれまで、レンツのシルバーミニ+ＭＲＣ1665サウンドデコーダーの組合せが多いです。

6500の実例

8760の実例

サウンド対応のタンクロコでは、SoundTraxxのTsunamiを積んでいました。

従来モーター用デコーダーとサウンドデコーダーを分離して搭載していたのは、一体型だと機炭間のコードの接続が大変というのが一番の理由です。分離搭載だとPFM/SL1アナログサウンドと同じく渡り線一本ですみます。バックマンのサウンド搭載済の完成品も数両持っていますが、ほぼ永久連結状態です。あとは一体型は高価なので、トラブルで焼いてしまったときの経済的損失が大きいということもあります１万円札に火がついて燃えてしまったようなものです（笑）

ただ分離型ではサウンドオンリーデコーダーのブラスト音レートは実際のスピード＝モーター回転数に同期するのではなく、コントローラーからの指令速度に一致するので、特に発車時や低速走行時にはズレが目立つことがあります。モーターデコーダーのBEMFフィードバック機能を使って、できるだけDCC指令スピードとモーター回転数のズレを少なくすることでかなり補正できますが、調整がかなり面倒ですし完全ではありません。機関車だと牽引する列車重量によっても起動状態が変わってきますので、その調整が難しいです。ブラスト音が鳴り出す前に動輪が回転していたり、動輪はまだ回転していないのにブラスト音が鳴っているのは興ざめです。

それに対して最近の一体型では、BEMFを測定してモーター回転数を検知して走行サウンドを走行速度に同期させますので、調整が楽です。現在製作中の８４５０にはTsunami2を搭載予定です。

また分離型で二つのデコーダー搭載した時は、CV値の重複があるので、CV値書き替えるときは、一部のＣＶ値は機炭分離して書き替える必要があります。

なお　蒸気が好き　さんのコメントはスレッドの付け替えさせていただきました。

ミニUSBスロットル

amazonで売っている、USB差し込み型の小さなAruduino Leopord互換機を使って、スマホやタブレットのUSBソケットに差して使う速度ツマミのみのDSair2用のミニUSBスロットル作ってみました。

速度ツマミのみでファンクションスイッチなどはついていません。ファンクションや方向切替はスマホやタブレットの画面タッチでおこないます。
どうしても画面タッチの速度調整に慣れないのでこんなもの作ってみました。
難点はUSBソケットに差しているのでやや不安定なコトです。

☆10/15追記

iPhoneなどiOSのデバイスにOTGケーブルでつないだら動きませんでした。そういえばマックをクリーンインストールしたときに、USBの最大消費電力を100mAにするようにAruduinoのライブラリーのUSBCore.hを改造するのを忘れていました。MacではアプリケーションフォルダーのArduinoのアイコンを右クリックして「パッケージ内容を表示」を選択してから、Contents>Java>hardware>arduino>avr>cores>aruduino>USBcore.hと辿っていきます。エディターを使ってUSBcore.hの270行目のUSB_CONFIG_POWER_MA(500) の500を100に書き替えます。詳細は電機屋の毎日ブログ（2019/3/06）を参照してください。と自分の覚え書きのつもりで書いておきます。

改造したライブラリーでコンパイルしたプログラムを書き込むとiOSのデバイスにつないでも無事動きました。

☆2020/1/24追記　こういうのもできればよいと思います。

タブレットをスタンドに置くと・・・

タブレットをスタンドに置くと、コントローラーらしくなりますね。

今週は工作はせず、ひたすら車両整備です。

KATOのサウンドボックスをDSair2で自動運転する

KATOのサウンドボックスの通信ポートにSoundBoxDecoderを接続し、DSair2のDSbasicを使って往復自動運転しました。

SoundBoxDecoderは自作しましたが、その後fujigayaさんが専用基板をつくられたのでそれを利用して作るのが簡単だと思います。まだ市販のデコーダー完成品はありません。

サウンドボックスの音声出力端子には、Bluetooth音声発信器をつないで、Bluetooth受信機を搭載した貨車のスピーカーに音を飛ばしています。機関車はDCC化していませんが、サウンドデコーダーを搭載したのと同じように貨車のスピーカーからブラスト音や汽笛などが聞こえます。

車両の位置検出にはfujigayaさんが開発されたs88-Detectorをつかっています。今回はホール素子を利用した貨車の床下に取り付けた磁石による検出としました。s88-DetectorをDSair2に接続しています。

この動画はhttps://youtu.be/NaZTmCOA0Ioからもご覧になれます。

まだ現在は発車前の汽笛だけですが、もう少し機関車の動きにあわせていろいろな音を鳴らしたいと思っています。

サウンドボックスの通信ポートを直接コンピューターから制御しても自動運転できますが、DCCのDSair2自動運転機能とs88-Detectorの車両位置検出機能を使えば、比較的簡単にプログラミングしてＤＣＣを介した自動運転制御ができます。

もちろんスマホやタブレットを使って通常のDCC運転のようにサウンドボックスをマニュアル制御することも可能です。ＫＡＴＯのスマートコントローラーと同じような操作ができます（ただし　こちらは音量や同期などの設定はできません）ただ現時点ではこちらは自動運転へのアプローチは用意されていません。

なおこのシステムは、5／19のKKC作品展会場で運転デモンストレーションいたしますので、興味のある方はぜひご来場ください。

VBA(Excel)でDSairを制御する（続）ＣＶ値読み書き

Excelを使って、DSairのマニュアル運転操作をしようという方は、まずおられないと思います。

やはりデコーダーのＣＶ値の管理がメインになると思います。

というわけでＣＶ値の読み書きです。

読込は　前回書いたHTTPDSAir関数を使って

Sub DSair_cv_read_com(LocoAdress, CVNo)

　　fc = "/command.cgi?op=131&ADDR=0&LEN=64&DATA=GV(" + LocoAdress + "," + CVNo + ")" + " ?" + Str(Time())

　　HTTPDSAir (fc)

End Sub

LocoAdressは、OPSモードで使用するときデコーダーのアドレスを文字列として指定しますが、それ以外では”0”をいれます

で読込命令を出して

Sub DSair_cv_read_res()

     fc = "/command.cgi?op=130&ADDR=128&LEN=264" + " ?" + Str(Time())

     DSair_res = HTTPDSAir(fc)

    CVValue = Mid(DSair_res, 42, 3)

End Sub

で値を読込みます。

ただし読込命令を出して、DSairがデコーダーにアクセスして、内部メモリの値が読み込んで書き替えられるまで、2−3秒かかるので、そのあいだにスリープなどの命令をいれて時間稼ぎする必要があります。

関数にすれば

Function DSair_cv_read(LocoAdress, CVNo)

    fc1 = "/command.cgi?op=131&ADDR=0&LEN=64&DATA=GV(" + LocoAdress + "," + CVNo + ")" + " ?" + Str(Time())

    HTTPDSAir (fc1) 'ＣＶ値の読み込み命令を出す

    sleep 4000 '4秒時間を空ける

    fc2 = "/command.cgi?op=130&ADDR=128&LEN=264" + " ?" + Str(Time())

    DSair_res = HTTPDSAir (fc2) '内部メモリの書き替えられたＣＶ値の読み出す

    DSair_cv_read = Mid(DSair_res, 42, 3)　 '関数の返り値がＣＶ値です。

End Function

となります

ＣＶ値の書き込みは

Sub DSair_cv_write(LocoAdress, CVNo, CVValue)

　　fc = "/command.cgi?op=131&ADDR=0&LEN=64&DATA=SV(" + LocoAdress + "," + CVNo + "," + CVValue + ")" + " ?" + Str(Time())

　　HTTPDSAir (fc)

End Sub

で実行できます。

サブルーチンや関数の引数　LocoAdress, CVNo, CVValue　は文字列です。

また上記のプログラム例は、エラー処理を省略しています。

VBA(Excel)で、DSairを制御する

DSairには、DSBasicという立派な制御言語がありますが、wifi経由のhttp通信で制御するので、VBA(Visual Basic for Application)でも制御できるはずだと思いプログラミングしてみました。

ちょっと落とし穴にはまったのは、エクセルのVBAではhttp通信のキャッシュ？がかかってしまい、同じ命令をGetリクエストすると、メモリ値が変化しているはずなのに最初と同じリプライが返ってくることでした。これはネットで、無意味なコマンドを文字列につけて送るというテクニックが紹介されていましたので、Getリクエストの文字列に時刻文字列をつけて送ってクリアしました。こういう現象は、JavaScript で動いているサーバーではおきることがあるらしいですが、詳しい理屈は私には理解できませんでした。

最低限の機能のマクロつきブックをサンプルとしてアップロードしておきますので、興味のある方は自分のエクセルで、いろいろプログラム書き加えて遊んでください。DSBasicの方がＶＢＡより制御向きだと思いますが、ＣＶ値の管理とかにはＶＢＡの方が向いているかもしれません。DesktopStationさんには、CV値書き替え関連のDSair Wi-Fi Specificationのコマンド公開を是非お願いしたいと思います。また永末さんところの赤い箱は、ＶＢＡの制御ライブラリーが提供されていたので、そのＶＢＡマクロからの移植とか赤い箱とDSAir両用プログラムの開発とかには使えるかもしれません。
このエクセルマクロプログラムをお試しになった方あれば、是非コメントをください。

ココログの新仕様では、画像以外のファイルはアップロードできなくなったようです。今回、DesktopStationさんのＨＰからダウンロードしていただけるようになりました。下記アドレスからダウンロードしてください。
https://desktopstation.net/follow/DSAir_excelmacro.zip

☆4/4追記

vbaでDSair2へwifi 経由でコマンドを送信しているのは下記の関数です。一部略

Function HTTPDSAir(DSAir) As String

Set httpReq = CreateObject("MSXML2.XMLHTTP")

httpReq.Open "GET", "http://flashair" + DSAir

httpReq.Send

HTTPDSAir = httpReq.responseText

Set httpReq = Nothing

End Function

運転コマンドはDSAirに　/command.cgi?op=131&ADDR=0&LEN=64&DATA=DSair内部コマンド　という文字列を入れます

共有メモリ読み出しは　　/command.cgi?op=130&ADDR=128&LEN=264　です

上に書いたようにhttpのキャッシュを回避するために、
この文字列には意味のない文字列（プログラム例では時間文字列）を加えます。

なおこのプログラムを使用するためには参照設定で[Microsoft HTML Object Library]を参照する必要があります。

S88-Detectorを組む

フジガヤさんに、S88-Detector基板とセンサー基板を分けていただきましたので、秋月電子でパーツを調達して組み上げました。

指定のホール素子（磁気センサー）SK8552G を取り付けました。
Ｎゲージ用の基板のようだったので配線は少し工夫しました。
KATOの短いユニトラックにスリット上の穴をあけて差し込み、強力両面テープで固定しました。
これで自動往復運転のためのセンサーつき線路ができました。

動作チェックなどのための手動ボタンセンサーです。
線路センサー基板を改造しました。
CN2端子にはコネクタもつけておきました。

☆4/25追記

 

動作が不安定なので、チェックしたらホール素子の配線+-を逆に誤配線していました。
ホール素子をユニトラックに開けた穴に差し込む方向をを勘違いして逆にしてしまったようです。
つなぎ直すと安定して動作しました。安いパーツとはいえ壊れなくてよかったです。
リードスイッチと違って磁石が離れていても安定して動作しますね。
ただパワートラックなどのモーターが線路面に近いものは、磁石なくても動作するかもしれません。
また試してみます。

KATOサウンドBOXを操作するDCCデコーダーをつくる（5）

fujigayaさんが、KATOサウンドBOXを操作するDCCデコーダーの基板の頒布を開始されました。
もしKATOサウンドBOXを操作するDCCデコーダーを作成希望の方がおられましたら、fujigayaさんの頒布されている基板を利用されるのが簡単だと思います。
また私の作った回路でもfujigayaさんのスケッチが作動します。
コスト重視の方はご自分でユニバーサル基板で作られるとよいと思います。

なぜＤＣＣでサウンドボックス制御する必要があるのか？とお思いの方も多いと思いますが、DSair2を使ってスマホでワイヤレスコントロールすれば便利です。といっても同じことはKATOのスマートコントローラーなるものを購入すればできます。しかしDSair2はオープンソースなので、Webアプリ改造すれば自分の思い通りの画面に改造できます！（といってもそこまでやるかたが何人おられるのか・・・） ただしこのデコーダーは、スタート、ボリューム、同期の設定はできません。
本命はＤＳbasic使ったプログラム自動運転だと思っています。
Yaasanがされているようなサウンド付き自動運転が、アナログＤＣ運転の車両でもできるはずです。

あとこの基板はnanoの各端子を引き出したランド付きパターンとなっているのでは、単体でアドレス設定可能なCV-ack機能を持った、据置き（非車載）型デコーダーの開発基板として使えますよ。その方面に興味のある方にもお勧めです（これも何人おられるのか？？）

DSair2用ＵＳＢスロットル(続） テンキーパッドつき

DSair2用ＵＳＢスロットル　スマホ　　タブレット接続タイプ

いつものタカチのハンドヘルドコントローラーケースに入れてみました。
テンキーパッドの部分は手抜き工作で、タクトスイッチの部分を長方形にくり抜きました。
テンキーパッドの右下の青ボタンが方向切替、赤ボタンが停止です。
右のスロットルツマミの上の緑ボタンがシフトキーで、テンキーとの合わせ押しで、
Ｆ10-19の操作ができます。

Desktopstationさんが、Ｆ20-28のキー割り当てもしてくれたら、もう一つスイッチ増設してこれらのファンクション操作に対応する予定です。

スケッチは、DesktopstationさんのＵＳＢスロットルスケッチUniveralJoykey.inoを秋月の4ｘ3キーパッドが使えるように改変させていただきました。

スケッチはここをクリックしてダウンロード

usbcotrol20190310a.inoは、注釈などに誤りあったので修正しました。

arduino pro mini のピンとの結線は下記のとおりです。
シフトキーボタン
BTN_SHIFT 7
スイッチオンの時に接地
秋月の4Ｘ3キーパッド
BTN_A 8
BTN_B 9
BTN_C 10
BTN_D 16
BTN_X 4
BTN_Y 5
BTN_Z 6
エンコーダー
ENC_A 2
ENC_B 3

なおこのスケッチは、Arduino (pro) miciro でしか動きませんので念のため！
Ａｒｄｕｉｏ　nano miniなどでは動きません。

引き続き単独動作型のWIFIスロットルも、ESP-WROOM-32 を使って高機能化？　めざしたいと思います。
☆テンキーパッド搭載
☆4桁7segLED搭載（アドレス表示）
を計画しています