ＭＥ１０マクロ・補助メニュー

ＭＥ１０マクロのページです
（補助メニュー）

2002.06.04 更新

リスト

＃macro.lzh＃（マクロファィルです。）

　１．計算
　１．メニューのクリア・11行3列
　　　２．測定・スロットデータの作成 2002.06.04 2002.05.29 1999.04.11
　３．測定・データ表示の消去
　　　４．計算
　２．表示
　　 １．選択表示メニューの組み込み方法 2001.04.08
　　　２．描画表示の指定（名前の置換） 2001.04.08
　　　３．描画表示の指定（レイアウト） 2001.04.08
　　　４．画面の描画表示の指定 2001.04.08

{ 下メニューのクリア・11行3列
1998.12.28}

DEFINE Ma_clear_menu3_11_4
MENU Colo1 Bcol0 '' '' BOX 1 1 11 4
END_DEFINE

{ 測定・スロットデータの作成
1999.04.11-2002.06.04
2002.05.29 指数に対応
}

DEFINE Ma_slotdata_distance
PARAMETER Size {データ}

LOCAL String                                    {文字列化データ}
LOCAL Length                                    {文字列の長さ}
LOCAL Location                                  {指数記号の位置}

LET String (STR Size)
LET Length (LEN String)
LET Location (POS String 'e')

IF (Length > 14)
    IF (Location > 0)                             {指数表示なら}
      (' ' + (SUBSTR String 1 8) + "'" + (SUBSTR String (Length - 4) 5) + ' ')
    ELSE
      (' ' + (SUBSTR String 1 14) + "'")
    END_IF
ELSE_IF (Length = 14)
    (' ' + (SUBSTR String 1 14) + ' ')
ELSE
    (' ' + (SUBSTR (String + '              ') 1 14) + ' ')
END_IF

END_DEFINE

{ 測定・データ表示の消去
1999.04.11}

DEFINE Ma_screen_erase_data
MENU Colo1 Bcol0 '' '' BOX 3 1 5 2
END_DEFINE

{ 計算システムから移動
　1999.03.24
1999.04.11 レイアウト変更
1999.04.11-1999.04.25
}
DEFINE Sm_screen_meas_1
LET Lastmen 'Sm_screen_meas_1'
MENU_BUFFER ON
CURRENT_MENU Sm_screen_meas_1_layout_name
T_clear_menu_1
Menu_control_icons
MENU Colo0 Bcol5 CENTER '計　算' '' 1 3
MENU Colo0 Bcol6 CENTER '測　定' '' 2 1
MENU Colo0 Bcol5 CENTER '電卓' 'Sm_calculator' 2 2

MENU '距　離' 'Ma_measure_distance' 6 1
MENU '要素の長さ' 'Ma_measure_distance_element' 7 1
MENU '要素長累計' 'Ma_measure_distance_element_total' 7 2
MENU '位　置' 'Ma_measure_point' 8 1
MENU '要素の端' 'Ma_measure_tip' 8 2
MENU '半径と中心' 'Ma_measure_radius' 9 1
MENU '要素の傾き' 'Ma_measure_slope' 9 2
MENU '要素鋏角' 'Ma_measure_angle_element' 10 1
MENU '２点と中心' 'Ma_measure_angle_point' 10 2

MENU '領域特性' 'AREA_PROPERTY' 11 1
MENU Colo0 Bcol7 'スクリーン' 'SCREEN' 11 2

END_DEFINE

選択表示メニューの組み込み方法
　１．下記のマクロをマクロの使い方を参照して、ＭＥ１０にＩＮＰＵＴします。
　　　この３つのマクロは１セットなので必ず一緒に扱って下さい。

　２．下記の【使ってみる】を実行させると、メニューが現れます。

　（注）【パーツ表示】の【パーツ】を使って、表示をすると、このパーツの範囲内での操作が出来ます。
　　　　表示開始は、カレントの画面で行われます。（分割している場合は、注意して下さい。）

【使ってみるＡ】
１．メインメニューのマクロの組み込みを確認する。
（もし面倒なら、新たに置き換えましょう。）
調べ方を参考にして、メインメニューのマクロを取り出して、ファィル化します。
　　　　ＩＮＰＵＴ文で読み込みが出来るようにします。

２．メインメニューに書き込まれている表示指定のマクロ名をを置き換える
　　　　インストール直後のマクロ名は、Sm_screen_show なので、このマクロ名を Sm_screen_show_method に置き換えます。

　　（注）もし、メニューが変わらなければ、ＩＮＰＵＴ文の書かれている場所を後の方にずらせて下さい。

【使ってみるＢ】
　　コマンドを直接入力します。

　　　Sm_screen_show_method と入力して下さい。

【使ってみるＣ】
　　ツールＢＯＸに登録する。

{ 描画表示の指定
　2001.01.05
}
DEFINE Sm_screen_show_method_layout_name
Sm_screen_show_method_layout
END_DEFINE

{ 描画表示の指定
　2001.01.05
}
DEFINE Sm_screen_show_method_layout
CURRENT_MENU 'Sm_screen_show_method'
CURRENT_SCREEN 1
MENU_LAYOUT
Layout_body_10
Menu_home_point_down
END
LET Sm_screen_show_method_layout_name 'Sm_screen_show_method'
END_DEFINE

{ 画面の描画表示の指定
　2001.01.05 システムから移動
　2001.03.04-2001.04.08
}
DEFINE Sm_screen_show_method
LET Lastmen 'Sm_screen_show_method'
MENU_BUFFER ON
CURRENT_MENU Sm_screen_show_method_layout_name T_clear_menu_1 Menu_control_icons
MENU Colo0 Bcol5 CENTER '表示指定' '' 1 3

MENU Colo0 Bcol1 CENTER '表／消' '' 2 1
MENU '全表示' 'SHOW GLOBAL ALL ON SHOW DIMENSIONS ON' 2 2
MENU '全消去' 'SHOW GLOBAL ALL OFF SHOW DIMENSIONS OFF' 2 3

MENU Colo0 Bcol1 CENTER '個選択' '' 3 1
MENU 'オ　ン' 'ON' 3 2
MENU 'オ　フ' 'OFF' 3 3
MENU Colo0 Bcol7 '図　形' 'SHOW GLOBAL GEO ALL' 4 1
MENU Colo0 Bcol7 '下書線' 'SHOW GLOBAL C_GEO ALL' 4 2
MENU Colo0 Bcol7 '寸法線' 'SHOW DIMENSIONS' 4 3
MENU Colo0 Bcol7 '文字' 'SHOW GLOBAL TEXTS ALL' 5 1
MENU Colo0 Bcol7 '頂　点' 'SHOW VERTEX' 5 2
MENU Colo0 Bcol7 'ハッチ' 'SHOW GLOBAL HATCHING ALL' 5 3
MENU Colo0 Bcol7 '属性情' 'I_show_info' 6 1
MENU Colo0 Bcol7 'レイヤ' 'I_show_layer' 6 2
MENU Colo0 Bcol7 'ﾚｲﾔ色' 'I_show_layer_color' 6 3
MENU Colo0 Bcol1 CENTER '選表示' '' 7 1
MENU '印文字' '$$appear_part$$' 7 2
MENU Colo0 Bcol2 '表示終' 'Ma_appear_part_escape' 7 3
MENU '素選始' 'Ma_requisite_begin' 8 1
MENU '素追加' 'Ma_requisite_add' 8 2
MENU '素削除' 'Ma_requisite_kill' 8 3
MENU 'パ選始' 'Ma_appear_part_begin' 9 1
MENU 'パ追加' 'Ma_appear_part_add' 9 2
MENU 'パ削除' 'Ma_appear_part_kill' 9 3
MENU '群選始' 'Ma_pack_part_begin' 10 1
MENU '群追加' 'Ma_pack_select' 10 2
MENU '群削除' 'Ma_pack_kill' 10 3
MENU Colo0 Bcol6 '表示始' 'Ma_appear_part_on' 11 1
MENU '目印消' 'Ma_appear_part_word_del' 11 2
MENU '全仮表' 'Ma_appear_part_all' 11 3

END_DEFINE

気をつけて作りました、使用してのトラブルに責任は持てませんが、自由にお使い下さい。（伏見　表）