bpsnrzmf.mdl

现代通信系统（prokis）的所有matlab源程序,对初学者很有帮助的。

      MinAlgLoopOccurrences   off
      RTWSystemCode	      "Auto"
      FunctionWithSeparateData off
      MaskHideContents	      off
      MaskType		      "Symbol/bit error counter"
      MaskDescription	      "Use the input data from the 1st port as the ref"
"erence signal to detect the number of errors and error rate of the 2nd signal"
"."
      MaskHelp		      "The signal from the first port must be a scalar"
". The second input port can be a vector with a delay to the first port signal"
". The comparison happens only at the sampling point."
      MaskPromptString	      "Bit per symbol:|Number of digits on display:|De"
"lay between 1st port and 2nd port:|Sample time (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      ",,,"
      MaskInitialization      "K=@1;num_lin=@2;TDelay=@3;Sample=@4;"
      MaskDisplay	      "disp('Error\\nmeter')"
      MaskIconFrame	      on
      MaskIconOpaque	      on
      MaskIconRotate	      "none"
      MaskIconUnits	      "autoscale"
      MaskValueString	      "1|10|1|1"
      MaskTabNameString	      ",,,"
      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"
	TiledPaperMargins	[0.196850, 0.196850, 0.196850, 0.196850]
	TiledPageScale		1
	ShowPageBoundaries	off
	ZoomFactor		"100"
	Block {
	  BlockType		  Inport
	  Name			  "in_1"
	  Position		  [15, 45, 35, 65]
	  IconDisplay		  "Port number"
	}
	Block {
	  BlockType		  Inport
	  Name			  "in_2"
	  Position		  [15, 60, 35, 80]
	  Port			  "2"
	  IconDisplay		  "Port number"
	}
	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		  "in_2"
	  SrcPort		  1
	  DstBlock		  "Mux"
	  DstPort		  2
	}
	Line {
	  SrcBlock		  "in_1"
	  SrcPort		  1
	  DstBlock		  "Mux"
	  DstPort		  1
	}
	Line {
	  SrcBlock		  "Mux"
	  SrcPort		  1
	  DstBlock		  "S-function"
	  DstPort		  1
	}
      }
    }
    Block {
      BlockType		      Fcn
      Name		      "Fcn"
      Position		      [525, 22, 620, 48]
      ShowName		      off
      Expr		      "2*cos(4*pi*u)"
    }
    Block {
      BlockType		      Fcn
      Name		      "Fcn1"
      Position		      [275, 145, 370, 175]
      ShowName		      off
      Expr		      "cos(4*pi*u)"
    }
    Block {
      BlockType		      "S-Function"
      Name		      "Integrate and Dump\n"
      Ports		      [1, 1]
      Position		      [720, 103, 800, 147]
      FunctionName	      "schdint"
      Parameters	      "td, ts, limit"
      MaskType		      "Scheduled reset integration"
      MaskDescription	      "Reset the state to be zero(s) at the\nscheduled"
" 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 with t"
"he 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 state is"
" larger than the modulo bound."
      MaskPromptString	      "Scheduled reset time interval and offset (sec):"
"|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|.01|999"
      MaskTabNameString	      ",,"
    }
    Block {
      BlockType		      Product
      Name		      "Product"
      Ports		      [2, 1]
      Position		      [400, 118, 430, 142]
      ShowName		      off
    }
    Block {
      BlockType		      Product
      Name		      "Product1"
      Ports		      [2, 1]
      Position		      [640, 113, 670, 137]
      ShowName		      off
    }
    Block {
      BlockType		      SubSystem
      Name		      "Source"
      Ports		      [0, 1]
      Position		      [15, 98, 45, 152]
      ShowPortLabels	      off
      MinAlgLoopOccurrences   off
      RTWSystemCode	      "Auto"
      FunctionWithSeparateData off
      MaskHideContents	      off
      System {
	Name			"Source"
	Location		[38, 153, 317, 326]
	Open			off
	ModelBrowserVisibility	off
	ModelBrowserWidth	200
	ScreenColor		"white"
	PaperOrientation	"landscape"
	PaperPositionMode	"auto"
	PaperType		"usletter"
	PaperUnits		"inches"
	TiledPaperMargins	[0.196850, 0.196850, 0.196850, 0.196850]
	TiledPageScale		1
	ShowPageBoundaries	off
	ZoomFactor		"100"
	Block {
	  BlockType		  Fcn
	  Name			  "Fcn"
	  Position		  [160, 75, 200, 95]
	  Expr			  "1-2*u"
	}
	Block {
	  BlockType		  SubSystem
	  Name			  "Source"
	  Ports			  [0, 1]
	  Position		  [70, 63, 135, 107]
	  ShowPortLabels	  off
	  MinAlgLoopOccurrences	  off
	  RTWSystemCode		  "Auto"
	  FunctionWithSeparateData off
	  MaskHideContents	  off
	  MaskType		  "Read from workspace"
	  MaskDescription	  "Read from a workspace variable at\nsampling"
" time point."
	  MaskHelp		  "This block reads from a workspace variable "
"at a given sample time. The column number is the block output vector length. "
"When the simulation reaches the end of the variable (eof), the block will cyc"
"lically output from the first row of the variable or output zeros based on th"
"e repeat flag entree."
	  MaskPromptString	  "Variable (column_number=block_output_length"
"):|Data output sample time (sec):|Repeat flag (1: repeat read, 0: output zero"
"s after eof).|Initial output:"
	  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	  ",,,"
	  MaskInitialization	  "var=@1;td=@2;ts=td(1);if (length(td)>=2),of"
"f=td(2);else off=0;end;cyc=@3;ini=@4;[x,y]=srcsicon(7);"
	  MaskDisplay		  "plot(0,0,100,100,x,y);disp('Rd wksp')"
	  MaskIconFrame		  on
	  MaskIconOpaque	  on
	  MaskIconRotate	  "none"
	  MaskIconUnits		  "autoscale"
	  MaskValueString	  "randint2(1000,1,2)|1|1|1"
	  MaskTabNameString	  ",,,"
	  System {
	    Name		    "Source"
	    Location		    [355, 528, 737, 675]
	    Open		    off
	    ModelBrowserVisibility  off
	    ModelBrowserWidth	    200
	    ScreenColor		    "white"
	    PaperOrientation	    "landscape"
	    PaperPositionMode	    "auto"
	    PaperType		    "usletter"
	    PaperUnits		    "inches"
	    TiledPaperMargins	    [0.196850, 0.196850, 0.196850, 0.196850]
	    TiledPageScale	    1
	    ShowPageBoundaries	    off
	    ZoomFactor		    "100"
	    Block {
	      BlockType		      "S-Function"
	      Name		      "Message source"
	      Ports		      [1, 1]
	      Position		      [180, 53, 255, 97]
	      BackgroundColor	      "yellow"
	      FunctionName	      "trigwksp"
	      Parameters	      "var,thd,cyclFlag,ini"
	      MaskType		      "Read from workspace"
	      MaskDescription	      "The raising edge of input pulse trigger"
" the block output the next row from the workspace variable."
	      MaskHelp		      "This block reads the data from a worksp"
"ace variable. The output is refreshed at the raising edge of the input pulse."
	      MaskPromptString	      "Read the variable:|Threshold for the in"
"put pulse:|Cyclic read variable (1) or amend zeros (0).|Output before first t"
"rigger:"
	      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      ",,,"
	      MaskInitialization      "var=@1;thd=@2;cyclFlag=@3;ini=@4;"
	      MaskDisplay	      "disp('Triggered\\nread')"
	      MaskIconFrame	      on
	      MaskIconOpaque	      on
	      MaskIconRotate	      "none"
	      MaskIconUnits	      "autoscale"
	      MaskValueString	      "var|.1|cyc|ini"
	      MaskTabNameString	      ",,,"
	    }
	    Block {
	      BlockType		      SubSystem
	      Name		      "Pulses deivide\nsame sample time1"
	      Ports		      [0, 1]
	      Position		      [50, 56, 110, 94]
	      ShowPortLabels	      off
	      MinAlgLoopOccurrences   off
	      RTWSystemCode	      "Auto"
	      FunctionWithSeparateData off
	      MaskHideContents	      off
	      MaskType		      "Pulse generator"
	      MaskDescription	      "Vector pulses with sample rate of each "
"pulse as Sample_time ./Divider. "
	      MaskHelp		      "This block generator a vector pulses. T"
"he output length is the same as the vector defined in \"Divider\". The ith el"
"ement of the output has the sample time Sample_time/Divider(i). All elements "
"in \"Divider\" must be integers."
	      MaskPromptString	      "Sample time (scalar, sec):|Divider (int"
"eger vector):|Offset (have same dimension as Divider:"
	      MaskStyleString	      "edit,edit,edit"
	      MaskTunableValueString  "on,on,on"
	      MaskCallbackString      "||"
	      MaskEnableString	      "on,on,on"
	      MaskVisibilityString    "on,on,on"
	      MaskToolTipString	      "on,on,on"
	      MaskVarAliasString      ",,"
	      MaskInitialization      "samp_time=@1;out_divid=@2;offset=@3;"
	      MaskDisplay	      "disp('Vector\\nPulse')"
	      MaskIconFrame	      on
	      MaskIconOpaque	      on
	      MaskIconRotate	      "none"
	      MaskIconUnits	      "autoscale"
	      MaskValueString	      "ts|1|off"
	      MaskTabNameString	      ",,"
	      System {
		Name			"Pulses deivide\nsame sample time1"
		Location		[55, 192, 283, 286]
		Open			off
		ModelBrowserVisibility	off
		ModelBrowserWidth	200
		ScreenColor		"white"
		PaperOrientation	"landscape"
		PaperPositionMode	"auto"
		PaperType		"usletter"
		PaperUnits		"inches"
		TiledPaperMargins	"[0.196850, 0.196850, 0.196850, 0.1968"
"50]"
		TiledPageScale		1
		ShowPageBoundaries	off
		ZoomFactor		"100"
		Block {
		  BlockType		  "S-Function"
		  Name			  "S-function1"
		  Ports			  [0, 1]
		  Position		  [40, 31, 105, 59]
		  FunctionName		  "homopuls"
		  Parameters		  "samp_time, out_divid, offset"
		}
		Block {
		  BlockType		  Outport
		  Name			  "Outport"
		  Position		  [160, 35, 180, 55]
		  IconDisplay		  "Port number"
		}
		Line {
		  SrcBlock		  "S-function1"
		  SrcPort		  1
		  DstBlock		  "Outport"
		  DstPort		  1
		}
	      }
	    }
	    Block {
	      BlockType		      Outport
	      Name		      "out_1"
	      Position		      [295, 65, 315, 85]
	      IconDisplay	      "Port number"
	    }
	    Line {
	      SrcBlock		      "Message source"
	      SrcPort		      1
	      DstBlock		      "out_1"
	      DstPort		      1
	    }
	    Line {
	      SrcBlock		      "Pulses deivide\nsame sample time1"
	      SrcPort		      1
	      DstBlock		      "Message source"
	      DstPort		      1
	    }
	  }
	}
	Block {
	  BlockType		  Outport
	  Name			  "out_1"
	  Position		  [230, 75, 250, 95]
	  IconDisplay		  "Port number"
	}
	Line {
	  SrcBlock		  "Source"
	  SrcPort		  1
	  DstBlock		  "Fcn"
	  DstPort		  1
	}
	Line {
	  SrcBlock		  "Fcn"
	  SrcPort		  1
	  DstBlock		  "out_1"
	  DstPort		  1
	}
      }
    }
    Block {
      BlockType		      Scope
      Name		      "a(t)"
      Ports		      [1]
      Position		      [80, 200, 110, 230]
      NamePlacement	      "alternate"
      Floating		      off
      Location		      [84, 338, 1019, 438]
      Open		      on
      NumInputPorts	      "1"
      List {
	ListType		AxesTitles
	axes1			"%<SignalLabel>"
      }
      TimeRange		      "25.000000"
      YMin		      "-2"
      YMax		      "2"
      DataFormat	      "Array"
      SampleTime	      "0"
    }
    Block {
      BlockType		      SubSystem
      Name		      "constellation"
      Ports		      []
      Position		      [20, 34, 105, 71]
      BackgroundColor	      "lightBlue"
      ShowName		      off
      OpenFcn		      "cplotpsk(2)"
      ShowPortLabels	      off
      MinAlgLoopOccurrences   off
      RTWSystemCode	      "Auto"
      FunctionWithSeparateData off
      MaskHideContents	      off
      MaskType		      "constellation"
      MaskDisplay	      "disp('Signal Space \\n Constellation')"
      MaskIconFrame	      on
      MaskIconOpaque	      on
      MaskIconRotate	      "none"
      MaskIconUnits	      "autoscale"
      System {
	Name			"constellation"
	Location		[74, 73, 1338, 1015]
	Open			off
	ModelBrowserVisibility	off
	ModelBrowserWidth	200
	ScreenColor		"cyan"
	PaperOrientation	"landscape"
	PaperPositionMode	"auto"