PRO TESTPANELS
COMPILE_OPT IDL2
lambda = [385., 410., 470., 550., 670., 865.]
xleg = 350
p1 = PLOT(lambda,findgen(6), POSITION=[.1,.55,.45,.9], /NoData)
p1a = PLOT(lambda,findgen(6), /Overplot)
leg2 = TEXT(xleg, 0.5, 'a)', /Data, Overplot=p1)
p2 = PLOT(lambda,findgen(6), POSITION=[.55,.55,.9,.9], /NoData, /Current)
p2a = PLOT(lambda,findgen(6), /Overplot)
leg2 = TEXT(xleg, 0.585, 'b)', /Data, Overplot=p2)
p3 = PLOT(lambda,findgen(6), POSITION=[.1,.1,.45,.45], /NoData, /Current)
p3a = PLOT(lambda,findgen(6), /Overplot)
leg3 = TEXT(xleg, 4, 'item 1', color = 'red', /Data, Overplot=p3)
leg3b = TEXT(xleg, 3, 'item2', color = 'blue', /Data, Overplot=p3)
leg3c = TEXT(xleg, 1, 'c)', /Data, Overplot=p3)
p4 = PLOT(lambda,findgen(6), POSITION=[.55,.1,.9,.45], /NoData, /Current)
p4a = PLOT(lambda,findgen(6), /Overplot)
leg4 = TEXT(xleg, 1, 'd)', /Data, Overplot=p4)
END