|
|
|
geomland.angle :initial :center :final
constructs an angle object.
Definition:
to geomland.angle :initial :center :final make local "type "angle make local "radius 30 make local "ii point :center.x+1 :center.y make local "range range (angle3 :ii :center :initial) (angle3 :ii :center :final) make local "color :def_angle_color if :range.fromangle<:range.toangle [make "range.fromangle :range.fromangle+360] to ondrawimage output dll.graphix.drawisogon end delete "ii end |
|
|
|