compass TCPIP-receive{
	モード プログラム
	サイズ設定 550, 400
	表示位置 右上
	記録フォーム表示 右下
}

変数 $n = 0	#回数
変数 $cmd	#コマンド文字列

exe コマンド待機１回{
	コマンド待機 ($cmd), 9000
	メッセージ "コマンド" & $cmd & "を受信しました"
}

exe

exe トリガ待機１回{
	トリガ待機 9000
	メッセージ "トリガを受信しました"
}

exe 繰り返しトリガ待機{
	 計算 $n = 0
	 ■繰り返し 次のトリガ待機, 100, 1000
}

sub 次のトリガ待機{
	トリガ待機 9000
	計算 $n = $n + 1
	記録 $n & "回目のトリガを受信"
}