#module #define WM_LBUTTONDOWN $00000201 ;マウス左ボタン押下 #deffunc m_setup oncmd gosub *On_WM_LBUTTONDOWN, WM_LBUTTONDOWN ;マウス左ボタン押下 return *On_WM_LBUTTONDOWN mes "click !" return #global ;---- m_setup gosub *On_WM_LBUTTONDOWN stop ;モジュールの外なので同じラベル名が使用出来る！ *On_WM_LBUTTONDOWN mes "hogehoge" return