public class Extends_MacLib extends MacLib {

  public static void main(String[] args) {
    Rect r = new Rect();
    Point p = new Point();

    InitQuickDraw();
    ShowDrawing();
    MoveTo(5, 10);
    DrawString("stop");
    SetRect(r, 0, 0, 35, 15);
    InvertRect(r);
//      PenPat(gray);
    PenSize(1, 4);
    PaintCircle(20, 30, 10);

/* on trace la ligne brise'e qui joint les points clique's */

    GetClick(p);		/* saisie du point de de'part */
    MoveTo(p.h, p.v);
    do {
      GetClick(p);	/* saisie des points suivant */
      LineTo(p.h, p.v);
    } while( (p.h >= r.right) || (p.v >= r.bottom) );
                        /* arre^t en cliquant le "bouton" stop */

    PenNormal();

/* on trace une courbe qui suit les de'placements de la souris */

    WaitClickDown();	/* il ne faut pas relacher le bouton */
    GetMouse(p);		/* saisie du point de de'part */
    MoveTo(p.h, p.v);
    while( TrackMouse(p) )
      LineTo(p.h, p.v);   
	                /* arre^t lorsque le bouton est relache' */
  }

}