| version 1.1, 2013/08/27 05:51:50 |
version 1.2, 2013/11/13 15:43:31 |
|
|
| // $OpenXM$
|
// $OpenXM: OpenXM_contrib2/windows/post-msg-asirgui/asirgui.mac,v 1.1 2013/08/27 05:51:50 takayama Exp $
|
| // Keep shift-jis code!
|
// Keep shift-jis code!
|
| call Main;
|
call Main;
|
| endmacro;
|
endmacro;
|
| Main:
|
Main:
|
| |
$asirpath=getenv("HOMEPATH")+"\\Desktop\\asir\\bin\\";
|
| menu "asirgui起動","編集中のファイルの実行","選択範囲の実行","行の実行","選択範囲の実行(paste)","行の実行(paste)";
|
menu "asirgui起動","編集中のファイルの実行","選択範囲の実行","行の実行","選択範囲の実行(paste)","行の実行(paste)";
|
| if (result==0) endmacro;
|
if (result==0) endmacro;
|
| else if (result == 1) {
|
else if (result == 1) {
|
| run getenv("HOMEPATH")+"\\Desktop\\asir\\bin\\asirgui";
|
run $asirpath+"asirgui";
|
| } else if (result == 2) {
|
} else if (result == 2) {
|
| run "cmd /c "+getenv("HOMEPATH")+"\\Desktop\\asir\\bin\\cmdasir %f";
|
run "cmd /c "+$asirpath+"cmdasir %f";
|
| } else if (result == 3) {
|
} else if (result == 3) {
|
| call ExecuteSelectedArea;
|
call ExecuteSelectedArea;
|
| } else if (result == 4) {
|
} else if (result == 4) {
|
| Line 26 ExecuteSelectedArea: |
|
| Line 27 ExecuteSelectedArea: |
|
| $tmp_fname = getenv("TEMP")+"\\cmdasir-tmp-hidemaru.rr";
|
$tmp_fname = getenv("TEMP")+"\\cmdasir-tmp-hidemaru.rr";
|
| run "cmd /c del "+$tmp_fname ;
|
run "cmd /c del "+$tmp_fname ;
|
| call MakeFile $tmp_fname,$s;
|
call MakeFile $tmp_fname,$s;
|
| run "cmd /c "+getenv("HOMEPATH")+"\\Desktop\\asir\\bin\\cmdasir "+$tmp_fname;
|
run "cmd /c "+$asirpath+"cmdasir "+$tmp_fname;
|
| } else {
|
} else {
|
| message "範囲選択されていません";
|
message "範囲選択されていません";
|
| }
|
}
|
| Line 70 ExecuteSelectedAreaByPaste: |
|
| Line 71 ExecuteSelectedAreaByPaste: |
|
| $tmp_fname = getenv("TEMP")+"\\cmdasir-tmp-hidemaru.rr";
|
$tmp_fname = getenv("TEMP")+"\\cmdasir-tmp-hidemaru.rr";
|
| run "cmd /c del "+$tmp_fname ;
|
run "cmd /c del "+$tmp_fname ;
|
| call MakeFile $tmp_fname,$s;
|
call MakeFile $tmp_fname,$s;
|
| run "cmd /c "+getenv("HOMEPATH")+"\\Desktop\\asir\\bin\\cmdasir --paste-contents "+$tmp_fname;
|
run "cmd /c "+$asirpath+"cmdasir --paste-contents "+$tmp_fname;
|
| } else {
|
} else {
|
| message "範囲選択されていません";
|
message "範囲選択されていません";
|
| }
|
}
|
![[BACK]](/icons/cvsweb/back.gif){kind=icon}
Return to asirgui.mac CVS log ![[TXT]](/icons/cvsweb/text.gif){kind=icon}
![[DIR]](/icons/cvsweb/dir.gif){kind=icon}
Up to [local] / OpenXM_contrib2 / windows / post-msg-asirgui