mjhjmtu

I am trying to draw a diagram that looks approximately like this:

The red boxes are the items I would like to add to the diagram. They represent spectra lines that can be generated using the pgf-spectra package (https://ctan.org/pkg/pgf-spectra?lang=en). When I try to use a scope to move the box like in my not working example below, the spectra box is not moved. I was wondering if it were possible to move the spectra boxes at all, either in the document or by changing code in the package .sty files

My MNWE:

documentclassstandalone
usepackagetikz
usepackagepgf-spectra
usetikzlibrarydecorations.pathmorphing
tikzsetsnake it/.style=decorate, decoration=snake
begindocument
 begintikzpicture
 draw[-latex] (0,0) ++ (60:1.5) arc (60:120:1.5);
 draw[-latex] (0,0) ++ (-120:1.5) arc (-120:-60:1.5);
 draw[snake it,blue,-latex,thick] (0,1) -- (-4,1);
 draw[snake it,red,-latex,thick] (0,-1) -- (-4,-1);
 draw[snake it,-latex,thick] (-1,0) -- (-4,0);
 draw[fill=yellow!50] (0,0) circle (1);
% -- this part below is what I want to move but it does not behave correctly
 beginscopexshift=-4cm,yshift=1cm
 pgfspectra[width=5cm]
 endscope
endtikzpicture
enddocument

Here is the output it renders:

WARNING: This is a workaround for a simple use case. It does not provide any of the complex options the package will offer. If you wanted these, the package would need to be fixed.

With a bit of reverse engineering you can get something like the following. It copies some internal parts from pgf-spectra to avoid nesting tikzpictures which are preventing your scope from shifting. You may still set width and height keys.

documentclassarticle
usepackagetikz
usepackagepgf-spectra
usetikzlibrarydecorations.pathmorphing
tikzsetsnake it/.style=decorate, decoration=snake
begindocument
 begintikzpicture
 draw[-latex] (0,0) ++ (60:1.5) arc (60:120:1.5);
 draw[-latex] (0,0) ++ (-120:1.5) arc (-120:-60:1.5);
 draw[snake it,blue,-latex,thick] (0,1) -- (-4,1);
 draw[snake it,red,-latex,thick] (0,-1) -- (-4,-1);
 draw[snake it,-latex,thick] (-1,0) -- (-4,0);
 draw[fill=yellow!50] (0,0) circle (1);
 makeatletter
 beginscope[shift=(-10cm,.5cm)]
 % adapted from pgf-spectra.sty
 pgfkeys/wl/.cd,width=5cm,height=1cm
 foreach x in 380,...,780%
 %
 pgfmathparsewlwidth/(abs(wlend-wlbegin))edefxscalepgfmathresult
 edefwl@linewidthxscale pt
 wlcolorx%
 pgfmathparse(x-380)*xscaleedefwl@currentxpgfmathresult pt%
 draw[wltemp,line width=wl@linewidth] (wl@currentx,0) -- ++(0,wlheight);%
 %
 endscope
 makeatother
endtikzpicture
enddocument

I have made a workaround using TeXnician's suggestions:

documentclassarticle
usepackagetikz
usepackagepgf-spectra
usetikzlibrarydecorations.pathmorphing
tikzsetsnake it/.style=decorate, decoration=snake
begindocument
 setlengthunitlength1cm
 thicklines
 beginpicture(0,0)
 put(-5,2.5) parbox4cmpgfspectra[lines=390,490,540,690,absorption,height=0.5cm,width=5cm]
 put(-5,2) parbox4cmpgfspectra[lines=395,495,545,695,absorption,height=0.5cm,width=5cm]
 put(-5,1.5) parbox4cmpgfspectra[lines=400,500,550,700,absorption,height=0.5cm,width=5cm]
 put(-5,1) parbox4cmpgfspectra[lines=405,505,555,705,absorption,height=0.5cm,width=5cm]
 put(-5,0.5) parbox4cmpgfspectra[lines=410,510,560,710,absorption,height=0.5cm,width=5cm]
 put(-5,-0.5) parbox14cmpgfspectra[lines=400,500,550,700,absorption,height=0.5cm,width=5cm,line width=4pt]
 endpicture
 begintikzpicture
 draw[-latex] (0,0) ++ (60:1.5) arc (60:120:1.5);
 draw[-latex] (0,0) ++ (-120:1.5) arc (-120:-60:1.5);
 draw[snake it,blue,-latex,thick] (0,1) -- (-4,1);
 draw[snake it,red,-latex,thick] (0,-1) -- (-4,-1);
 draw[snake it,-latex,thick] (-1,0) -- (-4,0);
 draw[fill=yellow!50] (0,0) circle (1);
 endtikzpicture
 tikz[overlay,remember picture]node at (-2.8,-0.5) Widening of absorption lines;
enddocument