class DRAW_ALG |
---|
shared latticeFlg:BOOL:=false; |
---|
shared markVertex:BOOL:=false; |
---|
shared nearMarkd0:INT:=far; |
---|
shared nearMarkx0:INT:=0; |
---|
shared nearMarky0:INT:=0; |
---|
shared smoothDraw:BOOL:=false; |
---|
shared latticeFlg:BOOL:=false; |
---|
shared markVertex:BOOL:=false; |
---|
shared nearMarkd0:INT:=far; |
---|
shared nearMarkx0:INT:=0; |
---|
shared nearMarky0:INT:=0; |
---|
shared smoothDraw:BOOL:=false; |
---|
const LWidth2:INT:=2*LWidth; |
---|
const LWidth:INT:=2*LWidthP; |
---|
const LWidthP:INT:=5; |
---|
const far:INT:=10000; |
---|
const near:INT:=16; |
---|
CnvLattice(c:INT):INT |
---|
DrawLattice |
---|
UpdateVE(Knot:KNOT,inout i0:INT, i1:INT, inout sw0:INT, sw1:INT) |
---|
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) |
---|
trimL(c:INT):INT |
---|
**** | return (c -(c mod LWidth)+LWidthP); |