** BORDER.PLT
**
** Draws 4 different styles of border lines.
**
FORM IN 2 P 0.50 0.50 0.50 0.50
LWID 2
LSHD 8
MOVA 0.10 0.00
POI 270.0
SAV A
LINE 0.50
**
** draw staggered border line
**
    DO 9
    LRXY -0.050 0.0
    LRXY 0.0 -0.40
    LRXY -0.050 0.0
    LRXY 0.0 0.90
    LRXY 0.050 0.0
    LRXY 0.0 -0.40
    LRXY 0.050 0.0
    LRXY 0.0 0.90
    END
**
** draw thick / thin alternates
**
RCL A
MOVR 1.0 0.0
SAV A
**
LINE 10.0
RCL A
LWID 10
    DO 10
    LINE 0.50
    MOVR 0.0 0.50
    END
**
** do staggered lines with angled offsets
**
RCL A
MOVR 1.0 0.0
SAV A
LWID 4
    DO 9
    LINE 0.60
    LRXY -0.10 -0.10
    POI 270.0
    LINE 0.60
    LRXY 0.10 -0.10
    POI 270.0
    END
LINE 0.60
**
** do a ladder design
**
RCL A
MOVR 1.0 0.0
SAV A
LINE 10.0
RCL A
MOVR 0.080 0.0
LINE 10.0
RCL A
LSHD 0
FSHD 8
FPAT 0
    DO 20
    RECT 0.080 0.060
    MOVR 0.0 0.50
    END