Revision 3883 trunk/extensions/extCAD/sm/PolygonCADTool.sm
PolygonCADTool.sm | ||
---|---|---|
17 | 17 |
Initial |
18 | 18 |
|
19 | 19 |
Entry { |
20 |
init(); |
|
21 | 20 |
setQuestion("POLIGONO" + "\n" + |
22 | 21 |
"Insertar numero de lados<5>"); |
22 |
setDescription(new String[]{"Cancelar"}); |
|
23 | 23 |
} |
24 | 24 |
Exit{ |
25 | 25 |
} |
... | ... | |
28 | 28 |
addValue(d:double) |
29 | 29 |
First { |
30 | 30 |
setQuestion("Insertar punto central del poligono"); |
31 |
setDescription(new String[]{"Cancelar"}); |
|
31 | 32 |
addValue(d); |
32 | 33 |
} |
33 | 34 |
addPoint(pointX:double,pointY:double) |
34 | 35 |
Second { |
35 |
setQuestion("Inscrito en el c?rculo[I] o Circunscrito[C]"); |
|
36 |
setQuestion("Inscrito en el c?rculo[I] o Circunscrito[C]<C>"); |
|
37 |
setDescription(new String[]{"Inscrito","Circunscrito","Cancelar"}); |
|
36 | 38 |
addPoint(pointX,pointY); |
37 | 39 |
} |
38 | 40 |
|
... | ... | |
41 | 43 |
addPoint(pointX:double,pointY:double) |
42 | 44 |
Second { |
43 | 45 |
setQuestion("Inscrito en el c?rculo[I] o Circunscrito[C]<C>"); |
46 |
setDescription(new String[]{"Inscrito","Circunscrito","Cancelar"}); |
|
44 | 47 |
addPoint(pointX,pointY); |
45 | 48 |
} |
46 | 49 |
} |
... | ... | |
48 | 51 |
addOption(s:String) |
49 | 52 |
Third { |
50 | 53 |
setQuestion("Precise r?dio(r)"); |
54 |
setDescription(new String[]{"Cancelar"}); |
|
51 | 55 |
addOption(s); |
52 | 56 |
} |
53 | 57 |
addValue(d:double) |
... | ... | |
77 | 81 |
} |
78 | 82 |
Default |
79 | 83 |
{ |
80 |
|
|
84 |
addOption(s:String) |
|
85 |
[s.equals("Cancelar")] |
|
86 |
Initial{ |
|
87 |
end(); |
|
88 |
} |
|
81 | 89 |
} |
82 | 90 |
%% |
Also available in: Unified diff