fmradio.tex

{
% FM Radio 85-108MHz (one row)
\psset{linestyle=solid, linewidth=1pt}
\definecolor{BoxColor}{rgb}{0.9,0.68,0.86}
\psframe[fillstyle=solid, fillcolor=BoxColor,linewidth=0pt,linestyle=none](3.78,16.1)(6.71,16.3)

\rput(5.351,16.3){\psframebox[framesep=2pt,framearc=0.2,fillstyle=solid, fillcolor=BoxColor,linewidth=0pt,linestyle=none]{FM Radio}}

%draw a baseline for the scale
\psline(3.78,16.1)(6.71,16.1)

%Put labels up
\rput(3.784,16.200){\psframebox[framesep=0pt,framearc=0,fillstyle=solid, fillcolor=BoxColor,linestyle=none]{87.7}}
\rput(4.476,16.200){92.1}
\rput(5.077,16.200){96.1}
\rput(5.653,16.200){100.1}
\rput(6.207,16.200){104.1}
\rput(6.714,16.200){\psframebox[framesep=0pt,framearc=0,fillstyle=solid, fillcolor=BoxColor,linestyle=none]{107.9}}

%I noticed that my FM car radio starts at 87.7MHz and goes up by 0.2MHz to 107.9MHz
%
%The following lines of code are generated by scale.c with entered settings of 87.7e6 107.9e6 0.2e6
%They have been shifted vertically with a search and replace on the Y co-ordinates

\psline(3.784,16.100)(3.784,16.15)% 	point=87700000.00
\psline(3.816,16.100)(3.816,16.125)% 	point=87900000.00
\psline(3.848,16.100)(3.848,16.125)% 	point=88100000.00
\psline(3.880,16.100)(3.880,16.125)% 	point=88300000.00
\psline(3.912,16.100)(3.912,16.125)% 	point=88500000.00
\psline(3.944,16.100)(3.944,16.125)% 	point=88700000.00
\psline(3.976,16.100)(3.976,16.125)% 	point=88900000.00
\psline(4.007,16.100)(4.007,16.125)% 	point=89100000.00
\psline(4.039,16.100)(4.039,16.125)% 	point=89300000.00
\psline(4.071,16.100)(4.071,16.125)% 	point=89500000.00
\psline(4.102,16.100)(4.102,16.125)% 	point=89700000.00
\psline(4.134,16.100)(4.134,16.125)% 	point=89900000.00
\psline(4.165,16.100)(4.165,16.125)% 	point=90100000.00
\psline(4.197,16.100)(4.197,16.125)% 	point=90300000.00
\psline(4.228,16.100)(4.228,16.125)% 	point=90500000.00
\psline(4.259,16.100)(4.259,16.125)% 	point=90700000.00
\psline(4.290,16.100)(4.290,16.125)% 	point=90900000.00
\psline(4.321,16.100)(4.321,16.125)% 	point=91100000.00
\psline(4.352,16.100)(4.352,16.125)% 	point=91300000.00
\psline(4.383,16.100)(4.383,16.125)% 	point=91500000.00
\psline(4.414,16.100)(4.414,16.125)% 	point=91700000.00
\psline(4.445,16.100)(4.445,16.125)% 	point=91900000.00
\psline(4.476,16.100)(4.476,16.15)% 	point=92100000.00
\psline(4.506,16.100)(4.506,16.125)% 	point=92300000.00
\psline(4.537,16.100)(4.537,16.125)% 	point=92500000.00
\psline(4.567,16.100)(4.567,16.125)% 	point=92700000.00
\psline(4.598,16.100)(4.598,16.125)% 	point=92900000.00
\psline(4.628,16.100)(4.628,16.125)% 	point=93100000.00
\psline(4.659,16.100)(4.659,16.125)% 	point=93300000.00
\psline(4.689,16.100)(4.689,16.125)% 	point=93500000.00
\psline(4.719,16.100)(4.719,16.125)% 	point=93700000.00
\psline(4.749,16.100)(4.749,16.125)% 	point=93900000.00
\psline(4.779,16.100)(4.779,16.125)% 	point=94100000.00
\psline(4.809,16.100)(4.809,16.125)% 	point=94300000.00
\psline(4.839,16.100)(4.839,16.125)% 	point=94500000.00
\psline(4.869,16.100)(4.869,16.125)% 	point=94700000.00
\psline(4.899,16.100)(4.899,16.125)% 	point=94900000.00
\psline(4.929,16.100)(4.929,16.125)% 	point=95100000.00
\psline(4.959,16.100)(4.959,16.125)% 	point=95300000.00
\psline(4.988,16.100)(4.988,16.125)% 	point=95500000.00
\psline(5.018,16.100)(5.018,16.125)% 	point=95700000.00
\psline(5.047,16.100)(5.047,16.125)% 	point=95900000.00
\psline(5.077,16.100)(5.077,16.15)% 	point=96100000.00
\psline(5.106,16.100)(5.106,16.125)% 	point=96300000.00
\psline(5.135,16.100)(5.135,16.125)% 	point=96500000.00
\psline(5.165,16.100)(5.165,16.125)% 	point=96700000.00
\psline(5.194,16.100)(5.194,16.125)% 	point=96900000.00
\psline(5.223,16.100)(5.223,16.125)% 	point=97100000.00
\psline(5.252,16.100)(5.252,16.125)% 	point=97300000.00
\psline(5.281,16.100)(5.281,16.125)% 	point=97500000.00
\psline(5.310,16.100)(5.310,16.125)% 	point=97700000.00
\psline(5.339,16.100)(5.339,16.125)% 	point=97900000.00
\psline(5.368,16.100)(5.368,16.125)% 	point=98100000.00
\psline(5.397,16.100)(5.397,16.125)% 	point=98300000.00
\psline(5.425,16.100)(5.425,16.125)% 	point=98500000.00
\psline(5.454,16.100)(5.454,16.125)% 	point=98700000.00
\psline(5.483,16.100)(5.483,16.125)% 	point=98900000.00
\psline(5.511,16.100)(5.511,16.125)% 	point=99100000.00
\psline(5.540,16.100)(5.540,16.125)% 	point=99300000.00
\psline(5.568,16.100)(5.568,16.125)% 	point=99500000.00
\psline(5.597,16.100)(5.597,16.125)% 	point=99700000.00
\psline(5.625,16.100)(5.625,16.125)% 	point=99900000.00
\psline(5.653,16.100)(5.653,16.15)% 	point=100100000.00
\psline(5.682,16.100)(5.682,16.125)% 	point=100300000.00
\psline(5.710,16.100)(5.710,16.125)% 	point=100500000.00
\psline(5.738,16.100)(5.738,16.125)% 	point=100700000.00
\psline(5.766,16.100)(5.766,16.125)% 	point=100900000.00
\psline(5.794,16.100)(5.794,16.125)% 	point=101100000.00
\psline(5.822,16.100)(5.822,16.125)% 	point=101300000.00
\psline(5.850,16.100)(5.850,16.125)% 	point=101500000.00
\psline(5.877,16.100)(5.877,16.125)% 	point=101700000.00
\psline(5.905,16.100)(5.905,16.125)% 	point=101900000.00
\psline(5.933,16.100)(5.933,16.125)% 	point=102100000.00
\psline(5.961,16.100)(5.961,16.125)% 	point=102300000.00
\psline(5.988,16.100)(5.988,16.125)% 	point=102500000.00
\psline(6.016,16.100)(6.016,16.125)% 	point=102700000.00
\psline(6.043,16.100)(6.043,16.125)% 	point=102900000.00
\psline(6.071,16.100)(6.071,16.125)% 	point=103100000.00
\psline(6.098,16.100)(6.098,16.125)% 	point=103300000.00
\psline(6.126,16.100)(6.126,16.125)% 	point=103500000.00
\psline(6.153,16.100)(6.153,16.125)% 	point=103700000.00
\psline(6.180,16.100)(6.180,16.125)% 	point=103900000.00
\psline(6.207,16.100)(6.207,16.15)% 	point=104100000.00
\psline(6.234,16.100)(6.234,16.125)% 	point=104300000.00
\psline(6.261,16.100)(6.261,16.125)% 	point=104500000.00
\psline(6.289,16.100)(6.289,16.125)% 	point=104700000.00
\psline(6.316,16.100)(6.316,16.125)% 	point=104900000.00
\psline(6.342,16.100)(6.342,16.125)% 	point=105100000.00
\psline(6.369,16.100)(6.369,16.125)% 	point=105300000.00
\psline(6.396,16.100)(6.396,16.125)% 	point=105500000.00
\psline(6.423,16.100)(6.423,16.125)% 	point=105700000.00
\psline(6.450,16.100)(6.450,16.125)% 	point=105900000.00
\psline(6.476,16.100)(6.476,16.125)% 	point=106100000.00
\psline(6.503,16.100)(6.503,16.125)% 	point=106300000.00
\psline(6.530,16.100)(6.530,16.125)% 	point=106500000.00
\psline(6.556,16.100)(6.556,16.125)% 	point=106700000.00
\psline(6.583,16.100)(6.583,16.125)% 	point=106900000.00
\psline(6.609,16.100)(6.609,16.125)% 	point=107100000.00
\psline(6.635,16.100)(6.635,16.125)% 	point=107300000.00
\psline(6.662,16.100)(6.662,16.125)% 	point=107500000.00
\psline(6.688,16.100)(6.688,16.125)% 	point=107700000.00
\psline(6.714,16.100)(6.714,16.15)% 	point=107900000.00


%\rput(3.34,16.20){\psframebox[framearc=0.25,fillstyle=solid, fillcolor=BoxColor,linecolor=Black]{85MHz}}
%\rput(8.22,16.20){\psframebox[framearc=0.25,fillstyle=solid, fillcolor=BoxColor,linecolor=Black]{120MHz}}

%\rput(3.34,16.2){85MHz}
%\rput(8.22,16.2){120MHz}

}