Nothing (yet) to make Stake Objects, but here is something similar things from the ancient past.   And one I don't think I ever posted before.   Procedure PrintableLoci; {Inserts a symbol named PrintLocus at the locaiton of each loci on the active layer} {© 2008, Coviana, Inc - Pat Stanford pat@coviana.com} {Licensed unde the GNU Lesser General Public License} Var H1:Handle; X1,Y1:Real; N1,N2:Integer; Begin H1:=FActLayer; While H1 <> nil do Begin If GetTyp
    • Like
    1