oqpnrzmf.mdl

现代通信系统（Matlab版）一书的所有例子的matlab程序

      MaskDisplay	      "disp('Error\\nmeter')"
      MaskIconFrame	      on
      MaskIconOpaque	      on
      MaskIconRotate	      "none"
      MaskIconUnits	      "autoscale"
      MaskValueString	      "2|10|1.5|1"
      System {
	Name			"Error rate"
	Location		[255, 368, 509, 510]
	Open			off
	ModelBrowserVisibility	off
	ModelBrowserWidth	200
	ScreenColor		"white"
	PaperOrientation	"landscape"
	PaperPositionMode	"auto"
	PaperType		"usletter"
	PaperUnits		"inches"
	ZoomFactor		"100"
	Block {
	  BlockType		  Inport
	  Name			  "in_1"
	  Position		  [15, 45, 35, 65]
	}
	Block {
	  BlockType		  Inport
	  Name			  "in_2"
	  Position		  [15, 60, 35, 80]
	  Port			  "2"
	}
	Block {
	  BlockType		  Mux
	  Name			  "Mux"
	  Ports			  [2, 1]
	  Position		  [65, 46, 100, 79]
	  Inputs		  "2"
	}
	Block {
	  BlockType		  "S-Function"
	  Name			  "S-function"
	  Ports			  [1]
	  Position		  [130, 52, 195, 78]
	  FunctionName		  "sbiterr"
	  Parameters		  "num_lin, K, TDelay, Sample"
	}
	Line {
	  SrcBlock		  "Mux"
	  SrcPort		  1
	  DstBlock		  "S-function"
	  DstPort		  1
	}
	Line {
	  SrcBlock		  "in_1"
	  SrcPort		  1
	  DstBlock		  "Mux"
	  DstPort		  1
	}
	Line {
	  SrcBlock		  "in_2"
	  SrcPort		  1
	  DstBlock		  "Mux"
	  DstPort		  2
	}
      }
    }
    Block {
      BlockType		      SubSystem
      Name		      "Receiver"
      Ports		      [1, 1]
      Position		      [650, 62, 725, 148]
      ShowPortLabels	      off
      TreatAsAtomicUnit	      off
      System {
	Name			"Receiver"
	Location		[-8, 107, 1000, 385]
	Open			off
	ModelBrowserVisibility	off
	ModelBrowserWidth	200
	ScreenColor		"white"
	PaperOrientation	"landscape"
	PaperPositionMode	"auto"
	PaperType		"usletter"
	PaperUnits		"inches"
	ZoomFactor		"100"
	Block {
	  BlockType		  Inport
	  Name			  "noisy\nOQPSK-\nSignal"
	  Position		  [25, 145, 45, 165]
	}
	Block {
	  BlockType		  Clock
	  Name			  "Clock"
	  Position		  [145, 140, 165, 160]
	  ShowName		  off
	  Decimation		  "10"
	}
	Block {
	  BlockType		  Fcn
	  Name			  "Fcn"
	  Position		  [185, 119, 265, 141]
	  ShowName		  off
	  Expr			  "2*cos(4*pi*u)"
	}
	Block {
	  BlockType		  Fcn
	  Name			  "Fcn1"
	  Position		  [185, 159, 265, 181]
	  ShowName		  off
	  Expr			  "-2*sin(4*pi*u)"
	}
	Block {
	  BlockType		  "S-Function"
	  Name			  "Integrate and Dump"
	  Ports			  [1, 1]
	  Position		  [490, 68, 570, 112]
	  FunctionName		  "schdint"
	  Parameters		  "td, ts, limit"
	  MaskType		  "Scheduled reset integration"
	  MaskDescription	  "Reset the state to be zero(s) at the\nsched"
"uled reset sample point."
	  MaskHelp		  "This block resets the state(s) to be zero(s"
") at the reset time points. The reset interval can be a two-element vector wi"
"th the second element as offset. The computation sample time must be smaller "
"than the reset interval. The block resets the state value to be the remainder"
" of the state divided by the modulo bound when the absolute value of the stat"
"e is larger than the modulo bound."
	  MaskPromptString	  "Scheduled reset time interval and offset (s"
"ec):|Computation sample time and offset (sec):|Modulo bound:"
	  MaskStyleString	  "edit,edit,edit"
	  MaskTunableValueString  "on,on,on"
	  MaskCallbackString	  "||"
	  MaskEnableString	  "on,on,on"
	  MaskVisibilityString	  "on,on,on"
	  MaskToolTipString	  "on,on,on"
	  MaskVarAliasString	  ",,"
	  MaskInitialization	  "td=@1;ts=@2;limit=@3;"
	  MaskDisplay		  "disp('Scheduled\\nreset-int')"
	  MaskIconFrame		  on
	  MaskIconOpaque	  on
	  MaskIconRotate	  "none"
	  MaskIconUnits		  "autoscale"
	  MaskValueString	  "[1 0.5]|.01|999"
	}
	Block {
	  BlockType		  "S-Function"
	  Name			  "Integrate and Dump_"
	  Ports			  [1, 1]
	  Position		  [490, 203, 570, 247]
	  FunctionName		  "schdint"
	  Parameters		  "td, ts, limit"
	  MaskType		  "Scheduled reset integration"
	  MaskDescription	  "Reset the state to be zero(s) at the\nsched"
"uled reset sample point."
	  MaskHelp		  "This block resets the state(s) to be zero(s"
") at the reset time points. The reset interval can be a two-element vector wi"
"th the second element as offset. The computation sample time must be smaller "
"than the reset interval. The block resets the state value to be the remainder"
" of the state divided by the modulo bound when the absolute value of the stat"
"e is larger than the modulo bound."
	  MaskPromptString	  "Scheduled reset time interval and offset (s"
"ec):|Computation sample time and offset (sec):|Modulo bound:"
	  MaskStyleString	  "edit,edit,edit"
	  MaskTunableValueString  "on,on,on"
	  MaskCallbackString	  "||"
	  MaskEnableString	  "on,on,on"
	  MaskVisibilityString	  "on,on,on"
	  MaskToolTipString	  "on,on,on"
	  MaskVarAliasString	  ",,"
	  MaskInitialization	  "td=@1;ts=@2;limit=@3;"
	  MaskDisplay		  "disp('Scheduled\\nreset-int')"
	  MaskIconFrame		  on
	  MaskIconOpaque	  on
	  MaskIconRotate	  "none"
	  MaskIconUnits		  "autoscale"
	  MaskValueString	  "[1 0.5]|.01|999"
	}
	Block {
	  BlockType		  Product
	  Name			  "Product"
	  Ports			  [2, 1]
	  Position		  [300, 74, 330, 101]
	  ShowName		  off
	}
	Block {
	  BlockType		  Product
	  Name			  "Product1"
	  Ports			  [2, 1]
	  Position		  [295, 213, 325, 237]
	  ShowName		  off
	}
	Block {
	  BlockType		  SubSystem
	  Name			  "QPSK demap"
	  Ports			  [2, 1]
	  Position		  [800, 124, 875, 171]
	  TreatAsAtomicUnit	  off
	  MaskType		  "MPSK demapping"
	  MaskDescription	  "Reverse the QASK map. Input in-phase\nand q"
"uadrature components from the\ntwo inputs. Output demapped signal."
	  MaskHelp		  "This block demaps a QASK mapped signal usin"
"g circle constellation. You can place this block after a QAM demodulation blo"
"ck. The circle constellation is defined in NIC, RIC, and PIC. The symbol inte"
"rval can be a two elements vector with the first element being offset. The de"
"fault offset is zero. Use function MODMAP to view the constellation."
	  MaskPromptString	  "Number of symbols on each circle NIC::|Radi"
"i for each circle RIC:|Phase shift on each circle PIC (rad):|Symbol interval "
"and offset (sec):"
	  MaskStyleString	  "edit,edit,edit,edit"
	  MaskTunableValueString  "on,on,on,on"
	  MaskCallbackString	  "|||"
	  MaskEnableString	  "on,on,on,on"
	  MaskVisibilityString	  "on,on,on,on"
	  MaskToolTipString	  "on,on,on,on"
	  MaskVarAliasString	  ",,,"
	  MaskVariables		  "N=@1;A=@2;P=@3;td=@4;"
	  MaskInitialization	  "y1=apkconst(N,A,P);y2=imag(y1);y1=real(y1);"
	  MaskDisplay		  "disp('MPSK\\ndemapping')"
	  MaskIconFrame		  on
	  MaskIconOpaque	  on
	  MaskIconRotate	  "none"
	  MaskIconUnits		  "autoscale"
	  MaskValueString	  "[4]|[sqrt(2)]|[pi/4]|[1 0.5]"
	  System {
	    Name		    "QPSK demap"
	    Location		    [104, 488, 602, 788]
	    Open		    off
	    ModelBrowserVisibility  off
	    ModelBrowserWidth	    200
	    ScreenColor		    "white"
	    PaperOrientation	    "landscape"
	    PaperPositionMode	    "auto"
	    PaperType		    "usletter"
	    PaperUnits		    "inches"
	    ZoomFactor		    "100"
	    Block {
	      BlockType		      Inport
	      Name		      "real"
	      Position		      [20, 45, 40, 65]
	    }
	    Block {
	      BlockType		      Inport
	      Name		      "imag"
	      Position		      [20, 130, 40, 150]
	      Port		      "2"
	    }
	    Block {
	      BlockType		      "S-Function"
	      Name		      "Minimum1"
	      Ports		      [1, 1]
	      Position		      [390, 95, 450, 115]
	      FunctionName	      "arymimai"
	      Parameters	      "'min'"
	    }
	    Block {
	      BlockType		      Product
	      Name		      "Product"
	      Ports		      [2, 1]
	      Position		      [275, 55, 300, 75]
	    }
	    Block {
	      BlockType		      Product
	      Name		      "Product1"
	      Ports		      [2, 1]
	      Position		      [275, 140, 300, 160]
	    }
	    Block {
	      BlockType		      Sum
	      Name		      "Sum1"
	      Ports		      [2, 1]
	      Position		      [205, 48, 225, 77]
	      ForegroundColor	      "red"
	      Inputs		      "+-"
	    }
	    Block {
	      BlockType		      Sum
	      Name		      "Sum2"
	      Ports		      [2, 1]
	      Position		      [345, 88, 365, 117]
	    }
	    Block {
	      BlockType		      Sum
	      Name		      "Sum6"
	      Ports		      [2, 1]
	      Position		      [205, 133, 225, 162]
	      ForegroundColor	      "blue"
	      Inputs		      "+-"
	    }
	    Block {
	      BlockType		      ZeroOrderHold
	      Name		      "Zero-Order\nHold"
	      Position		      [95, 39, 130, 71]
	      ForegroundColor	      "red"
	      SampleTime	      "td"
	    }
	    Block {
	      BlockType		      ZeroOrderHold
	      Name		      "Zero-Order\nHold1"
	      Position		      [95, 124, 130, 156]
	      ForegroundColor	      "blue"
	      SampleTime	      "td"
	    }
	    Block {
	      BlockType		      Constant
	      Name		      "imag_pt"
	      Position		      [140, 179, 165, 201]
	      BackgroundColor	      "yellow"
	      Value		      "y2"
	    }
	    Block {
	      BlockType		      Constant
	      Name		      "real_pt"
	      Position		      [145, 94, 170, 116]
	      BackgroundColor	      "green"
	      Value		      "y1"
	    }
	    Block {
	      BlockType		      Outport
	      Name		      "out_1"
	      Position		      [470, 95, 490, 115]
	    }
	    Line {
	      SrcBlock		      "Minimum1"
	      SrcPort		      1
	      DstBlock		      "out_1"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "Sum2"
	      SrcPort		      1
	      DstBlock		      "Minimum1"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "Product1"
	      SrcPort		      1
	      Points		      [10, 0; 0, -40]
	      DstBlock		      "Sum2"
	      DstPort		      2
	    }
	    Line {
	      SrcBlock		      "Product"
	      SrcPort		      1
	      Points		      [10, 0; 0, 30]
	      DstBlock		      "Sum2"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "Sum6"
	      SrcPort		      1
	      Points		      [0, 0; 15, 0]
	      Branch {
		Points			[0, 5]
		DstBlock		"Product1"
		DstPort			2
	      }
	      Branch {
		Points			[0, -5]
		DstBlock		"Product1"
		DstPort			1
	      }
	    }
	    Line {
	      SrcBlock		      "Sum1"
	      SrcPort		      1
	      Points		      [0, 0; 15, 0]
	      Branch {
		Points			[0, 5]
		DstBlock		"Product"
		DstPort			2
	      }
	      Branch {
		Points			[0, -5]
		DstBlock		"Product"
		DstPort			1
	      }
	    }
	    Line {
	      SrcBlock		      "imag_pt"
	      SrcPort		      1
	      Points		      [10, 0; 0, -35]
	      DstBlock		      "Sum6"
	      DstPort		      2
	    }
	    Line {
	      SrcBlock		      "Zero-Order\nHold1"
	      SrcPort		      1
	      DstBlock		      "Sum6"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "Zero-Order\nHold"
	      SrcPort		      1
	      DstBlock		      "Sum1"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "real_pt"
	      SrcPort		      1
	      Points		      [5, 0; 0, -35]
	      DstBlock		      "Sum1"
	      DstPort		      2
	    }
	    Line {
	      SrcBlock		      "imag"
	      SrcPort		      1
	      DstBlock		      "Zero-Order\nHold1"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "real"
	      SrcPort		      1
	      DstBlock		      "Zero-Order\nHold"
	      DstPort		      1
	    }
	  }
	}
	Block {
	  BlockType		  TransportDelay
	  Name			  "Transport\nDelay"
	  Position		  [365, 75, 405, 105]
	  DelayTime		  ".5"
	  BufferSize		  "200"
	}
	Block {
	  BlockType		  SubSystem
	  Name			  "close receiver"
	  Ports			  []
	  Position		  [815, 20, 950, 46]
	  BackgroundColor	  "lightBlue"
	  ShowName		  off
	  OpenFcn		  "closerec"
	  FontSize		  12
	  FontAngle		  "italic"
	  ShowPortLabels	  off
	  TreatAsAtomicUnit	  off
	  MaskType		  "close"
	  MaskDisplay		  "disp('close receiver')"
	  MaskIconFrame		  on
	  MaskIconOpaque	  on
	  MaskIconRotate	  "none"
	  MaskIconUnits		  "autoscale"
	  System {
	    Name		    "close receiver"
	    Location		    [136, 230, 381, 439]
	    Open		    off
	    ModelBrowserVisibility  off
	    ModelBrowserWidth	    200
	    ScreenColor		    "cyan"
	    PaperOrientation	    "landscape"
	    PaperPositionMode	    "auto"
	    PaperType		    "usletter"
	    PaperUnits		    "inches"
	    ZoomFactor		    "100"
	  }
	}
	Block {
	  BlockType		  SubSystem
	  Name			  "noise variance"
	  Ports			  []
	  Position		  [19, 240, 125, 264]
	  BackgroundColor	  "lightBlue"
	  ShowName		  off
	  OpenFcn		  "setnoise"
	  FontSize		  12