axis

Vocabulary

ui.gadgets.charts.axes

Definition

USING: ui.gadgets ;

IN: ui.gadgets.charts.axes

TUPLE: axis < gadget color ;

Methods

USING: accessors colors kernel locals.backend sequences
ui.gadgets.charts ui.gadgets.charts.axes
ui.gadgets.charts.axes.private ui.gadgets.charts.lines
ui.gadgets.charts.utils ui.render ;

M: axis draw-gadget*
    dup parent>> dup chart? [
        2 load-locals COLOR: black -1 get-local default-color
        0 get-local -1 get-local chart-dims [ axis-pos ] keep
        first2 swap scale
        0 get-local dim>> first2 -1 get-local axis-line
        draw-line 2 drop-locals
    ] [ 2drop ] if ;