function CSCOPE () {


	var win = -1;

	var wdim = [[600],[400]];

	var wpos = [[-1],[-1]];

	var clrs = [[1],[3],[5],[7],[9],[11],[13],[15]];

	var N = 20;

	var ymin = -15;

	var ymax = +15;

	var per = 30;

	var model = scicos_model();
	model.sim=list(new ScilabString(["cscope"]),new ScilabDouble([4]));
	model.in1 = new ScilabDouble([-1]);
	model.in2 = new ScilabDouble([1]);
	model.evtin = new ScilabDouble([1]);
	model.rpar = new ScilabDouble([0],[ymin],[ymax],[per]);
	model.ipar = new ScilabDouble([win],[1],[N],[clrs],[wpos],[wdim]);
	model.blocktype = new ScilabString(["c"]);
	model.dep_ut = new ScilabBoolean([true,false]);

	var exprs = [[strcat(string(clrs)," ")],[string(win)],[sci2exp([])],[sci2exp(wdim)],[string(ymin)],[string(ymax)],[string(per)],[string(N)],[string(0)'],[emptystr()]];

	var gr_i = [];
	this.x=new standard_define(new ScilabDouble([2,2]),model,exprs,gr_i);
	return new BasicBlock(this.x)
}