More Drawing

#include "graphapp.h"

void draw_shapes(drawing d, rect r)
{
  setcolour(Red);
  fillrect(r);

  setcolour(Blue);
  fillellipse(insetr(r,4));

  setcolour(Green);
  drawline(pt(r.x,r.y),
           pt(r.x+r.width,r.y+r.height));
  drawline(pt(r.x,r.y+r.height),
           pt(r.x+r.width,r.y));
}

void main(void)
{
  window w;
  drawing d;
  rect r;

  w = newwindow("Rectangles", rect(50,50,150,200),
                StandardWindow);
  setbackground(w, LightGrey);
  r = rect(10,10,100,100);
  d = newdrawing(r, draw_shapes);
  show(w);
  mainloop();
}

Notes: