dev_open_window (0, 0, 512, 512, ‘black’, WindowHandle)
dev_set_draw (‘margin’)//绘图方式，描边
*画圆
draw_circle (WindowHandle, Row, Column, Radius)
gen_circle (Circle, Row, Column, Radius)
*画椭圆
draw_ellipse (WindowHandle, Row1, Column1, Phi, Radius1, Radius2)
gen_ellipse (Ellipse, Row1, Column1, Phi, Radius1, Radius2)
*画不规则区域
draw_polygon (PolygonRegion, WindowHandle)
draw_line (WindowHandle, Row12, Column12, Row21, Column21)
disp_line (WindowHandle, Row12, Column12, Row21, Column21)
*画标准矩形
draw_rectangle1 (WindowHandle, Row11, Column11, Row2, Column2)
gen_rectangle1 (Rectangle, Row11, Column11, Row2, Column2)
*画仿射矩形
draw_rectangle2 (WindowHandle, Row3, Column3, Phi1, Length1, Length2)
gen_rectangle2 (Rectangle1, Row3, Column3, Phi1, Length1, Length2)
*画闭合区域
draw_region (Region, WindowHandle)
