igorで２つの等高線を重ねる

Window lnorm_e_d_s_moto() : Graph
	#Parameter
	##Filename
	String header="test1"
	String header2="test2"
	##Folder name 
	String dir1234="C:Documents and Settings:"
	##Levels 
	make /O/N=100 kugiri3
	make /O/N=100 kugiri3A
	kugiri3=0.5*x
	kugiri3A=0.5*x
	
	
	#Program
	String filename=dir1234+header+"1.dat"
	String mat_wave1="matrix"+header
	String mat_wave1b="matrix"+header+"0"
	String mat_wave2="x1_"+header
	String mat_wave2b="x1_"+header+"0"
	String mat_wave3="y1_"+header
	String mat_wave3b="y1_"+header+"0"
	loadwave /M/G/N=$mat_wave1/O filename
	
	String filenameA=dir1234+header2+"1.dat"
	String mat_wave1A="matrix"+header2
	String mat_wave1bA="matrix"+header2+"0"
	String mat_wave2A="x1_"+header2
	String mat_wave2bA="x1_"+header2+"0"
	String mat_wave3A="y1_"+header2
	String mat_wave3bA="y1_"+header2+"0"
	loadwave /M/G/N=$mat_wave1A/O filenameA

	print mat_wave1bA
	String filename2=dir1234+header+"2.dat"
	loadwave /G/N=$mat_wave2/O filename2
	
	String filename3=dir1234+header+"3.dat"
	loadwave /G/N=$mat_wave3/O filename3
	
	print mat_wave1bA
	String filename2A=dir1234+header2+"2.dat"
	loadwave /G/N=$mat_wave2A/O filename2A
	
	String filename3A=dir1234+data_d_e_s_2+"3.dat"
	loadwave /G/N=$mat_wave3A/O filename3A
	
	
	
	 Display;AppendMatrixContour $mat_wave1b vs {$mat_wave2b,$mat_wave3b};DelayUpdate
       ModifyContour  $mat_wave1b rgbLines=(65280,0,0),manLevels=kugiri3,labels=0
       AppendMatrixContour $mat_wave1bA vs {$mat_wave2bA,$mat_wave3bA};DelayUpdate
       ModifyContour  $mat_wave1bA rgbLines=(0,0,0),manLevels=kugiri3A,labels=0
	ModifyGraph log=1
	ModifyGraph fSize=25
	Label left "Y";DelayUpdate
	Label bottom "X"
	ModifyGraph standoff(bottom)=0
	ModifyGraph tick(bottom)=2
	ModifyGraph standoff(left)=0
	ModifyGraph tick(left)=2
	ModifyGraph mirror=1
	
EndMacro