//------------------------------------------------------ // SendCmd関数を使用して、コマンドを送出するサンプル // //------------------------------------------------------ #define LA_0 0x20 // OLA #define TA_0 0x40 // OTA #define UNL 0x3f // UNListen #define UNT 0x5F // UNTalk #define GTL 0x1; // Go To Local #define GET 0x8; // Group Execute Trigger #define MYADRS 1 // コントローラのアドレス(マイアドレス) //------------------------------------------------------- // アドレス「10と11」の機器にトリガ信号を送出する //------------------------------------------------------- BOOL Apci8201GetN(void) { BYTE buff[10]; buff[0]=UNL; buff[1]=MYADRS | TA_0; buff[2]=10 | LA_0; // アドレス「10」の機器にトリガ送出 buff[3]=11 | LA_0; // アドレス「11」の機器にトリガ送出 buff[4]=GET; return Apci8201SendCmd(LogSlot,buff,5); } //------------------------------------------------------- // 指定機器をリモート状態にする場合 //------------------------------------------------------- BOOL GotoRemote(WORD ListnerAdrs) { BYTE buff[10]; if (TRUE == Apci8201Ren(LogSlot,1)) { // RENライン有効(Low) buff[0]=UNL; // UNLコマンド buff[1]=MYADRS | TA_0; // コントローラのアドレス buff[2]=ListnerAdrs | LA_0; // リモート状態にしたい機器のアドレス return Apci8201SendCmd(LogSlot,buff,3); } return FALSE; } //------------------------------------------------------- // 指定機器をローカル状態にする場合 //------------------------------------------------------- BOOL GotoLocal(WORD ListnerAdrs) { if (TRUE == Apci8201Ren(LogSlot,1)) { // RENライン有効(Low) buff[0]=UNL; // UNLコマンド buff[1]=MYADRS | TA_0; // コントローラのアドレス buff[2]=ListnerAdrs | LA_0; // リモート状態にしたい機器のアドレス buff[3]=GTL; // GTLコマンド return Apci8201SendCmd(LogSlot,PChar(@buff),4); } return FALSE; }