「等しい長さの線分を表す記号　Segmark」の編集履歴（バックアップ）一覧に戻る

等しい長さの線分を表す記号　Segmark - (2016/10/29 (土) 14:09:56) のソース

Segmark("1",[A,B]);
　線分ABに等しい長さを表す記号を書く．
Segmark("1",[A,B],["Type=1","Width=1","Size=1"]);
　オプションは，"Type="で記号の形，"Width="で間隔の倍率，"Size="で大きさの倍率を指定する．
　"Type=1"で1本線記号，"Type=2"で2本線記号，"Type=3"で丸印，"Type=4"で三角印を指定する．

&ref(segmark.png,,title=,width=400,)
&ref(segmark.zip)

Addax(0);

Polygonplot("1",[A,B],10);

Segmark("1",[B,B1]);
／／　2点B, B1を結ぶ線分に等しい長さを表す記号を1本線記号で書く．
Segmark("2",[B1,B2],["Type=1"]);
／／　2点B1, B2を結ぶ線分に等しい長さを表す記号を1本線記号で書く．
Segmark("3",[B2,B3],["Type=2","Size=2"]);
／／　2点B3, B4を結ぶ線分に等しい長さを表す記号を大きさ2倍の2本線記号で書く．
Segmark("4",[B3,B4],["Type=2","Size=2"]);
Segmark("5",[B4,B5],["Type=2","Width=3"]);
／／　2点B4, B5を結ぶ線分に等しい長さを表す記号を間隔3倍の2本線記号で書く．
Segmark("6",[B5,B6],["Type=2","Width=3"]);
Segmark("7",[B6,B7],["Type=3"]);
／／　2点B6, B7を結ぶ線分に等しい長さを表す記号を丸印で書く．
Segmark("8",[B7,B8],["Type=3"]);
Segmark("9",[B8,B9],["Type=4"]);
／／　2点B8, B9を結ぶ線分に等しい長さを表す記号を三角印で書く．
Segmark("10",[B9,B],["Type=4"]);

Letter([B,"e2","B",B1,"ne","B1",B2,"ne","B2",B3,"nw","B3",B4,"nw","B4",B5,"w2","B5",B6,"sw","B6",B7,"sw","B7",B8,"se","B8",B9,"se","B9"]);