\documentclass[a4paper,10pt,oneside,openany,fleqno]{article}
\usepackage{pgf-spectra}
\def\version{3.0.0}%
\addtolength{\textwidth}{3.5cm}
\addtolength{\textheight}{2.5cm}
\addtolength{\topmargin}{-1.25cm}
\setlength{\parindent}{0pt}
\setlength{\oddsidemargin}{0pt}
\usepackage[pdfstartview={ },colorlinks=true, linkcolor=black!50!green, citecolor=gray, urlcolor=teal, hyperindex, plainpages=false,bookmarksopenlevel=2,bookmarksopen=true]{hyperref}%
\hypersetup{%Start options on pdf
pdftitle = {Part of pgf-spectra package (v\version)},%
pdfsubject = {NIST - emission lines of the elements},%
pdfkeywords = {Data getted from NIST:^^J
https://physics.nist.gov/PhysRefData/Handbook/Tables/findinglist.htm},%
pdfauthor = {\textcopyright Hugo Gomes},%
%pdfcreator = {\LaTeX\ with package \flqq hyperref\frqq},
pdfproducer = {pdfeTeX-1.\the\pdftexversion\pdftexrevision},
}%End options on pdf
\usepackage{fancyhdr}
\usepackage{lastpage}
\renewcommand{\headrulewidth}{0.4pt}%
\renewcommand{\footrulewidth}{0.4pt}%
\addtolength{\headheight}{25pt}%
\fancypagestyle{wlNIST}{%
\fancyhf{} % clear all header and footer fields
\fancyhead[R]{Lines Data (NIST)}%
\fancyhead[L]{\color{blue}pgf-spectra \version}%
\fancyfoot[R]{\textbf{\thepage\ of \pageref{LastPage}}}%
\fancyfoot[L]{\ }}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% multiple lists to avoid pdflatex �error�
%
% TeX capacity exceeded, sorry [main memory size=3000000].
%
\def\wlelemlistA{He/2,Li/3,Be/4,B/5,C/6,N/7,O/8}%
\def\wlelemlistB{F/9,Ne/10,Na/11,Mg/12,Al/13,Si/14,P/15,S/16}%
\def\wlelemlistC{Cl/17,Ar/18,K/19,Ca/20,Sc/21,Ti/22,V/23,Cr/24}%
\def\wlelemlistD{Mn/25,Fe/26,Co/27,Ni/28,Cu/29,Zn/30,Ga/31,Ge/32}%
\def\wlelemlistE{As/33,Se/34,Br/35,Kr/36,Rb/37,Sr/38,Y/39,Zr/40}%
\def\wlelemlistF{Nb/41,Mo/42,Tc/43,Ru/44,Rh/45,Pd/46,Ag/47,Cd/48}%
\def\wlelemlistG{In/49,Sn/50,Sb/51,Te/52,I/53,Xe/54,Cs/55,Ba/56}%
\def\wlelemlistH{La/57,Ce/58,Pr/59,Nd/60,Pm/61,Sm/62,Eu/63,Gd/64}%
\def\wlelemlistI{Tb/65,Dy/66,Ho/67,Er/68,Tm/69,Yb/70,Lu/71,Hf/72}%
\def\wlelemlistJ{Ta/73,W/74,Re/75,Os/76,Ir/77,Pt/78,Au/79,Hg/80}%
\def\wlelemlistK{Tl/81,Pb/82,Bi/83,Po/84,At/85,Rn/86,Ra/88,Ac/89}%
\def\wlelemlistL{Th/90,Pa/91,U/92,Np/93,Pu/94,Am/95,Cm/96,Bk/97}%
\def\wlelemlistM{Cf/98,Es/99}%
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
\begin{document}%
\usefont{T1}{verdana}{m}{n}%
\pagestyle{wlNIST}%
\noindent% {1,...,192} Z=84,85 e 86 only neutral atom
Data NIST%
\pgfspectraStyle[axis,axis step=190,axis ticks=9,begin=10,end=4000,back=visible40,gamma=.6,axis,axis font=\fontsize{4.5}{4.5}\selectfont,line width=.5pt,height=7mm]%
\\ [10pt]\pdfbookmark[1]{Z=1 (H)}{elem1}%
\makebox[\linewidth][c]{%
\pgfspectra[element=H,label,label position=north west,label font=\footnotesize,label before text={(Z=1)\ },label after text={\ -- Emission lines of neutral atom}]%
}\vfill%
\foreach \SQ/\Z in \wlelemlistA {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistB {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistC {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistD {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistE {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistF {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistG {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistH {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistI {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistJ {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistK {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistL {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vfill%
}%
\newpage%
\foreach \SQ/\Z in \wlelemlistM {%
\pdfbookmark[1]{Z=\Z\ (\SQ)}{elem\Z}%
\vbox{%
\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,label,label position=north west,label font=\footnotesize,label before text={(Z=\Z)\ },%
label after text={\ -- Emission lines of neutral atom and all lines available (on top and below)}]%
}\vskip0pt\makebox[\linewidth][c]{%
\pgfspectra[element=\SQ,charge=all]%
}}\vskip6pt%
}%
\end{document}