入出力の制御テストをしてみます。
複数のUSB-I/Oを同時に使うことができますか？という問い合わせが度々有りました。
ここでは、４個のUSB-IO/IVB USB-IOインバータボードを使っての出力実験"「テスト映像１」"と、
２個のUSB-IO/IVBを使って、一つを出力に、もう一つを入力にし、入力側の状態を出力側に出力する
実験"「テスト映像2」(プログラム８）"を紹介致します。
4個のＵＳＢ−ＩＯを制御するテスト
プログラム7
プログラム７は、１番ポートを使って識別した４つのusb-I/O（ＵＳＢ−ＩＯ／ＩＶＢ）の１つを指定し、０番ポートにDATAを出力するプログラムです。
usb-i/oの１番ポートを 1111 1110 1101 1100、、、、0001 0000と順に設定することにより最大１６個のUSB-I/Oを識別することができます。
(以下の;-------------と;------------の間をコピーし、hspエディターに貼り付けると起動します。プログラムを起動するには「ＨＳＰ」本体とHSP USB-IO用プラグインが必要です）
;------------------------------------------------- ;プログラム７ ４個のＵＳＢ−Ｉ/Ｏを使った出力テスト #include "hspusbio.as screen 0,500,300 uio_find ;デバイスの中からUSB-I/Oを検索、初期化 uio_getdevs ;つながれているI/Oの数がstatに代入 n=stat ;USB-I/Oの総数をｎに代入 repeat n ;つながれているUSB-I/Oの数だけ繰り返す uio_seldev cnt ;割り振られた番号の０番目のI/Oから順に uio_out 1,15 ;１番ポートを入力モードに設定し uio_inp p,1 ;１番ポートの状態を読み込み dev=15-p ;割り振られた番号(0〜ｎ-1)を持つUSB-I/OのIDを h.dev=cnt ;変数devに代入、割り振られた番号を配列の内容とし、 loop ;要素をUSB-I/OのIDとした配列変数を設定 repeat n uio_seldev h.cnt ;USB/IOのID 、０番から uio_out 0,0 ;０番ポートに、０を出力 loop *main pos 50,50 mes "繋がれているUSB-I/Oの数は["+n+"]個です。" m_id=n-1 mes "出力するUSB-I/OのID番号を入力してください（0〜"+m_id+")" input dev,50,20,1 mes "出力するデータ（０〜２５５）" input dat,50,20,3 pos 100,150 objsize 300,30 button "指定のIOに入力データを出力します",*d_out stop *d_out uio_seldev h.dev ;指定のＵＳＢ−ＩＯの uio_out 0,dat ;０番ポートにデータを出力 stop ;------------------------------------------プログラム８
プログラム８は、２つのUSB-I/Oを使って、ID番号０の方を入力に、ID番号１の方を出力に設定し、０番のI/Oの状態を１番のI/Oに出力するプログラムです
(以下の;-------------と;------------の間をコピーし、hspエディターに貼り付けると起動します。プログラムを起動するには「ＨＳＰ」本体とHSP USB-IO用プラグインが必要です）
;------------------ #include "hspusbio.as screen 0,200,200 pos 50,50 objsize 100,30 button "start",*main button "stop",*stp *stp stop *main uio_find ;デバイスの中からUSB-I/Oを検索、初期化 uio_getdevs ;つながれているI/Oの数がstatに代入 n=stat ;USB-I/Oの総数をｎに代入 repeat n ;つながれているUSB-I/Oの数だけ繰り返す uio_seldev cnt ;割り振られた番号の０番目のI/Oから順に uio_out 1,15 ;１番ポートを入力モードに設定し uio_inp p,1 ;１番ポートの状態を読み込み dev=15-p ;割り振られた番号(0〜ｎ-1)を持つUSB-I/OのIDを h.dev=cnt ;変数devに代入、割り振られた番号を配列の内容とし、 loop ;要素をUSB-I/OのIDとした配列変数を設定 uio_seldev h.1 ;IOのID １番のI/Oを指定 uio_out 0,0 ;０番ポートに０を出力 uio_seldev h.0 ;IOのID ０番のI/Oを指定 uio_out 0,255 ;０番ポートに255を出力（入力に設定） repeat uio_seldev h.0 ;ID ０番のI/Oを指定 uio_inp d,0 ;０番ポートの状態を取得 d=255-d ;取得したDETAを反転 uio_seldev h.1 ;ID １番のI/Oを指定 uio_out 0,d ;０番ポートにDETAを出力 wait 2 loop ;--------------------------------------------