compass 単体制御-SR400{
	モード プログラム
	表示位置 左下
	サイズ設定 520, 300
}
 
変数 $address = 23

exe パラメータ初期化{
	GPIB.開始 $address
	GPIB.送信 $address, "CM 0"
	待機 100
	GPIB.送信 $address, "CI 0,1"
	待機 100
	GPIB.送信 $address, "CI 1,2"
	待機 100
	GPIB.送信 $address, "CP 2,5E6"
	待機 100
	GPIB.送信 $address, "NP 2000"
	待機 100
	GPIB.送信 $address, "NE 1"
	待機 100
	GPIB.送信 $address, "DT 1E-1"
	待機 100
	GPIB.送信 $address, "AS 0"
	待機 100
	GPIB.送信 $address, "AM 0"
	待機 100
	GPIB.送信 $address, "SD 1"
	待機 100
	GPIB.送信 $address, "DL 0, 0.20"
	待機 100
	GPIB.送信 $address, "DL 1, 0.20"
	GPIB.終了 $address
}