compass 単体制御-DG645{
	モード プログラム
	表示位置 右下
	サイズ設定 550, 300
}

変数 $address = 15		#GPIBアドレス
変数 $delay = "100e-9"	#遅延時間
変数 $cmd = ""			#送信文字列
変数 $wait = 100		#送信-受信の待ち時間
変数 $result			#受信文字列

exe 遅延時間を入力して設定{
	入力 ($delay)
	GPIB.開始 $address
	結合 ($cmd) = "DLAY 2,0," & $delay
	GPIB.送信 $address, $cmd
	GPIB.終了 $address
}