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

変数 $address = 2				#GPIBアドレス
変数 $cmd1 = ":OUTPut:STAT ON"  #送信文字列
変数 $cmd2 = ":OUTPut:STAT OFF" #送信文字列
変数 $wait = 100				#送信-受信の待ち時間
変数 $result					#受信文字列

exe OUTをONにする{
	GPIB.開始 $address
	GPIB.送信 $address, $cmd1
	GPIB.終了 $address
}

exe OUTをOFFにする{
	GPIB.開始 $address
	GPIB.送信 $address, $cmd2
	GPIB.終了 $address
}