Drawing set of objects

Next: Drawing objects Up: Basic Primitives Previous: Basic Primitives

Drawing set of objects

Following instructions show usage of functions to plot set of objects. They produce the following picture:

$\fbox{\epsfig{file=foo0_30.eps,width=3.75in}}$

rectangles

x=0:40:240;
boxes=[x;10*ones(x);30*ones(x);30*ones(x)];
xrects(boxes)
// fonction xrects  : filling rectangles
x=0:40:240;
boxes=[x;45*ones(x);30*ones(x);30*ones(x)];
pats=[0,4,8,12,15,xget('white'),0];
xrects(boxes,pats);

arcs

x=0:40:240;
boxes=[x;90*ones(x);30*ones(x);30*ones(x)];
arcs=[boxes; 0*ones(x);64*180*ones(x)];
pats=[0,4,8,12,15,xget('white'),0];
xarcs(arcs,pats);
//
x=0:40:240;
boxes=[x;135*ones(x);30*ones(x);30*ones(x)];
arcs=[boxes; 0*ones(x);64*360*ones(x)];
xarcs(arcs);

Polylines and filled polylines

x1=[0,10,20,30,20,10,0];
y1=[15,30,30,15,0,0,15];y1=160*ones(y1)+y1;
xpols=[x1;transl(x1,40);transl(x1,80);transl(x1,120);
              transl(x1,160);transl(x1,200);transl(x1,240)];
ypols=[y1;y1;y1;y1;y1;y1;y1];
xfpolys(xpols',ypols');
//
x1=[0,10,20,30,20,10,0];
y1=[15,30,30,15,0,0,15];y1=160*ones(y1)+y1;
xpols=[x1;transl(x1,40);transl(x1,80);transl(x1,120);
          transl(x1,160);transl(x1,200);transl(x1,240)];
ypols=[y1;y1;y1;y1;y1;y1;y1];
xfpolys(xpols',ypols');
ypols=transl(ypols,60);
pats=[0,4,8,12,15,xget('white'),0];
xfpolys(xpols',ypols',pats);

Specify polylines line style

x1=[0,10,20,30,20,10,0];
y1=[15,30,30,15,0,0,15];y1=160*ones(y1)+y1;
xpols=[x1;transl(x1,40);transl(x1,80);transl(x1,120);
          transl(x1,160);transl(x1,200);transl(x1,240)];
ypols=[y1;y1;y1;y1;y1;y1;y1];
xfpolys(xpols',ypols');
ypols=transl(ypols,120);
xpolys(xpols',ypols',1:7);
//
x1=[0,10,20,30,20,10,0];
y1=[15,30,30,15,0,0,15];y1=160*ones(y1)+y1;
xpols=[x1;transl(x1,40);transl(x1,80);transl(x1,120);
          transl(x1,160);transl(x1,200);transl(x1,240)];
ypols=[y1;y1;y1;y1;y1;y1;y1];
xfpolys(xpols',ypols');
ypols=transl(ypols,180);
xpolys(xpols',ypols',-(1:7));

Set of segments

x=0:40:240;
xsegs([x;x+30*ones(x)],[(360+40)*ones(x);(360+70)*ones(x)]);

Set of arrows

x=0:40:240;
xarrows([x;x+30*ones(x)],[(360+70)*ones(x);(360+100)*ones(x)]);

Set of numbers

x=0:100:200;
xnumb(x,500*ones(x),[10,20,35],1);
xnumb(x,550*ones(x),[10,20,35],0);

Scilab group