class DRAW_ALG
Public
Readonly Shareds
shared latticeFlg:BOOL:=false;
shared markVertex:BOOL:=false;
shared nearMarkd0:INT:=far;
shared nearMarkx0:INT:=0;
shared nearMarky0:INT:=0;
shared smoothDraw:BOOL:=false;
Writable Shareds
shared latticeFlg:BOOL:=false;
shared markVertex:BOOL:=false;
shared nearMarkd0:INT:=far;
shared nearMarkx0:INT:=0;
shared nearMarky0:INT:=0;
shared smoothDraw:BOOL:=false;
Constants
const LWidth2:INT:=LWidth*2;
const LWidth:INT:=LWidthP*2;
const LWidthP:INT:=5;
const arrowLen:FLT:=10.0;
const arrowLenS:FLT:=arrowLen/arrowRatio;
const arrowRatio:FLT:=1.0/3.0;
const far:INT:=10000;
const near:INT:=16;
Features
CnvLattice(c:INT):INT
DrawLattice
UpdateVE(Knot:KNOT,inout i0:INT, i1:INT, inout sw0:INT, sw1:INT)
arrow(inout gx0,inout gy0,inout gx1,inout gy1,inout gx2,inout gy2:INT)
****
Draw arrow at the center of pt0 and pt1
return line pt0-pt1-pt2
circleF(Knot:KNOT, i,r,col:INT)
circleK(Knot:KNOT, i,sw,r,col:INT)
****
Draw circle at vertex/edge.
sw=0:vertex, sw=1:edge.
nearMark(Knot:KNOT,pt,d,sw:INT)
****
Markup the point, if near.
sl(x0, y0:INT, inout x1:INT, inout y1:INT, r:INT)
****
__
for
_
DrawKnot,DrawKnotPic
_
spaced
_
r-dot
_
at
_
under
_
crossing
trimL(c:INT):INT
The Sather Home Page