tstqask.m

数字通信第四版原书的例程

set_param([sys,'/',['Encoding only',13,'no-modu']],'Location',[162,454,805,711])

add_block('built-in/Outport',[sys,'/',['Encoding only',13,'no-modu/out_1']])
set_param([sys,'/',['Encoding only',13,'no-modu/out_1']],...
                'position',[565,85,585,105])

add_block('built-in/Inport',[sys,'/',['Encoding only',13,'no-modu/in_1']])
set_param([sys,'/',['Encoding only',13,'no-modu/in_1']],...
               'position',[65,50,85,70])

add_block('built-in/Look Up Table',[sys,'/',['Encoding only',13,'no-modu/c-y axis']])
set_param([sys,'/',['Encoding only',13,'no-modu/c-y axis']],...
           'Input_Values','z',...
          'Output_Values','y',...
         'position',[355,110,380,130])

add_block('built-in/Look Up Table',[sys,'/',['Encoding only',13,'no-modu/s-x axis']])
set_param([sys,'/',['Encoding only',13,'no-modu/s-x axis']],...
               'Input_Values','z',...
          'Output_Values','x',...
         'position',[355,60,380,80])

add_block('built-in/Switch',[sys,'/',['Encoding only',13,'no-modu/Switch']])
set_param([sys,'/',['Encoding only',13,'no-modu/Switch']],...
            'Threshold','eps',...
           'position',[215,54,245,86])

add_block('built-in/Memory',[sys,'/',['Encoding only',13,'no-modu/Memory1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Memory1']],...
          'orientation',2,...
             'position',[210,105,250,135])


%     Subsystem  ['Encoding only',13,'no-modu/Rising edge',13,'detector'].

new_system([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],'Location',[303,485,692,659])

add_block('built-in/Outport',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/out_1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/out_1']],...
             'position',[340,25,360,45])

add_block('built-in/Relational Operator',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator1']],...
             'position',[200,88,230,112])

add_block('built-in/Relational Operator',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator2']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator2']],...
            'Operator','>',...
              'position',[265,23,295,47])

add_block('built-in/Constant',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/one1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/one1']],...
          'Value','thld',...
              'position',[30,135,60,155])

add_block('built-in/Memory',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Memory1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Memory1']],...
              'position',[125,80,165,110])

add_block('built-in/Inport',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/in_1']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/in_1']],...
           'position',[10,15,30,35])

add_block('built-in/Relational Operator',[sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator']])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector/Relational',13,'Operator']],...
         'position',[135,18,165,42])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[35,25;130,25])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[45,25;45,95;120,95])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[170,95;195,95])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[65,145;100,145;100,35;130,35])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[100,145;180,145;180,105;195,105])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[170,30;260,30])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[235,100;240,100;240,40;260,40])
add_line([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],[300,35;335,35])
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],...
                'Mask Display','Edge\ndetector',...
             'Mask Type','Edge Detection',...
                'Mask Dialogue','Rising edge detection:|Threshold:',...
         'Mask Translate','thld=@1;')
set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],...
            'Mask Help','When the input signal rising edge passed the given shreshold, this block outputs one, otherwise outputs zero.',...
         'Mask Entries','thld\/')


%     Finished composite block ['Encoding only',13,'no-modu/Rising edge',13,'detector'].

set_param([sys,'/',['Encoding only',13,'no-modu/Rising edge',13,'detector']],...
                'position',[115,138,175,182])

add_block('built-in/Inport',[sys,'/',['Encoding only',13,'no-modu/in_2']])
set_param([sys,'/',['Encoding only',13,'no-modu/in_2']],...
              'Port','2',...
          'position',[65,150,85,170])

add_block('built-in/Outport',[sys,'/',['Encoding only',13,'no-modu/out_2']])
set_param([sys,'/',['Encoding only',13,'no-modu/out_2']],...
             'Port','2',...
          'position',[565,130,585,150])
add_line([sys,'/',['Encoding only',13,'no-modu']],[385,120;400,120;400,105;430,105;560,140])
add_line([sys,'/',['Encoding only',13,'no-modu']],[385,70;400,70;400,85;430,85;510,95;560,95])
add_line([sys,'/',['Encoding only',13,'no-modu']],[250,70;275,70;275,120;255,120])
add_line([sys,'/',['Encoding only',13,'no-modu']],[275,120;350,120])
add_line([sys,'/',['Encoding only',13,'no-modu']],[275,70;350,70])
add_line([sys,'/',['Encoding only',13,'no-modu']],[90,60;210,60])
add_line([sys,'/',['Encoding only',13,'no-modu']],[90,160;110,160])
add_line([sys,'/',['Encoding only',13,'no-modu']],[205,120;190,120;190,80;210,80])
add_line([sys,'/',['Encoding only',13,'no-modu']],[180,160;185,160;185,70;210,70])
set_param([sys,'/',['Encoding only',13,'no-modu']],...
           'Mask Display','MQASK',...
              'Mask Type','MQASK')
set_param([sys,'/',['Encoding only',13,'no-modu']],...
              'Mask Dialogue','M-ary Amplitude Shift Keying Modulation:|M-ary number:|Carrier frequency:|Maximum amplitude:|Trigger signal threshold:|Initial phase:')
set_param([sys,'/',['Encoding only',13,'no-modu']],...
            'Mask Translate','N=@1;Fc=@2;Ac=@3;thld=@4;Ph=@5;z=[[1:N];[1:N]];z=z(:);[x,y]=qaskenco(z,N);z=z-1.5;z=[z(2:2*N);N-.5];x=x/max(x);y=y/max(y);')
set_param([sys,'/',['Encoding only',13,'no-modu']],...
            'Mask Help','This block modulates an M-ary digital signal onto a given carrier frequency using amplitude shift keying method. The first input port is for the original digital signal, which is coded as 0,1,..,M-1. The second input port inputs the clock pulse. The clock rising edge triggers the block to process next input.')
set_param([sys,'/',['Encoding only',13,'no-modu']],...
         'Mask Entries','N\/Fc\/1\/.2\/0\/')


%     Finished composite block ['Encoding only',13,'no-modu'].

set_param([sys,'/',['Encoding only',13,'no-modu']],...
         'position',[185,198,245,242])


%     Subsystem  ['Multiple',13,'QASK'].

new_system([sys,'/',['Multiple',13,'QASK']])
set_param([sys,'/',['Multiple',13,'QASK']],'Location',[130,348,773,605])

add_block('built-in/Inport',[sys,'/',['Multiple',13,'QASK/in_2']])
set_param([sys,'/',['Multiple',13,'QASK/in_2']],...
          'Port','2',...
          'position',[65,150,85,170])


%     Subsystem  ['Multiple',13,'QASK/Rising edge',13,'detector'].

new_system([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],'Location',[303,485,692,659])

add_block('built-in/Relational Operator',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator']],...
             'position',[135,18,165,42])

add_block('built-in/Inport',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/in_1']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/in_1']],...
            'position',[10,15,30,35])

add_block('built-in/Memory',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Memory1']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Memory1']],...
                'position',[125,80,165,110])

add_block('built-in/Constant',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/one1']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/one1']],...
         'Value','thld',...
              'position',[30,135,60,155])

add_block('built-in/Relational Operator',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator2']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator2']],...
             'Operator','>',...
              'position',[265,23,295,47])

add_block('built-in/Relational Operator',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator1']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/Relational',13,'Operator1']],...
             'position',[200,88,230,112])

add_block('built-in/Outport',[sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/out_1']])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector/out_1']],...
                'position',[340,25,360,45])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[300,35;335,35])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[235,100;240,100;240,40;260,40])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[170,30;260,30])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[65,145;100,145;100,35;130,35])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[100,145;180,145;180,105;195,105])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[170,95;195,95])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[35,25;130,25])
add_line([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],[45,25;45,95;120,95])
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],...
                'Mask Display','Edge\ndetector',...
             'Mask Type','Edge Detection',...
                'Mask Dialogue','Rising edge detection:|Threshold:',...
         'Mask Translate','thld=@1;')
set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],...
            'Mask Help','When the input signal rising edge passed the given shreshold, this block outputs one, otherwise outputs zero.',...
         'Mask Entries','thld\/')


%     Finished composite block ['Multiple',13,'QASK/Rising edge',13,'detector'].

set_param([sys,'/',['Multiple',13,'QASK/Rising edge',13,'detector']],...
                'position',[115,138,175,182])

add_block('built-in/Memory',[sys,'/',['Multiple',13,'QASK/Memory1']])
set_param([sys,'/',['Multiple',13,'QASK/Memory1']],...
                'orientation',2,...
             'position',[210,105,250,135])

add_block('built-in/Switch',[sys,'/',['Multiple',13,'QASK/Switch']])
set_param([sys,'/',['Multiple',13,'QASK/Switch']],...
          'Threshold','eps',...
           'position',[215,54,245,86])

add_block('built-in/Look Up Table',[sys,'/',['Multiple',13,'QASK/s-x axis']])
set_param([sys,'/',['Multiple',13,'QASK/s-x axis']],...
         'Input_Values','z',...
          'Output_Values','x',...
         'position',[355,60,380,80])

add_block('built-in/Look Up Table',[sys,'/',['Multiple',13,'QASK/c-y axis']])
set_param([sys,'/',['Multiple',13,'QASK/c-y axis']],...
         'Input_Values','z',...
          'Output_Values','y',...
         'position',[355,110,380,130])

add_block('built-in/Inport',[sys,'/',['Multiple',13,'QASK/in_1']])
set_param([sys,'/',['Multiple',13,'QASK/in_1']],...
              'position',[65,50,85,70])

add_block('built-in/Outport',[sys,'/',['Multiple',13,'QASK/out_1']])
set_param([sys,'/',['Multiple',13,'QASK/out_1']],...
               'position',[565,85,585,105])


%     Subsystem  ['Multiple',13,'QASK/Quad multi',13,'DSB-SC-AM'].

new_system([sys,'/',['Multiple',13,'QASK/Quad multi',13,'DSB-SC-AM']])
set_param([sys,'/',['Multiple',13,'QASK/Quad multi',13,'DSB-SC-AM']],'Location',[122,503,654,707])