Graphics Examples ​(3.0 branch only)

print "Some Graphics" 
print 
graphics 500, 500 

gcls 

line 10, 10, 150, 150, 1
circle 75, 100, 50, 2
rect 200, 200, 25, 50, 3
ellipse 400, 400, 20, 50, 4
 
button "Exit", [getMeOutOfHere]
wait 

[getMeOutOfHere]
end

This example will create a graphic and add a line, circle, ellipse and rectangle to it.