class MAKE_SADDLE
Flattened version is
here
Public
Readonly Shareds
shared knotPtr,knotPtr1:INT;
shared knotPtr,knotPtr1:INT;
shared modeMakeSaddle:INT:=0;
shared pressL:BOOL;
shared x0,y0:INT;
shared x0,y0:INT;
Writable Shareds
shared knotPtr,knotPtr1:INT;
shared knotPtr,knotPtr1:INT;
shared modeMakeSaddle:INT:=0;
shared pressL:BOOL;
shared x0,y0:INT;
shared x0,y0:INT;
Features
EndOfCurrentSegment(inout Knot:KNOT)
****
end of current segment
MakeSaddle(inout Knot:KNOT, event, button, mouseX,mouseY:INT)
SetMode1(Knot:KNOT)
****
begin
The Sather Home Page