bjspetrum2.eps

自己写的关于lpc分析与合成的Demo程序

%!PS-Adobe-2.0 EPSF-1.2
%%Creator: MATLAB, The Mathworks, Inc.
%%Title: .\bjSpetrum2.eps
%%CreationDate: 06/02/2006  12:16:32
%%DocumentNeededFonts: Times-Roman
%%+ Helvetica
%%DocumentProcessColors: Cyan Magenta Yellow Black
%%Extensions: CMYK
%%Pages: 1
%%BoundingBox:   166   317   436   519
%%EndComments

%%BeginProlog
% MathWorks dictionary
/MathWorks 160 dict begin
% definition operators
/bdef {bind def} bind def
/ldef {load def} bind def
/xdef {exch def} bdef
/xstore {exch store} bdef
% operator abbreviations
/c  /clip ldef
/cc /concat ldef
/cp /closepath ldef
/gr /grestore ldef
/gs /gsave ldef
/mt /moveto ldef
/np /newpath ldef
/cm /currentmatrix ldef
/sm /setmatrix ldef
/rm /rmoveto ldef
/rl /rlineto ldef
/s {show newpath} bdef
/sc {setcmykcolor} bdef
/sr /setrgbcolor ldef
/sg /setgray ldef
/w /setlinewidth ldef
/j /setlinejoin ldef
/cap /setlinecap ldef
/rc {rectclip} bdef
/rf {rectfill} bdef
% page state control
/pgsv () def
/bpage {/pgsv save def} bdef
/epage {pgsv restore} bdef
/bplot /gsave ldef
/eplot {stroke grestore} bdef
% orientation switch
/portraitMode 0 def /landscapeMode 1 def /rotateMode 2 def
% coordinate system mappings
/dpi2point 0 def
% font control
/FontSize 0 def
/FMS {/FontSize xstore findfont [FontSize 0 0 FontSize neg 0 0]
  makefont setfont} bdef
/ISOLatin1Encoding where {pop /WindowsLatin1Encoding 256 array bdef
ISOLatin1Encoding WindowsLatin1Encoding copy pop
/.notdef/.notdef/quotesinglbase/florin/quotedblbase/ellipsis/dagger
/daggerdbl/circumflex/perthousand/Scaron/guilsinglleft/OE/.notdef/.notdef
/.notdef/.notdef/quoteleft/quoteright/quotedblleft/quotedblright/bullet
/endash/emdash/tilde/trademark/scaron/guilsinglright/oe/.notdef/.notdef
/Ydieresis WindowsLatin1Encoding 128 32 getinterval astore pop}
{/WindowsLatin1Encoding StandardEncoding bdef} ifelse
/reencode {exch dup where {pop load} {pop StandardEncoding} ifelse
  exch dup 3 1 roll findfont dup length dict begin
  { 1 index /FID ne {def}{pop pop} ifelse } forall
  /Encoding exch def currentdict end definefont pop} bdef
/isroman {findfont /CharStrings get /Agrave known} bdef
/FMSR {3 1 roll 1 index dup isroman {reencode} {pop pop} ifelse
  exch FMS} bdef
/csm {1 dpi2point div -1 dpi2point div scale neg translate
 dup landscapeMode eq {pop -90 rotate}
  {rotateMode eq {90 rotate} if} ifelse} bdef
% line types: solid, dotted, dashed, dotdash
/SO { [] 0 setdash } bdef
/DO { [.5 dpi2point mul 4 dpi2point mul] 0 setdash } bdef
/DA { [6 dpi2point mul] 0 setdash } bdef
/DD { [.5 dpi2point mul 4 dpi2point mul 6 dpi2point mul 4
  dpi2point mul] 0 setdash } bdef
% macros for lines and objects
/L {lineto stroke} bdef
/MP {3 1 roll moveto 1 sub {rlineto} repeat} bdef
/AP {{rlineto} repeat} bdef
/PDlw -1 def
/W {/PDlw currentlinewidth def setlinewidth} def
/PP {closepath eofill} bdef
/DP {closepath stroke} bdef
/MR {4 -2 roll moveto dup  0 exch rlineto exch 0 rlineto
  neg 0 exch rlineto closepath} bdef
/FR {MR stroke} bdef
/PR {MR fill} bdef
/L1i {{currentfile picstr readhexstring pop} image} bdef
/tMatrix matrix def
/MakeOval {newpath tMatrix currentmatrix pop translate scale
0 0 1 0 360 arc tMatrix setmatrix} bdef
/FO {MakeOval stroke} bdef
/PO {MakeOval fill} bdef
/PD {currentlinewidth 2 div 0 360 arc fill
   PDlw -1 eq not {PDlw w /PDlw -1 def} if} def
/FA {newpath tMatrix currentmatrix pop translate scale
  0 0 1 5 -2 roll arc tMatrix setmatrix stroke} bdef
/PA {newpath tMatrix currentmatrix pop	translate 0 0 moveto scale
  0 0 1 5 -2 roll arc closepath tMatrix setmatrix fill} bdef
/FAn {newpath tMatrix currentmatrix pop translate scale
  0 0 1 5 -2 roll arcn tMatrix setmatrix stroke} bdef
/PAn {newpath tMatrix currentmatrix pop translate 0 0 moveto scale
  0 0 1 5 -2 roll arcn closepath tMatrix setmatrix fill} bdef
/vradius 0 def /hradius 0 def /lry 0 def
/lrx 0 def /uly 0 def /ulx 0 def /rad 0 def
/MRR {/vradius xdef /hradius xdef /lry xdef /lrx xdef /uly xdef
  /ulx xdef newpath tMatrix currentmatrix pop ulx hradius add uly
  vradius add translate hradius vradius scale 0 0 1 180 270 arc 
  tMatrix setmatrix lrx hradius sub uly vradius add translate
  hradius vradius scale 0 0 1 270 360 arc tMatrix setmatrix
  lrx hradius sub lry vradius sub translate hradius vradius scale
  0 0 1 0 90 arc tMatrix setmatrix ulx hradius add lry vradius sub
  translate hradius vradius scale 0 0 1 90 180 arc tMatrix setmatrix
  closepath} bdef
/FRR {MRR stroke } bdef
/PRR {MRR fill } bdef
/MlrRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lry uly sub 2 div def
  newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
  rad rad scale 0 0 1 90 270 arc tMatrix setmatrix lrx rad sub lry rad
  sub translate rad rad scale 0 0 1 270 90 arc tMatrix setmatrix
  closepath} bdef
/FlrRR {MlrRR stroke } bdef
/PlrRR {MlrRR fill } bdef
/MtbRR {/lry xdef /lrx xdef /uly xdef /ulx xdef /rad lrx ulx sub 2 div def
  newpath tMatrix currentmatrix pop ulx rad add uly rad add translate
  rad rad scale 0 0 1 180 360 arc tMatrix setmatrix lrx rad sub lry rad
  sub translate rad rad scale 0 0 1 0 180 arc tMatrix setmatrix
  closepath} bdef
/FtbRR {MtbRR stroke } bdef
/PtbRR {MtbRR fill } bdef
/stri 6 array def /dtri 6 array def
/smat 6 array def /dmat 6 array def
/tmat1 6 array def /tmat2 6 array def /dif 3 array def
/asub {/ind2 exch def /ind1 exch def dup dup
  ind1 get exch ind2 get sub exch } bdef
/tri_to_matrix {
  2 0 asub 3 1 asub 4 0 asub 5 1 asub
  dup 0 get exch 1 get 7 -1 roll astore } bdef
/compute_transform {
  dmat dtri tri_to_matrix tmat1 invertmatrix 
  smat stri tri_to_matrix tmat2 concatmatrix } bdef
/ds {stri astore pop} bdef
/dt {dtri astore pop} bdef
/db {2 copy /cols xdef /rows xdef mul dup 3 mul string
  currentfile exch readhexstring pop
  dup 0 3 index getinterval /rbmap xdef
  dup 2 index dup getinterval /gbmap xdef
  1 index dup 2 mul exch getinterval /bbmap xdef pop pop}bdef
/it {gs np dtri aload pop moveto lineto lineto cp c
  cols rows 8 compute_transform 
  rbmap gbmap bbmap true 3 colorimage gr}bdef
/il {newpath moveto lineto stroke}bdef
currentdict end def
%%EndProlog

%%BeginSetup
MathWorks begin

0 cap

end
%%EndSetup

%%Page: 1 1
%%BeginPageSetup
%%PageBoundingBox:   166   317   436   519
MathWorks begin
bpage
%%EndPageSetup

%%BeginObject: obj1
bplot

/dpi2point 12 def
portraitMode 1860 6408 csm

  140   177  3239  2427 MR c np
85 dict begin %Colortable dictionary
/c0 { 0.000000 0.000000 0.000000 sr} bdef
/c1 { 1.000000 1.000000 1.000000 sr} bdef
/c2 { 0.900000 0.000000 0.000000 sr} bdef
/c3 { 0.000000 0.820000 0.000000 sr} bdef
/c4 { 0.000000 0.000000 0.800000 sr} bdef
/c5 { 0.910000 0.820000 0.320000 sr} bdef
/c6 { 1.000000 0.260000 0.820000 sr} bdef
/c7 { 0.000000 0.820000 0.820000 sr} bdef
c0
1 j
1 sg
   0    0 3406 2729 PR
6 w
0 2043 2723 0 0 -2043 511 2320 4 MP
PP
-2723 0 0 2043 2723 0 0 -2043 511 2320 5 MP stroke
4 w
DO
0 sg
 511 2320 mt  511  277 L
 511  277 mt  511  277 L
 851 2320 mt  851  277 L
 851  277 mt  851  277 L
1191 2320 mt 1191  277 L
1191  277 mt 1191  277 L
1532 2320 mt 1532  277 L
1532  277 mt 1532  277 L
1872 2320 mt 1872  277 L
1872  277 mt 1872  277 L
2212 2320 mt 2212  277 L
2212  277 mt 2212  277 L
2553 2320 mt 2553  277 L
2553  277 mt 2553  277 L
2893 2320 mt 2893  277 L
2893  277 mt 2893  277 L
3234 2320 mt 3234  277 L
3234  277 mt 3234  277 L
 511 2320 mt 3234 2320 L
3234 2320 mt 3234 2320 L
 511 2093 mt 3234 2093 L
3234 2093 mt 3234 2093 L
 511 1866 mt 3234 1866 L
3234 1866 mt 3234 1866 L
 511 1639 mt 3234 1639 L
3234 1639 mt 3234 1639 L
 511 1412 mt 3234 1412 L
3234 1412 mt 3234 1412 L
 511 1185 mt 3234 1185 L
3234 1185 mt 3234 1185 L
 511  958 mt 3234  958 L
3234  958 mt 3234  958 L
 511  731 mt 3234  731 L
3234  731 mt 3234  731 L
 511  504 mt 3234  504 L
3234  504 mt 3234  504 L
 511  277 mt 3234  277 L
3234  277 mt 3234  277 L
SO
6 w
 511  277 mt 3234  277 L
 511 2320 mt 3234 2320 L
3234 2320 mt 3234  277 L
 511 2320 mt  511  277 L
 511 2320 mt 3234 2320 L
 511 2320 mt  511  277 L
 511 2320 mt  511 2292 L
 511  277 mt  511  304 L
%%IncludeResource: font Times-Roman
/Times-Roman /WindowsLatin1Encoding 96 FMSR

 487 2440 mt 
(0) s
 851 2320 mt  851 2292 L
 851  277 mt  851  304 L
 779 2440 mt 
(500) s
1191 2320 mt 1191 2292 L
1191  277 mt 1191  304 L
1095 2440 mt 
(1000) s
1532 2320 mt 1532 2292 L
1532  277 mt 1532  304 L
1436 2440 mt 
(1500) s
1872 2320 mt 1872 2292 L
1872  277 mt 1872  304 L
1776 2440 mt 
(2000) s
2212 2320 mt 2212 2292 L
2212  277 mt 2212  304 L
2116 2440 mt 
(2500) s
2553 2320 mt 2553 2292 L
2553  277 mt 2553  304 L
2457 2440 mt 
(3000) s
2893 2320 mt 2893 2292 L
2893  277 mt 2893  304 L
2797 2440 mt 
(3500) s
3234 2320 mt 3234 2292 L
3234  277 mt 3234  304 L
3138 2440 mt 
(4000) s
 511 2320 mt  538 2320 L
3234 2320 mt 3206 2320 L
 326 2354 mt 
(-18) s
 511 2093 mt  538 2093 L
3234 2093 mt 3206 2093 L
 326 2127 mt 
(-16) s
 511 1866 mt  538 1866 L
3234 1866 mt 3206 1866 L
 326 1900 mt 
(-14) s
 511 1639 mt  538 1639 L
3234 1639 mt 3206 1639 L
 326 1673 mt 
(-12) s
 511 1412 mt  538 1412 L
3234 1412 mt 3206 1412 L
 326 1446 mt 
(-10) s
 511 1185 mt  538 1185 L
3234 1185 mt 3206 1185 L
 374 1219 mt 
(-8) s
 511  958 mt  538  958 L
3234  958 mt 3206  958 L
 374  992 mt 
(-6) s
 511  731 mt  538  731 L
3234  731 mt 3206  731 L
 374  765 mt 
(-4) s
 511  504 mt  538  504 L
3234  504 mt 3206  504 L
 374  538 mt 
(-2) s
 511  277 mt  538  277 L
3234  277 mt 3206  277 L
 428  311 mt 
(0) s
 511  277 mt 3234  277 L
 511 2320 mt 3234 2320 L
3234 2320 mt 3234  277 L
 511 2320 mt  511  277 L
gs 511 277 2724 2044 MR c np
/c8 { 0.000000 0.000000 1.000000 sr} bdef
c8
35 -213 34 99 34 -130 34 166 34 213 34 -204 34 -1 34 461 
34 206 34 -358 34 -22 34 34 34 -301 34 101 34 83 34 -129 
34 -185 34 179 34 -130 34 221 34 -105 34 -529 34 518 34 320 
34 -146 34 1 35 -313 34 180 34 -188 34 48 34 432 34 14 
34 -36 34 121 34 -151 34 -1136 34 1000 34 -71 34 -349 34 505 
34 8 34 -1064 34 1409 34 -14 34 -767 34 557 34 -81 34 -331 
34 -191 34 35 34 -431 34 382 34 257 35 -189 34 -567 34 -11 
34 -316 34 287 34 22 34 24 34 494 34 186 34 204 34 233 
34 -28 34 -44 34 42 34 234 34 -130 34 265 34 -464 34 185 
34 -98 34 443 34 -32 34 -150 34 -254 34 611 34 -198 545 475 80 MP stroke
DD
18 3 17 5 17 7 17 9 17 11 17 14 17 16 17 18 
17 21 17 24 17 26 17 29 17 33 17 34 17 38 17 39 
17 39 17 36 17 31 17 21 17 6 17 -9 17 -23 17 -33 
17 -40 17 -42 17 -42 17 -40 17 -38 17 -35 17 -31 17 -29 
17 -25 17 -22 17 -19 17 -17 17 -13 17 -11 17 -8 17 -5 
17 -2 17 0 17 2 17 6 17 7 17 11 17 13 17 16 
17 19 17 21 17 25 17 26 17 29 18 31 17 32 17 33 
17 31 17 27 17 22 17 15 17 5 17 -3 17 -12 17 -17 
17 -22 17 -22 17 -23 17 -21 17 -19 17 -17 17 -13 17 -9 
17 -6 17 -2 17 1 17 6 17 11 17 14 17 20 17 25 
17 30 17 35 17 41 17 46 17 47 17 46 17 34 17 12 
17 -17 17 -43 17 -60 17 -66 17 -66 17 -62 17 -58 17 -53 
17 -48 17 -43 17 -38 1549 1237 100 MP stroke
17 -35 17 -30 17 -28 17 -23 17 -21 17 -18 17 -15 18 -13 
17 -10 17 -7 17 -5 17 -3 17 0 17 2 17 4 17 7 
17 9 17 11 17 14 17 16 17 18 17 22 17 24 17 26 
17 30 17 33 17 36 17 39 17 43 17 47 17 50 17 55 
17 57 17 60 17 62 17 60 17 56 17 45 17 31 17 14 
17 -1 17 -10 17 -15 17 -16 17 -14 17 -9 17 -6 17 1 
17 6 17 12 17 18 17 25 17 31 17 38 17 44 17 48 
17 51 17 47 17 34 17 13 528 277 61 MP stroke
gr

c8
DD
0 sg
1590 2559 mt 
(Frequency, Hz) s
 251 1799 mt  -90 rotate
(Normlized Amplitude /dB) s
90 rotate
SO

end %%Color Dict

eplot
%%EndObject

epage
end

showpage

%%Trailer
%%EOF