# TickLineQry # Line CartoScript demonstrating use of regularly-spaced # symbols (tick marks) along lines. # Script from Using CartoScripts tutorial. # Denominator of desired map scale scale = 5000; # Desired spacing and length of tick lines # in mm at map scale spaceMap = 6; lengthMap = 1.5; # Scaled spacing and length # of tick lines spacing = spaceMap * scale / 1000; length = lengthMap * scale / 1000; # Set line color and width and draw line LineStyleSetColor(170,85,0); LineStyleSetLineWidth(3); LineStyleDrawLine(); # Draw tick lines LineStyleLineTo(90,length); while (LineStyleRoll(spacing) <> 1) { LineStyleMoveTo(0,0); LineStyleLineTo(90,length); }