SET MODE "GRAPHICS"

LET Ratio = 1.4

SET WINDOW -(50*Ratio),(50*Ratio),-50,50

OPTION ANGLE degrees

! Display a figure consisting of three square boxes,

! of side length 10, 20, and 30 units,

! all centered at the center of the screen.

SET COLOR "red"

DRAW Square(10,0,0)

SET COLOR "green"

DRAW Square(20,0,0)

SET COLOR "blue"

DRAW Square(30,0,0)

SET COLOR "magenta"

PLOT TEXT, AT -15,-40: "Concentric squares"

END