gfx:make-rectangle

(gfx:make-rectangle x y width height)


Description:

Return a new rectanglular path


Arguments:

         height -- height of rectangle

          width -- width of rectangle

              x -- x coordinate of bottom left corner

              y -- x coordinate of bottom left corner


Returns: path


Examples:

(define *canvas* (gfx:make-canvas 800 600))

(define square (gfx:make-square 100 100 50))

(define circle (gfx:make-circle 200 200 20))

(define rectangle (gfx:make-rectangle 200 100 50 100))

(gfx:draw-path (now) *canvas* square '(0.1 0.5 0.5 0.5) '(0.4 0.2 0.8 0.4))

(gfx:draw-path (now) *canvas* circle '(0.1 0.5 0.5 0.5) '() 20.0)

(gfx:draw-path (now) *canvas* rectangle '() '(0.4 0.2 0.8 0.4))



Back to index