//MODQAM_f Scicos MQAM Modulator block
//Classical interface function ver1.0 - scilab-3.0
//5 janvier 2005 - IRCOM GROUP - Author : A.Layec
function [x,y,typ]=MODQAM_f(job,arg1,arg2)
x=[];y=[];typ=[]
select job
case 'plot' then
  nb=arg1.model.ipar;
//pause
  standard_draw(arg1)
case 'getinputs' then
  [x,y,typ]=standard_inputs(arg1)
case 'getoutputs' then
  [x,y,typ]=standard_outputs(arg1)
case 'getorigin' then
  [x,y]=standard_origin(arg1)
case 'set' then
   x=arg1;
   graphics=arg1.graphics;model=arg1.model;
   exprs=graphics.exprs;

   while %t do

      [ok,nb,herit,exprs]=getvalue('Set M-ary Quadrature Amplitude Modulation modulator block',...
      ['Number of states';'Accept herited events 0/1'],...
      list('vec',-1,'vec',1),exprs);

      if ~ok then break,end;

      //Calcule le nombre de bit correspondant au(x) nombre(s) d'閠ats
      ipar=log(nb)/log(2)
      ipar=ipar(:)
      //Teste la parit