Window, 2, /Pixmap, XSize=256*10, YSize=256
Window, 1, XSize=256, YSize=256
value = FIndGen(5)
FOR j=0,9 DO BEGIN 
	Plot, Value, /NoData, YRange=[0,10] 
	Bar_Plot, RandomU(seed, 5) * 9.0, /Overplot 
	temp = TvRd() 
	WSet, 2
	Tv, temp, 256*j, 0
	WSet, 1
ENDFOR
END