pst-optexp のフィルターの外観を変更する

pst-optexp のフィルターの外観を変更する

pst-optexp で利用可能なフィルターの外観を変更したいと思います。

ここに画像の説明を入力してください

各フィルター ボックスには 3 つの波があります。斜線の付いた波を赤くし、その他を黒のままにしたいのですが、どうすればよいですか?

コード:

\documentclass[margin=0]{standalone}
\usepackage{pst-optexp}
\begin{document}
\begin{pspicture}(7,3)
  \psset[optexp]{fiber=none,usefiberstyle}
  \newpsstyle{Fiber}{linecolor=red,linewidth=2\pslinewidth}
  \newpsstyle{Beam}{linestyle=none,fillstyle=solid,fillcolor=red,opacity=1}
  \pnodes(2,2){Laser}(3,2){BS}(4,2){LP}(5,2){HP}(6,2){BP}
  \optbox[optboxsize=2 1,innerlabel,position=start](Laser)(Laser){LASER}
  \optfilter[filtertype=bandstop,filtersize=0.5,labeloffset=0.5,labelangle=-180](BS)(BS){BS}
  \optfilter[filtertype=lowpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](LP)(LP){LP}
  \optfilter[filtertype=highpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](HP)(HP){HP}
  \optfilter[filtertype=bandpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](BP)(BP){BP}
  \drawwidebeam[beamwidth=0.1] {1-5}
\end{pspicture}
\end{document}

編集: フィルターに linecolor=red を追加してみましたが、ボックス全体が赤くなります。斜線部分の波だけが赤くなればよいのです。期待される結果:

ここに画像の説明を入力してください

答え1

ここに画像の説明を入力してください

1 行追加し、2 行目を変更しました。両方とも以下のソースでマークされています。

\documentclass[margin=0]{standalone}
\usepackage{pst-optexp}
\begin{document}
\begin{pspicture}(7,3)
  \psset[optexp]{fiber=none,usefiberstyle}
  \newpsstyle{FilterStyle}{linecolor=red}% <<< Define FilterStyle
  \newpsstyle{Fiber}{linecolor=black,linewidth=1\pslinewidth}% <<< Set linecolor to black
  \newpsstyle{Beam}{linestyle=none,fillstyle=solid,fillcolor=red,opacity=1}
  \pnodes(2,2){Laser}(3,2){BS}(4,2){LP}(5,2){HP}(6,2){BP}
  \optbox[optboxsize=2 1,innerlabel,position=start](Laser)(Laser){LASER}
  \optfilter[filtertype=bandstop,filtersize=0.5,labeloffset=0.5,labelangle=-180](BS)(BS){BS}
  \optfilter[filtertype=lowpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](LP)(LP){LP}
  \optfilter[filtertype=highpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](HP)(HP){HP}
  \optfilter[filtertype=bandpass,filtersize=0.5,labeloffset=0.5,labelangle=-180](BP)(BP){BP}
  \drawwidebeam[beamwidth=0.1] {1-5}
\end{pspicture}
\end{document}

関連情報