日記/2011-10-28

Echolink/D-STAR Gateway

簡易的に英語版WinXpにしたVAIO(ノートPC)でEcholink(SYSOP Mode)とDVAP+ID-91の組み合わせでEC/DST G/Wをつくり、テスト運用してみた。ID-91のコントロールは例の如くEcholinkAPIを利用。チャットにより、接続先やメッセージのセットができるようにした。

1. audio設定
   　音声の流れと調整箇所
   　・Echolink(Single)@iPodtouch4G
   　　　　↓
   
   　
   　・Echolink(Sysop)@VAIO　←　audio出力を調整し送信時の変調度を調整する。マイクはミュート。
   　　　　↓　　　　　　　　　　　　　 　適正値：マスタ２目盛り、WAVE５目盛り弱
   　・ID-91(DV Mode) 　　　 　←　スピーカー出力レベル(スピーカーをモニターして
   　　　　↓　　　　　　　　　　　　　　 歪が無い程度に固定する）
   　・DVAPTool@ubuntu
   
   　
   　
   　・DVAPTool@ubuntu
   　　　　↓
   　・ID-91(DV Mode)
   　　　　↓
   　・Echolink(Sysop)@VAIO　←　マイク入力レベル（SP→MiC直接ではMiC目盛り１でも
   　　　　↓　　　　　　　　　　　　　　歪むので、結局外部にミキサーを入れて調整）
   　・Echolink(Single)@iPodtouch4G
   　
2. ID-91のコントロール
   いつものWSHで、EcholinkAPIを利用したスクリプト(ec2dst.vbs)を作成。チャットの受け渡しによりUWSCを実行する。

   '---- ec2dst.vbs -----
   set Echo = WScript.CreateObject("EchoLink.EchoLinkSession","Echo_")
   set ws = CreateObject("WScript.Shell")
   ac=0
   sw=0
   Do while sw=0
   wscript.sleep 5000
   loop
   Wscript.Quit
   sub Echo_ChatTextReceived(sText)
   mis = Mid(sText,8,32)
   Select Case mis
   	Case "#h"
   		Echo.SendChatText ("-------" & vbCrLf & "mcq mu" & vbCrLf & "--------------")
                  ac = 1
   
   	Case "mcq"
   		ws.Run "c:\appli\uwsc\uwsc.exe c:\appli\uwsc\10.uws"
                  ac = 1
   
   	Case "mu"
   		ws.Run "c:\appli\uwsc\uwsc.exe c:\appli\uwsc\11.uws"
                  ac = 1
   
   中略
   
   End Select
   If ac = 1 Then
   	Echo.SendChatText (mis & "[OK]")
   	ac = 0
   Else
   	Echo.SendChatText (mis & "[???]")
   	Echo.SendChatText ("Again or Next cmd:[?]")
   End If
   end sub

   ・以下はUWSCスクリプトの一例

   '---- 10.uws ----
   ACW(GETID("RS-91","TForm"),659,546,319,492,0)
   MOUSEORG(GETID("RS-91","TForm"))
   BTN(LEFT,CLICK,131,10,10)
   BTN(LEFT,CLICK,133,128,181)
   BTN(RIGHT,CLICK,133,128,300)
   BTN(LEFT,CLICK,165,139,230)
   BTN(LEFT,CLICK,156,40,80)

• Prev
• Next
• 日記