|
|
|
geomland.line :initial :y
constructs a line object.
Definition:
to geomland.line :initial :y make local "type "line make local "color :def_line_color if number? :y [ make local "final :initial + (point cos :y sin :y) ] [ make local "final :y ] to ondrawimage output dll.graphix.drawline end delete "y end |
|
|
|