version 1.3, 2013/11/14 17:21:51 |
version 1.8, 2013/12/19 04:24:39 |
|
|
// $OpenXM: OpenXM_contrib2/windows/post-msg-asirgui/asirgui.mac,v 1.2 2013/11/13 15:43:31 ohara Exp $
|
// $OpenXM: OpenXM_contrib2/windows/post-msg-asirgui/asirgui.mac,v 1.7 2013/11/28 03:02:19 takayama Exp $
|
// Keep shift-jis code!
|
// Keep shift-jis code!
|
|
// run "cmd /c "+$asirpath+"cmdasir %f" + " >con"; output debugmsg
|
call Main;
|
call Main;
|
endmacro;
|
endmacro;
|
Main:
|
Main:
|
Line 8 $asir_rootdir=getenv("ASIR_ROOTDIR"); |
|
Line 9 $asir_rootdir=getenv("ASIR_ROOTDIR"); |
|
if($asir_rootdir!="" && existfile($asir_rootdir+"\\bin\\asirgui.exe")) {
|
if($asir_rootdir!="" && existfile($asir_rootdir+"\\bin\\asirgui.exe")) {
|
$asirpath=$asir_rootdir+"\\bin\\";
|
$asirpath=$asir_rootdir+"\\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 $asirpath+"asirgui";
|
run $asirpath+"asirgui";
|
} else if (result == 2) {
|
} else if (result == 2) {
|
run "cmd /c "+$asirpath+"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 22 else if (result == 1) { |
|
Line 23 else if (result == 1) { |
|
call ExecuteSelectedAreaByPaste;
|
call ExecuteSelectedAreaByPaste;
|
} else if (result == 6) {
|
} else if (result == 6) {
|
call ExecuteSelectedLineByPaste;
|
call ExecuteSelectedLineByPaste;
|
|
} else if (result == 7) {
|
|
call AbortAsir;
|
}
|
}
|
return true;
|
return true;
|
ExecuteSelectedArea:
|
ExecuteSelectedArea:
|
Line 31 ExecuteSelectedArea: |
|
Line 34 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 "+$asirpath+"cmdasir "+$tmp_fname;
|
run "cmd /c \""+$asirpath+"cmdasir\" "+$tmp_fname;
|
} else {
|
} else {
|
message "範囲選択されていません";
|
message "範囲選択されていません";
|
}
|
}
|
Line 75 ExecuteSelectedAreaByPaste: |
|
Line 78 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 "+$asirpath+"cmdasir --paste-contents "+$tmp_fname;
|
run "cmd /c \""+$asirpath+"cmdasir\" --paste-contents "+$tmp_fname;
|
} else {
|
} else {
|
message "範囲選択されていません";
|
message "範囲選択されていません";
|
}
|
}
|
Line 86 ExecuteSelectedLineByPaste: |
|
Line 89 ExecuteSelectedLineByPaste: |
|
golineend;
|
golineend;
|
// message(str(seltopx) + "," + str(seltopy) + "," + str(selendx) + "," + str(selendy));
|
// message(str(seltopx) + "," + str(seltopy) + "," + str(selendx) + "," + str(selendy));
|
call ExecuteSelectedAreaByPaste;
|
call ExecuteSelectedAreaByPaste;
|
|
return true;
|
|
|
|
AbortAsir:
|
|
run "\""+$asirpath+"cmdasir\" --abort"+" >nul";
|
return true;
|
return true;
|
|
|